ketawa dulu lah..hahahahahahah wakakakakakka..oke udah hilang ne penat
sekarang waktunta posting ..........ne ada cara lo agar komputer kita dapat bicara ,,ya kalau ane che hanya untuk hiburan aja..hehehe..maklum ane orang nya humoris..jadi ini script ane gunakan unuk tulis kata-kata lucu setelah itu ane denger dechh..heheheh..langsung aja dech gmana caranya ..oke cekidot gan
- Pertama, buka notepad.
- Copy-Paste script berikut :
Dim msg, sapi
msg = InputBox ( "Apa yang Anda ingin saya katakan?", "Masukan kata-kata")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg
- Save as, kemudian pilih all files lalu kasih nama mypc.vbs
- Selesai
Coba sekarang anda klik 2x.. Gimana?? keren kan?? hehe
Atau kalau yang nggak mau menggunakan InputBox (Jadi pas di klik 2x langsung berbicara tanpa perlu memasukan kata-kata). Scriptnya seperti ini :
Dim msg, sapi
msg = "Ganti dengan kata-kata anda"
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg
Tips ini sudah saya coba dan hasilnya : 100% Tested n Worked..!!
Atau kalau yang nggak mau menggunakan InputBox (Jadi pas di klik 2x langsung berbicara tanpa perlu memasukan kata-kata). Scriptnya seperti ini :
Dim msg, sapi
msg = "Ganti dengan kata-kata anda"
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg
Tips ini sudah saya coba dan hasilnya : 100% Tested n Worked..!!
0 komentar:
Posting Komentar
Sebagai Pengunjung yang baik berikanlah komentar anda untuk membantu meningkatkan trafic blog ini.Terima Kasih :)