buka notepad
kemudian ketik di bawah ini
Dim userInput
userInput = InputBox("Masukan Kata Di bawah ini lalu klik ok (Sound harus aktif)")
Set Sapi = Wscript.CreateObject("SAPI.SpVoice")
Sapi.speak userInput
kemudian simpan dengan extension vbs
saya menyimpannya dengan tes.vbs
lalu setelah di klik akan muncul gambar dibawah ini
di layar akan muncul koak seperti diatas bearti script vbs yang di buat di atas berhasil kemudian anda tes
isi dengan tulisan apapun lalu ok dan komputer langsung berbicara dengan syarat sound di komputer anda harus dalam keadaan aktif.
fungsi ini adalah memanggil object fasilitas voice yang di sediakan pada windows xp
trima kasih atas perhatiannya tidak panjang lebar wasalam.
