[honest]

السلام عليكم
كود بسيط لقرائة او نطق النصوص والارقام لاكنه بالانجليزي فقط

كود :

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button3.Click
       Dim SAPI
       SAPI = CreateObject("SAPI.spvoice")
       SAPI.Speak(TextBox1.Text)
   End Sub