Boolen Variable
10.03.2005 11:57:16
Sergej
Bitte um Hilfe!!!!
Wo liegt meine Denkfehler?
'##### UserForm
Dim Weg As Boolean
Private Sub cmdYes_Click()
Weg = True
Call pruefen
End Sub
Private Sub cmdNo_Click()
Weg = False
Call pruefen
End Sub
'######## Modul1
Dim Weg As Boolean
Sub pruefen()
If Weg = True Then
MsgBox ("True")
Else:
MsgBox ("False")
End If
End Sub
Warum meldet der MSgBox nur "False"?