status bar help

[BoB]

i have this code and it want work can some one help me

myString = txtWebWrighter.Text
    charCount = Len(myString)
    frmMain.StatusBar1.Panels.Item.Index = 3
    frmMain.StatusBar1.Panels.Item.Text = "Char: " & charCount & " "

the code is exaplinable by its self im tired thanks bye

[Dim]

Did you Dim your string as a string?

Dim myString As String

Hope that was your prob,
D!m

[Ruxpin]

Try this.

Dim myString    As String

myString = txtWebWrighter.Text
charCount = Len(myString)

frmMain.StatusBar1.Panels(3).Text = "Char: " & charCount

Use a key if you can to reference the panel which you set in the properties at design time.

frmMain.StatusBar1.Panels("CHARS").Text = "Char: " & charCount