suruh baca , apa yang anda ketikkan ,, pada program sederhana ..
hehehe,,
Naah ,, begini caranya gan ...
• Buka Notepad
• Copy dan Pastekan pada notepad script berikut ini
Dim message, sapi
message=InputBox("Mau ngomong Apa Loe?","Ngomong donk !!! ")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
• Simpan file dengan nama bebas terserah anda dengan extension .vbs
( namaterserahanda.vbs ) bukan berektension .txt
• Untuk menjalankan dobel klik file yang telah dibuat, ketikkan tulisan yang ingin dikonversikan ke voice
• Klik OK.
• Copy dan Pastekan pada notepad script berikut ini
Dim message, sapi
message=InputBox("Mau ngomong Apa Loe?","Ngomong donk !!! ")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
( namaterserahanda.vbs ) bukan berektension .txt
• Untuk menjalankan dobel klik file yang telah dibuat, ketikkan tulisan yang ingin dikonversikan ke voice
• Klik OK.
lumayan seru kan gan ,,,
hahahahaha ,, selamat mencoba .. :)
Posting Komentar