'LOADS THE COMMANDS INTO AN ARRAY AND LISTBOX Label1.ForeColor = Color.Red : Label1.BackColor = Color.Transparent : Label1.Text = ('Sorry but the ' & e.Result.Text & ' phrase could not be recognized') Private Sub recognizer_SpeechRecognitionRejected(ByVal sender As Object, ByVal e As SpeechRecognitionRejectedEventArgs) Label1.ForeColor = Color.Green : Label1.BackColor = Color.Transparent : Label1.Text = 'Speech engine has detected that you spoke something' Private Sub recognizer_SpeechDetected(ByVal sender As Object, ByVal e As SpeechDetectedEventArgs) Jarvis.Speak('I'll just close my eyes for a minute') SendMessage(Me.Handle.ToInt32(), WM_SYSCOMMAND, SC_MONITORPOWER, 2) Jarvis.Speak('Searching for local weather')ĭim oWMP = CreateObject('WMPlayer.OCX.7') Private Sub recognizer_SpeechRecognized(ByVal sender As Object, ByVal e As SpeechRecognizedEventArgs)ĭim Jarvis = CreateObject('sapi.spvoice') Recognizer.LoadGrammar(New Grammar(grammar)) This is possible by loading an object or an xml file 'A grammar must be loaded into the engine. Grammar.Append(New Choices(System.IO.File.ReadAllLines('Commands.txt'))) 'The rule is that each choice in the first Append method can be combined with each word specified Recognizer = New SpeechRecognizer() ' Add any initialization after the InitializeComponent() call.ĪddHandler recognizer.SpeechDetected, AddressOf recognizer_SpeechDetected 'this event is raised when the user begins to speakĪddHandler recognizer.SpeechRecognitionRejected, AddressOf recognizer_SpeechRecognitionRejected 'this is raised when spoken words are not recognized as compliant to our grammar rulesĪddHandler recognizer.SpeechRecognized, AddressOf recognizer_SpeechRecognized 'this is raised when the application correctly recognizes spoken words InitializeComponent() ' This call is required by the Windows Form Designer. 'This object represents the Speech recognition engine The error is: The language for the grammar does not match the language of the speech recognizer. See Exception.InnerException for details. And now im receiving this error:Īn error occurred creating the form. Hello in visual basic I am attempting to create a speech recognition system that can help me out with my life on the computer.

Grammar police lspdfr