Dim
msg , sapimsg = InputBox ( "Apa yang Anda ingin saya katakan?", "Masukan
kata -kata")Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg
(CTRL + C utk Copy)
save as .vbs |
4.Selesai
Cuba sekarang klik 2x dkt file y disimpan tdi..
try now |
Tips ini sudah saya cuba dan hasilnya : 100% Tested n Worked..!!
Good Luck!!
0 Komen:
Post a Comment