Try
Catch ex As Exception
End Try
Dim sapt
sapt = CreateObject("sapi.spvoice")
sapt.speak(TextBox1.Text)
Catch ex As Exception
End Try
Dim sapt
sapt = CreateObject("sapi.spvoice")
sapt.speak(TextBox1.Text)
تقييم الموضوع :
|
كود صغير يقوم بقراءه النص من التكست بوكس
|
|
|
| الردود في هذا الموضوع |
|
كود صغير يقوم بقراءه النص من التكست بوكس - بواسطة برير مسبل - 07-01-15, 11:59 AM
RE: كود صغير يقوم بقراءه النص من التكست بوكس - بواسطة amma - 10-12-16, 05:21 PM
RE: كود صغير يقوم بقراءه النص من التكست بوكس - بواسطة ridha69 - 25-01-17, 06:53 PM
RE: كود صغير يقوم بقراءه النص من التكست بوكس - بواسطة alsouf - 08-08-18, 03:55 PM
|
يقوم بقرائة الموضوع: