Visual Basic'te Yazıyı Sese Çevirme
Merhaba Bu Makalemde VB6 da yazlan yazıları Sese çevirmeği anlatacam ;
+++++Başlıyoruz+++++
Formumuza Project > References Menüsünden "Microsoft Speech Object Library" adli Referenceyi ekliyoruz.
Daha Sonra Formumuza Bir TextBox birde Button Ekliyoruz Ve Code Bölümünü açıp Bunu Yazıyoruz ;
BOTTON'A:
Dim speech As SpVoice
Private Sub Command1_Click()
speech.Speak Text1
End Sub
TEXTBOX'A
Private Sub Form_Load()
Set speech = New SpVoice
End Sub
Daha Sonra Programımızı Çalıştırdığımızda Text1 e Yazı Yazıp CommandButton1 e Bastıgınızda
Yazdıgınızı Hoperlordan Duydugunuzu Farkedeceksin.:yaho1
SADECE XP DE ÇALIŞIYOR DİYE OKUDUM;AMA WİN7 DE DE ÇALIŞTI.
ALINTIDIR.
Merhaba Bu Makalemde VB6 da yazlan yazıları Sese çevirmeği anlatacam ;
+++++Başlıyoruz+++++
Formumuza Project > References Menüsünden "Microsoft Speech Object Library" adli Referenceyi ekliyoruz.
Daha Sonra Formumuza Bir TextBox birde Button Ekliyoruz Ve Code Bölümünü açıp Bunu Yazıyoruz ;
BOTTON'A:
Dim speech As SpVoice
Private Sub Command1_Click()
speech.Speak Text1
End Sub
TEXTBOX'A
Private Sub Form_Load()
Set speech = New SpVoice
End Sub
Daha Sonra Programımızı Çalıştırdığımızda Text1 e Yazı Yazıp CommandButton1 e Bastıgınızda
Yazdıgınızı Hoperlordan Duydugunuzu Farkedeceksin.:yaho1
SADECE XP DE ÇALIŞIYOR DİYE OKUDUM;AMA WİN7 DE DE ÇALIŞTI.
ALINTIDIR.