Cuma trik iseng ajah , buat program kecil yang bisa membuat komputer bicara kata yang kita ketik, skrip nya juga dikit , jadi bisa langsung di coba sob
Berikut caranya
1. klik start => ketik "notepad" lalu enter
2. ketik atau salin kode berikut di notepad
Dim Message, Speak
Message=InputBox("Ketik kata yang ingin di ucapkan","ILFEN")
Set Speak=CreateObject("sapi.spvoice")
Speak.Speak Message
3. setelah itu save dengan nama speak.vbs selesai.
untuk menjalankannya klik 2 kali pada program yang tadi di buat lalu ketikkan kata yang ingin di ucapkan .
selamat mencoba
Posted by 21.48 and have
0
default-disqus
, Published at
Tidak ada komentar:
Posting Komentar