Daripada tulisan Kepada Suara


Open a text file in notepad and write:

Dim msg, sapi
msg=InputBox("Masukan Perkataan","Cakap !!!!")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg

Save the file with a (*.vbs) extension, it will create a VBScript File.
It will prompt you for a text when u open the file, input the text and press ok.
u will hear what u typed.



post signature

post signaturePrint This Article

No comments:

blogss

Pages

Copyright T&R Stationery - Souvenir