Membuat Arti kata

Script ini berfungsi untuk menampilkan Arti kata yang sudah kamu masukan terlebih dahulu.
Di bawah ini menggunakan Kata KELINCI dan TIKUS, Yg nantinya akan di artikan dalam bahasa Inggris

Langkah :

1. Buka Notepad kamu
2. Ketik/Copas Script di bawah ini :

   Dim inggris
   inggris=Inputbox ("bahasa Inggris untuk, Kelinci, tikus")
   If inggris= "kelinci" Then
   msgbox "bahasa Inggris Kelinci adalah"
   msgbox "Rabbit,Playboy,Playgirl"

   Else if inggris= "tikus" Then
   msgbox "bahasa Inggris Tikus adalah"
   msgbox "Mouse,Rat, KORUPTOR"
   else
   msgbox "Pilih Kategori"
   msgbox"Kelinci"
   msgbox"Tikus"
   End If
   End If

4. Lalu Save As dengan Extensi (*.vbs), Contoh : ( ArtiKata.vbs )
5. Lalu Jalankan script yang sudah di Save tadi

KET :

Script di atas akan menampilkan Arti kata KELINCI dan TIKUS, Jika memilih Kata KELINCI,  Maka akan keluar Project Pesan yang menampilkan Arti kata dalam bahasa Inggris dari Kelinci yaitu ( Rabbit, Playboy, Playgirl ).
Untuk Playboy & Playgirl...itu saya yang nambahin....he..he