-
can someone please tell me whats wrong:
Code:
Private Sub Command3_Click()
If txtuser.Text = Label2.Caption Then
If txtpass.Text = Label3.Caption Then
End
Else
If txtpass.Text = "ZQXWCEVRBT" Then
End
Else:
If Shape1.BackColor = &H8000000F Then
Shape1.BackColor = &HC0C0FF
Label6.ForeColor = &HFF&
Else
If Shape2.BackColor = &H8000000F Then
Shape2.BackColor = &HC0C0FF
Label7.ForeColor = &HFF&
Else
If Shape3.BackColor = &H8000000F Then
Shape3.BackColor = &HC0C0FF
Label8.ForeColor = &HFF&
Else
If Shape4.BackColor = &H8000000F Then
Shape4.BackColor = &HC0C0FF
Label9.ForeColor = &HFF&
End If
End If
End If
End If
End If
End If
End If
End Sub
I'm sure that this is simple, but I'm not sure what I'm doing wrong I'm thinking that maybe I cant put a IF after a ELSE:
please help
-
Code:
Private Sub Command3_Click()
If txtuser.Text = Label2.Caption Or txtpass.Text = Label3.Caption Or txtpass.Text = "ZQXWCEVRBT" Then End
If Shape1.BackColor = &H8000000F Then
Shape1.BackColor = &HC0C0FF
Label6.ForeColor = &HFF&
ElseIf Shape2.BackColor = &H8000000F Then
Shape2.BackColor = &HC0C0FF
Label7.ForeColor = &HFF&
ElseIf Shape3.BackColor = &H8000000F Then
Shape3.BackColor = &HC0C0FF
Label8.ForeColor = &HFF&
ElseIf Shape4.BackColor = &H8000000F Then
Shape4.BackColor = &HC0C0FF
Label9.ForeColor = &HFF&
End If
End Sub
Hopefully that'll work.
-
sorry, it doesn't work
what it is, is 4 circles with labels inside them, and the person has 4 guesses to get a name
and the first time he gets it wrong, the first circle becomes a brite color
the second time he gets it wrong, the second circle becomes a brite color, and the firts circle remains brite
but now none of the circles are changing colors
and also, if you can look at the post labeled CD TRACK or something on the first page of the posts, you were giving me help with a cd player, and i need more help with it, I posted another thing there that asks what I do the the 2line
thanks in advance
