[VB] 구글 번역을 통한 TTS 기능

Private Sub Command1_Click()
wmp.URL = "http://translate.google.co.kr/translate_tts?ie=UTF-8&q=" & T & " &tl=ko&prev=input"
End Sub
Private Sub Form_Load()
wmp.URL = "http://translate.google.co.kr/translate_tts?ie=UTF-8&q=안녕하세요. 이정우 입니다.&tl=ko&prev=input"
End Sub