خواندن مقادیر تکس باکس

[esafb52]

با سلام به همه اساتید
من یه نمونه فرم ساده که دو تکس باکس داشته با لیبیل های ایمیل و پسورد و یک دکمه برای خواندن مقادیر وارد شده در این تکس باکس ها رو میخوام
لطفا یه نمونه سورس و یه برنامه واسم بذارین
ممنون میشم

[esafb52]

منظور من برنامه های مثلا بیبیلون چطور کلمات رو تلفظ می کنند؟
تو vb ازچه چیزی برای اینکار استفاده می کنن؟ اگه کمک کنین ممنون میشم

[MohammadGh2011]

منظور من برنامه های مثلا بیبیلون چطور کلمات رو تلفظ می کنند؟
تو vb ازچه چیزی برای اینکار استفاده می کنن؟ اگه کمک کنین ممنون میشم
سلام عليکم
توي فورمت يک تکست باکس و يک کامند(دکمه) اضافه کن.و کدهاي زير رو تو کامند بنويس
هر موقع توي تکست باکس1 هرچيزي بنويسي و روي کامند کليک کنيد براتون تلفظ ميشه.


Dim ras, sapi
ras = Text1.Text
Set sapi = CreateObject("sapi.spvoice")
sapi.Speak ras
Text1.SetFocus

--------------
موفق باشيد

[esafb52]

خدا خیرت بده حسابی حال کردم واسه تلفظ صیحیح لغات لازمش داشتم
مرسی مرسی مرسی مرسی مرسی مرسی مرسی مرسی مرسی مرسی مرسی مرسی

[mr-adler]

سلام و عرض ادب
امتحان کردم نمیشه اسم متغیر sapi رو تغییر داد باید همین جوری بمونه و الا برنامه خطا میده . ایا دلیل خاصی داره؟ یا من اشتباه متوجه شدم...

ممنون

[محسن واژدی]

امتحان کردم نمیشه اسم متغیر sapi رو تغییر داد باید همین جوری بمونه و الا برنامه خطا میده . ایا دلیل خاصی داره؟ یا من اشتباه متوجه شدم...

سلام علیکم
اگه منظور تون sapi موجود در تابع CreateObject است، این نام کلاسی در کامپوننت sapi است که نباید تغییر دهیم

موفق باشید