Jadikan komputer anda berkata-kata

  1. Buka Notepad
     2.  Copy & paste code dibawah ini ke dalam notepad.
            
              Dim Message, Speak
          Message=InputBox("Enter text","Speak")
          Set Speak=CreateObject("sapi.spvoice")
          Speak.Speak Message

Contoh copy & paste code tersebut ke dalam notepad
3. Save as notepad tersebut sebagai speak.vbs

4. Open atau run skrip tersebut melalui tempat anda menyimpan notepad tersebut (Contoh: Desktop).

Sebaiknya save notepad tersebut ke desktop untuk memudahkan mencarinya
5. Selepas membukanya, letak apa-apa sahaja perkataan yang ingin anda mahu disebut di ruangan             input.

6. Komputer berkata-kata selepas anda menekan button OK.



Share on Google Plus

About Rakan Siber

Rakan Siber (R.C.) ditubuhkan untuk berkongsi impian dan minat yang sama terhadap teknologi semasa seperti komputer dan gadget. Kami berkongsi tip-tip untuk menolong menyelesaikan masalah disamping berita baharu dalam kalangan ahli komuniti ini.
    Blogger Comment
    Facebook Comment

0 comments :