Ini termasuk trik lama dan sederhana. untuk membuatnya tidak perlu
instal software lg, tapi menggunakan notepad bawaan Windows. langsung
aja, langkah pertama buka notepad lalu copy teks di bawah ini kedalam
notepad
Dim msg, sapi
msg = InputBox ( "Apa yang Anda ingin saya katakan?", "Masukan kata-kata")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg
lalu simpan dengan ekstensi VBS. contoh "voice.vbs" jalankan aplikasi, lalu muncul jendela ketikan kata kata pada kotak isian. apa yg terjadi ?dan jangan lupa speaker nya...selamat mencoba
Langganan:
Posting Komentar (Atom)
0 komentar:
Posting Komentar