For i = 1 to 10
CreateObject("SAPI.SpVoice").Speak "Pizza"
Next
MsgBox("ひざ")

お持ち帰り用(右クリック->対象をファイルに保存)

戻る