ပထမဆုံး Notepad ကို ဖြင္႔ပါ ။ Run>>>>notepad လုိ႔ရုိက္လုိက္ပါ ။
ကဲ ...အဲဒီထဲမွာ ဒီစာသားေလးေတြကို ကူးထည္႔လုိက္ပါ ။
Dim Message, Speak
Message=InputBox("Enter text","Speak")
Set Speak=CreateObject("sapi.spvoice")
Speak.Speak Message
ျပီးရင္ေတာ႔ Speak.vbs နာမည္နဲ႔ သိမ္းလုိက္ပါ ။
ျပီးရင္ေတာ႔ သိမ္းထားတဲ႔ ေနရာေလးမွာ...
