chrisje181
Gebruiker
- Lid geworden
- 23 okt 2008
- Berichten
- 106
Als ik een project opstart en ik wil hem debuggen (F5) dan krijg ik een error.

ik weet waar het aan ligt: heb namelijk een UC (level3a) aangemaakt, als ik die uit mijn map formulier haal (map is een userform) dan doet ie het wel, als ik hem declareer dan gaat ie in error.
Hieronder de code die ikgebruik in map.vb:
Wat is het probleem, en vooral: hoe kan ik het oplossen!!!!!!!!!
Toevoeging: Hij crasht op dezelijn code (map.vb line7)

ik weet waar het aan ligt: heb namelijk een UC (level3a) aangemaakt, als ik die uit mijn map formulier haal (map is een userform) dan doet ie het wel, als ik hem declareer dan gaat ie in error.
Hieronder de code die ikgebruik in map.vb:
Code:
Public Class map
Dim walkingC As Integer = 15
Dim walknext As Boolean
Dim UClvl1 As New level1
Dim UClvl2 As New level2
Dim UClvl3a As New level3a
ElseIf status.currentLevel.Text = "2" Then 'Walk to lvl 3
If Label27.Text = "15" Then
OvalShape1.Location = New Point(137, 55)
ElseIf Label27.Text = "14" Then
OvalShape1.Location = New Point(144, 55)
ElseIf Label27.Text = "13" Then
OvalShape1.Location = New Point(144, 65)
ElseIf Label27.Text = "12" Then
OvalShape1.Location = New Point(144, 75)
ElseIf Label27.Text = "11" Then
OvalShape1.Location = New Point(144, 85)
ElseIf Label27.Text = "10" Then
OvalShape1.Location = New Point(144, 95)
ElseIf Label27.Text = "9" Then
OvalShape1.Location = New Point(144, 105)
ElseIf Label27.Text = "8" Then
OvalShape1.Location = New Point(144, 115)
ElseIf Label27.Text = "7" Then
OvalShape1.Location = New Point(134, 115)
ElseIf Label27.Text = "6" Then
OvalShape1.Location = New Point(124, 115)
ElseIf Label27.Text = "5" Then
OvalShape1.Location = New Point(124, 125)
Form1.lvlPanelMain.Controls.Add(UClvl3a)
End If
Wat is het probleem, en vooral: hoe kan ik het oplossen!!!!!!!!!
Toevoeging: Hij crasht op dezelijn code (map.vb line7)
Code:
Dim UClvl3a As New level3a
Laatst bewerkt: