kadirselen
Mesaj Sayısı : 550 Kayıt tarihi : 15/08/10 Yaş : 33 Nerden : Denizli Cinsiyet :
| Konu: Bilgisayarınız konuşsun!!! Perş. Ağus. 19, 2010 11:09 pm | |
|
Project/Add Referans 'tan COM sekmesine gelin ve Microsoft Speech Object Library 'yi işaretleyin.
Birde textbox1 ve button1 ekleyin.
Dim konus As New SpeechLib.SpVoice Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load TextBox1.Text = "" End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click konus.Speak(TextBox1.Text) End Sub
|HAKAN ŞEN -KADİR SELEN|
| |
|