aku mau share nih ma kalian tentang cara agar komputer kita bisa ngomong tanpa software apapun.
Trik ini aku dapet dari forum sebelah…
Oke, langsung aja.
Trik ini aku dapet dari forum sebelah…
Oke, langsung aja.
- Yang pertama kita buka dulu notepad
- Setelah itu copy code di bawah ini ke notepad tadi :
Dim pesan, sapi
pesan = InputBox ( “Apa yang Anda ingin saya katakan?”, “Berbicaralah kepada-Ku”)
Set sapi = CreateObject ( “sapi.spvoice”)
sapi.Speak pesan - Setelah itu “Save AS” dengan nama “speak” atau terserah teman teman asalkan harus diakhiri dengan .vbs. Misal, “Speak.vbs“.
- Setelah itu klik dua kali untuk membuka file tadi, maka akan keluar jendela dialog box seperti ini :
- Nah, disitu saya menuliskan “hi, good morning” maka setelah klik tombol OK komputer akan mengatakan sesuai yang kita tuliskan tadi.
Tidak ada komentar:
Posting Komentar