خواندن متن تایپ شده در ویژوال بیسیک

با استفاده از کد زیر در ویژوال بیسیک متن تایپ شده خوانده میشود

Private Sub Form_Load()
Dim msg, sapi
msg = InputBox("متن را وارد كنيد")
Set sapi = CreateObject("sapi.spvoice")
sapi.Speak msg
End Sub

نمونه سوالات تستی درس ویژوال بیسیک

برای دیدن نمونه سوالات تستی درس ویژوال بیسیک ادامه مطلب کلیک کنید    

ادامه نوشته