Code assistance

[Neth'zul]

Hey guys
EDIT: I get this when I press change spelling "Public member 'Length' on type 'Range' not found"
What should I put instead?

this is the code its in
strResult = objDoc.Content.Substring(0, objDoc.Content.Length - 1)







Im using this code.

Dim objWord As Object

        Dim objDoc As Object
        Dim strResult As String

        'Create a new instance of word Application

        objWord = CreateObject("word.Application")



        Select Case objWord.Version

            'Microsoft Office Word 2007

            Case "9.0"

                objDoc = objWord.Documents.Add(, , 1, True)

                'Office XP

            Case "10.0"

                objDoc = objWord.Documents.Add(, , 1, True)

                'Office 97

            Case Else ' Office 97

                objDoc = objWord.Documents.Add

        End Select



        objDoc.Content = RichTextBox1.Text

        objDoc.CheckGrammer()



        strResult = objDoc.Content.Substring(0, objDoc.Content.Length - 1)



        If RichTextBox1.Text = strResult Then

            ' There were no spelling errors, so give the user a

            ' visual signal that something happened

            MsgBox("The spelling check is complete.", vbInformation + vbOKOnly)

        End If



        'Clean up

        objDoc.Close(False)

        objDoc = Nothing

        objWord.Application.Quit(True)

        objWord = Nothing



        ' Replace the selected text with the corrected text. It's important that

        ' this be done after the "Clean Up" because otherwise there are problems

        ' with the screen not repainting

        RichTextBox1.Text = strResult



        Exit Sub



        Exit Sub
    End Sub

[Apoc]

objDoc.CheckGrammer() doesn't exist.

And for the love of god, use the code tags.

[ReidE96]

Grammar

This code seems so flawed -.- For one thing, a substring is for a string, not an object. I really don't get your code :P

[Neth'zul]

Eh, I got it off of VB fourms! lol

[Function]

Wow haha!!! Should of just stuck with the c++ Programmer huh Neth'zul, think you could possibly could without me... Wrong!

[Apoc]

Wow haha!!! Should of just stuck with the c++ Programmer huh Neth'zul, think you could possibly could without me... Wrong!

Ignorance is bliss isn't it?

And Neth'zul, what are you trying to accomplish? I'll write up some quick code to show you the proper way of doing what you're trying to do. (Looks like you're trying to read from a MS Word file)

[Neth'zul]

Man apoc, im trying to make my self a decent web browser with some cool applications and by doing that also learning a bit of vb and god damn rootk3y, who the hell are you? lol