This is basibly where my doors are drawn on the board
Code:
  Dim door1 As New door(135, 380, 10, 40)
        door1.Draw(g)
        doors.Add(door1)
        Dim door2 As New door(275, 380, 10, 40)
        door2.Draw(g)
        doors.Add(door2)
        Dim door3 As New door(415, 380, 10, 40)
        door3.Draw(g)
        doors.Add(door3)

        'Spawn Trapdoor
        Dim Tdoor4 As New door(500, 275, 40, 10)
        Tdoor4.Trapdoor(g)
        doors.Add(Tdoor4)

        Dim door5 As New door(135, 240, 10, 40)
        door5.Draw(g)
        doors.Add(door5)
        Dim door6 As New door(275, 240, 10, 40)
        door6.Draw(g)
        doors.Add(door6)
        Dim door7 As New door(415, 240, 10, 40)
        door7.Draw(g)
        doors.Add(door7)


        'Spawn Trapdoor
        Dim Tdoor8 As New door(20, 135, 40, 10)
        Tdoor8.Trapdoor(g)
        doors.Add(Tdoor8)

        Dim door9 As New door(135, 100, 10, 40)
        door9.Draw(g)
        doors.Add(door9)
        Dim door10 As New door(275, 100, 10, 40)
        door10.Draw(g)
        doors.Add(door10)
        Dim door11 As New door(415, 100, 10, 40)
        door11.Draw(g)
        doors.Add(door11)


        'Spawn Gold Door
        Dim Gdoor12 As New door(555, 100, 10, 40)
        Gdoor12.Goldendoor(g)
        doors.Add(Gdoor12)
so like somhow i need like to check each each time the nice is rolled to see if it has passed the first door, if it has as question then but the problem i have is if i set it to ask question when its passed the first it will keep asking me every time i roll the nice after that door