Public Sub Speak(kalimat As String) Dim obj Set obj = CreateObject("sapi.spvoice") obj.Speak kalimat End Sub
Speak "I Am Programmer"