Icon10 اعمل برنامج بالفيجوال بيسك لسماع ما تكتبه .... شرح بالصور

[b][b][font=Arial][size=12]Private Sub Command1_Click()
Dim m As New SpeechLib.SpVoice
m.Speak Text1.Text
End Sub[/size][/font][/b][/b]