- Pertama, buka notepad.
- Copy-Paste script berikut :
Dim msg, sapi
msg = InputBox ( "Tulis Kata Dan Klik OK
! Creted By: Aditya Bayu Dinata",
"Moemetz")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg
- Save as, kemudian pilih all files lalu kasih nama mypc.vbs
- Selesai


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..!!
Selamat Mencoba ||
0 Komentar untuk "Tips Membuat Komputer Kita Berbicara"