Varible not defined [SOLVED]

[Sir Topham Hatt]

I am having so much troble with this bit of code. Says I did not define a varible. May I have some insight on this and what it means. Also how does this work? Sorry I have no idea how to program in VB 6.

>! Private Sub imgButton_Click(Index As Integer)
Dim Buffer As clsBuffer
Dim i As Long

    ' If debug mode, handle error then exit out
    If Options.Debug = 1 Then On Error GoTo errorhandler

    Select Case Index
        Case 1
            If Not picInventory.Visible Then
                ' show the window
                picInventory.Visible = True
                picCharacter.Visible = False
                picSpells.Visible = False
                picOptions.Visible = False
                picParty.Visible = False
                picQuests.Visible = False
                BltInventory
                ' play sound
                PlaySound Sound_ButtonClick
            End If
        Case 2
            If Not picSpells.Visible Then
                ' send packet
                Set Buffer = New clsBuffer
                Buffer.WriteLong CSpells
                SendData Buffer.ToArray()
                Set Buffer = Nothing
                ' show the window
                picSpells.Visible = True
                picInventory.Visible = False
                picCharacter.Visible = False
                picOptions.Visible = False
                picParty.Visible = False
                picQuests.Visible = False
                ' play sound
                PlaySound Sound_ButtonClick
            End If
        Case 3
            If Not picCharacter.Visible Then
                ' send packet
                SendRequestPlayerData
                ' show the window
                picCharacter.Visible = True
                picInventory.Visible = False
                picSpells.Visible = False
                picOptions.Visible = False
                picParty.Visible = False
                picQuests.Visible = False
                ' play sound
                PlaySound Sound_ButtonClick
                ' Render
                BltEquipment
                BltFace
            End If
        Case 4
            If Not picOptions.Visible Then
                ' show the window
                picCharacter.Visible = False
                picInventory.Visible = False
                picSpells.Visible = False
                picOptions.Visible = True
                picParty.Visible = False
                picQuest.Visible = False
                ' play sound
                PlaySound Sound_ButtonClick
            End If
                Case 5
                      If Not picQuests.Visible Then
                  ' show the window
                picInventory.Visible = False
                picCharacter.Visible = False
                picSpells.Visible = False
                picOptions.Visible = False
                picParty.Visible = False
                picQuests.Visible = True

                ' play sound
                PlaySound Sound_ButtonClick
            End If
        Case 6
            If myTargetType = TARGET_TYPE_PLAYER And myTarget <> MyIndex Then
                SendTradeRequest
                ' play sound
                PlaySound Sound_ButtonClick
            Else
                AddText "Invalid trade target.", BrightRed
            End If
        Case 7
            ' show the window
            picCharacter.Visible = False
            picInventory.Visible = True
            picSpells.Visible = False
            picOptions.Visible = False
            picParty.Visible = False
            picQuests.Visible = False
            ' play sound
            PlaySound Sound_ButtonClick
    End Select

    ' Error handler
    Exit Sub
errorhandler:
    HandleError "imgButton_Click", "frmMain", Err.Number, Err.Description, Err.Source, Err.HelpContext
    Err.Clear
    Exit Sub
End Sub

[goku1993]

what does it highlight?

[Sir Topham Hatt]

picQuests.Visible = False

[shadowwulf]

and picQuests exists and has a field for true/false?

[Sir Topham Hatt]

It has one of those picture objects like options, character ones have. Maybe I need to name it right?

[shadowwulf]

if it isnt named "picQuests" then yes… that would cause an error..
When writing the line "picQuests." it should pop up a dropdown with all the options in it and 'Visible' should be there.

[Sir Topham Hatt]

Okay thanks man, found the problem I missed an s in one of them. Gosh I feel like the biggest idiot in the world. Anyways thanks.

[shadowwulf]

least you didnt spent 8 hours before realizing you forgot to out in the last line saying to make your variable equal something…