Error RESOLVED

**Ricky1** · Oct 29th, 2005, 05:56 PM

I have a InputBox

Code:

StrVar = InputBox("Add A Base Word To The List", "Add Word To list")

If i decide i don't wana add a word and click cancel it errors.

How i stop this ??

**dglienna** · Oct 29th, 2005, 05:58 PM

It doesn't error because of that. What is the next line that it processes, or the line of the error?

**Joacim Andersson** · Oct 29th, 2005, 05:59 PM

If you press Cancel the InputBox returns an empty string so you should check for that.

**Ricky1** · Oct 29th, 2005, 06:00 PM

lstRoot.AddItem StrVar

is next line.

**Ricky1** · Oct 29th, 2005, 06:01 PM

do i have to say something like

Code:

if Len(StrVar) = 0 Then Exit Sub

??

**Joacim Andersson** · Oct 29th, 2005, 06:02 PM

I really can't see that you would get an error message, but it would add an empty string to the ListBox.

VB Code:

StrVar = InputBox("Add A Base Word To The List", "Add Word To list")
If Len(StrVar) > 0 Then
    lstRoot.AddItem StrVar
End If

Thread: Error RESOLVED