كيف الحال جميعا اليوم بعطيكم كود يجعل الحاسب يتكلم
بس انجليزي بس
نبدأ
اولا نفتح برنامج فيجول بيسك نت
ونضع على الفورم اداة
تكست بوكس
وبتون
ونصغرها متل مافي الصورة

الكود :

Public Class Form1

    Private Property objnametoSpeech As Object
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        objnametoSpeech = CreateObject("sapi.spvoice")
        objnametoSpeech.speak(TextBox1.Text)
    End Sub
End Class

------------------------------------------------------------------------------------------------------------------------
مع تحياتي : هكوووور ليبيا