تغییر سرعت تلفظ لغت

[mahdi.a.v]

سلام
وقتی از کد تلفظ لغت این

Dim sapi As Object
sapi = CreateObject("sapi.spvoice")
sapi.Speak(RichTextBox1.Text)

استفاده میکنم باید میزان سرعت تلفظ لغت رو تغییر بدم ...
اما نمیدونم چه جوری ...
اگه میشه راهنمایی کنید چون برنامه ی من به این وابسته هست ...

[مهرداد صفا]

با سلام.
از خصوصیت rate برای تنظیم سرعت استفاده کنید.

[mahdi.a.v]

ممنونم
ميشه يه كد براي اين بزاريد
خيلي لازمش دارم!

[مهرداد صفا]

متاسفانه vs اینجا ندارم ولی برای این کار راههای بهتری هم هست.
1- از منوی project گزینه add reference را باز کنید از سربرگ .net گزینه system.Speech را به پروژه اضافه کنید و تقریبا به این صورت عمل می کنید:
[VB]
dim voice as new System.Speech.Synthesesss.SpeechSynthesizer()
voice.Rate=9
voice.Speak("hello")
[VB]
ا از سربرگ com گزینه microsoft speech object library را به reference اضافهکنید و:
[VB]
dim voice as new SpeechLib.Spvoice
...
[VB]