Mozaik TKJ ~ Kembali lagi di Mozaik TKJ. Kali ini kita akan bersenang senang dengan komputer kita. Yakni membuat komputer kita bisa bicara.
Bagaimana caranya? Langsung saja kita mulai:
1. Buka Notepad. Caranya tekan tombol bergambar logo Windows + R, ketik "notepad", lalu tekan Enter
2. Jika Notepad sudah terbuka, copy paste teks di bawah:
2. Jika Notepad sudah terbuka, copy paste teks di bawah:
Dim Sapi, Message3. Lalu simpan dengan nama "speak.vbs" (tanpa tanda petik)
Message = InputBox("Masukkan Kata yang Anda ingin Saya katakan:")
Set Sapi = CreateObject("Sapi.SPVoice")
Sapi.Speak Message
4. Buka Windows Explorer, lalu buka tempat file tersebut Anda simpan, lalu klik 2 kali,
5. Tulis kata yang Anda ingin untuk komputer Anda katakan, misal: "I Love You". Lalu klik OK
Catatan: cara tersebut tidak akan berhasil jika komputer Anda tidak ada speakernya.
Tidak ada komentar:
Posting Komentar