firstly thnx O tried to do what u suggested but it did not work; :( it keeps writing the english word that have a meaning.

Good day to all I have this problem with the code below; I want the system to simply write what it hears with out using the grammar. is there any way to do that? I've tried removing the grammar file but it did not work. any help or suggestions

'Default Imports
Imports System
Imports System.Data
Imports System.Deployment
Imports System.Drawing
Imports System.Windows.Forms
Imports System.Xml

'Custom Imports
Imports SpeechLib

Public Class Form1
'Declares

Dim WithEvents RecoContext As SpSharedRecoContext       'The Main Recognition Object Used throughout the whole program. -- Shared Object: More Info on this later.
Dim Grammar As ISpeechRecoGrammar                       'The Grammar Object so the program knows what is going on. -- Instanced Object: More Info on this later.
Dim CharCount As Integer                                'This is used to count the amount of chars that are in the text box.



''''Subs Start Here
'Start Button. This will engage reco, and start the entire process.
Private Sub btnStart\_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnStart.Click

    'First check to see if reco has been loaded before. If not lets load it.
    If (RecoContext Is Nothing) Then
        RecoContext = New SpSharedRecoContextClass          'Create a new Reco Context Class

        Grammar = RecoContext.CreateGrammar(1)              'Setup the Grammar
        Grammar.DictationLoad()                             'Load the Grammar
    End If

    lblStatus.Text = "Recognition Started"                  'Change the Label to let the user know whats up
    Grammar.DictationSetState(SpeechRuleState.SGDSActive)   'Turns on the Recognition. This is Vitally important

    'This is so the user doesn't break the program by 
    'trying to start the recognition after its already started.
    btnStart.Enabled = False
    btnStop.Enabled = True
End Sub


''''


'Stop Button. This will stop stop the recoginition
Private Sub btnStop\_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnStop.Click

    Grammar.DictationSetState(SpeechRuleState.SGDSInactive) 'Turns off the Recognition. It will go dormant.
    lblStatus.Text = "Recognition Stopped"                  'Change the label to let the user know whats up

    'Again This is so the user doesn't go breaking things accidently
    btnStart.Enabled = True

I've done what you have mentioned; I appreciate your help...and now it says on the error message "Error Expected" what does it mean?

Yes it is an error message ...

Hello all I'm trying to include the a Grammer check into my app; one of the approaches that I've come across is using MS.Words' but it seem that I'm facing somedefficulties that I can't figure out;

mports System.Runtime.InteropServices Public Class Form1 Inherits System.Windows.Forms.Form ' Invokes either the spell or grammar checker. Private Sub SpellOrGrammarCheck(ByVal blnSpellOnly As Boolean) Try ' Create Word and temporary document objects. Dim objWord As Object Dim objTempDoc As Object ' Declare an IDataObject to hold the data returned from the ' clipboard. Dim iData As IDataObject ' If there is no data to spell check, then exit sub here. If TextBox1.Text = "" Then Exit Sub End If objWord = New Word.Application() // My problem is here as it shows that it is not defined objTempDoc = objWord.Documents.Add objWord.Visible = False ' Position Word off the screen...this keeps Word invisible ' throughout. objWord.WindowState = 0 objWord.Top = -3000 ' Copy the contents of the textbox to the clipboard Clipboard.SetDataObject(TextBox1.Text) ' With the temporary document, perform either a spell check or a ' complete ' grammar check, based on user selection. With objTempDoc .Content.Paste() .Activate() If blnSpellOnly Then .CheckSpelling() Else .CheckGrammar() End If ' After user has made changes, use the clipboard to ' transfer the contents back to the text box .Content.Copy() iData = Clipboard.GetDataObject If iData.GetDataPresent(DataFormats.Text) Then TextBox1.Text = CType(iData.GetData(DataFormats.Text), _ String) End If .Saved = True .Close() End With objWord.Quit() MessageBox.Show("The spelling check is complete.", _ "Spell Checker", MessageBoxButtons.OK, _ MessageBoxIcon.Information) ' Microsoft Word must be installed. Catch COMExcep As COMException

I'm not familiar with that class really; thankx for your help I appreciate it

Dear All I've been trying to code a code that record the users' voice from the mic but I seem to get stuck in some portion in which it keep showing me the error that the Microsoft.visualbasic.devices is missing? any help here is my code incase the problem is on my code

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using Microsoft.VisualBasic.Devices; //My problem is here
using Microsoft.VisualBasic;
using System.Runtime.InteropServices;

namespace WindowsApplication1
{

public partial class Form1 : Form
{

    \[DllImport("winmm.dll", EntryPoint = "mciSendStringA", CharSet = CharSet.Ansi, SetLastError = true, ExactSpelling = true)\]
    private static extern int mciSendString(string lpstrCommand, string lpstrReturnString, int uReturnLength, int hwndCallback);

    public Form1()
    {
        InitializeComponent();
    }

    private void Form1\_Load(object sender, EventArgs e)
    {

    }

    private void Record\_Click(object sender, EventArgs e)
    {
        // record from microphone
        mciSendString("open new Type waveaudio Alias recsound", "", 0, 0);
        mciSendString("record recsound", "", 0, 0);
    }

    private void SaveStop\_Click(object sender, EventArgs e)
    {
        // stop and save
        mciSendString("save recsound c:\\\\record.wav", "", 0, 0);
        mciSendString("close recsound ", "", 0, 0);
        Computer c = new Computer();
        c.Audio.Stop();
    }

    private void Read\_Click(object sender, EventArgs e)
    {
        Computer computer = new Computer();
        computer.Audio.Play("c:\\\\record.wav", AudioPlayMode.Background);
    }

    
}

}