Dim msg, sapi
msg = InputBox ( "Apa yang Anda ingin saya katakan?", "Masukan kata-kata")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg
Mypc.Vbs
鐙(" _ ")透 鐙(" _ ")透
奄奄
奄奄
属尊o(¬諭-脈¬諭) (¬諭-脈¬諭)o尊属
"脈ホ栽ミホ宰≒財∨ホ栽ミホ"脈
リ郊ルル 悋愕ル悋ル リ悦リリ 悋 リリ悦ルリж
H捉h捉h捉h捉H捉h捉 =)) 尊属属尊( ¬諭脈¬諭)( ¬諭脈¬諭)犢劉劉劉劉犢( ¬諭脈¬諭)( ¬諭脈¬諭) 尊 ホ栽ミホ ≒財∨ホ栽ミk. Copasan .... 絨挫枯