Hallo, seit langem suche ich schon seit langem nach einer Lösung im Internet system speech recognition in VB gescheit nutzen zukönnen. Bisher habe ich folgendes gefunden und genutzt.
//////////////////////
Imports System.Speech Public Class Form1
Public synth As New Speech.Synthesis.SpeechSynthesizer
Public WithEvents recognizer As New Speech.Recognition.SpeechRecognitionEngine
Dim gram As New System.Speech.Recognition.DictationGrammar()
Public Sub GotSpeech(ByVal sender As Object, ByVal phrase As System.Speech.Recognition.SpeechRecognizedEventArgs) Handles recognizer.SpeechRecognized
words.Text = phrase.Result.Text
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
recognizer.LoadGrammar(gram)
recognizer.SetInputToDefaultAudioDevice()
recognizer.RecognizeAsync()
End Sub
End Class
//////////////////////
Nur leider versteht mich in diesem Falle Vb kaum. Zb. wenn ich "Nur ein Test" sage versteht Vb "Blaum ein Text" Und wenn ich Cortana einmal das selbe sage versteht sie es... Und da ich einfach keine Lösung in bereits vorhandenen Threads finde hoffe ich das mir netterweise einer von euch helfen könnte. :)
