Mungkin yang belom mengetahui kedengaranya aga' aneh. Membuat Komputer bersuara sendiri,Komputer akan membaca tulisan kita. langsung ja,.
Mari ikuti langkah dibawah ini :
1. Buka Notepad
2. Copy code dibawah ini kedalam notepad
Dim pesan, sapi
pesan = InputBox ( "Apa yang anda ingin saya katakan?", "I love you")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak pesan
pesan = InputBox ( "Apa yang anda ingin saya katakan?", "I love you")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak pesan
3. Save As dengan nama file terserah anda,yang penting dengan akhiran .vbs
4. Klik File tersebut
5. Tulis tex apapun pada Text Box dan tekan Ok
6. Tunggu sebentar dan keluarlah suara dari Komputer
Sip kan ...silahkan dicoba..
0 comments:
Post a Comment