RSS

Kasi peluang komputer anda bercakap….

01 Apr

Langkah 1

Buka program Notepad dan paste kod di bawah :

Dim message, sapi
message=InputBox("Enter the text you want spoken","Speak This")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message

Langkah 2 :
Namakan file tersebut dengan apa sahaja nama yang korang mahu tetapi pastikan korang tambah .vbs di hujung nama fail tersebut

Langkah 3 :
Pastikan juga untuk kotak Save as type tu, pilih All files dan bukannya Text document. Kalau xtukar yang tu, nanti file tu akan jadi file teks Notepad biasa.

Seterusnya double-click file .vbs yang disimpan tadi dan satu dialog box akan dipaparkan. Taip apa sahaja yang korang nak dan satu suara akan baca apa yang korang dah taip tu.


Advertisements
 
Leave a comment

Posted by on April 1, 2010 in Uncategorized

 

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

 
%d bloggers like this: