status bar help

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

Code:

---

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

Did you Dim your string as a string?

Code:

---

Dim myString As String

---

Hope that was your prob,
D!m

Try this.

Code:

---

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.

Code:

---

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

---