2017-12-13 4 views
0

Vielleicht weil es ein langer Tag war ......
Ich verstehe es nicht.
Warum gibt mir dieser Code eine 'ungültige Qualifier' msg?Anzeige boolescher Wert/ungültiger Qualifier

Sub UsingBooleans() 
Dim MastNameNew As Boolean 
MsgBox "mastnamenew value = " & MastNameNew.Value 
End Sub 
+2

Es sollte "MsgBox" mastnameew value = "& MastNameNew" sein. – aaa

+0

'MastNameNew' ist eine boolesche Variable, kein Objekt, keine Eigenschaften wie' .Value'. – AntiDrondert

Antwort

0

Um Ihre Fehler: MastNameNew ist eine Boolesche Variable mit nur möglichen Wert als "False (0)" oder "True (1)". Es sind also keine Eigenschaften für eine Boolean verfügbar. finden Sie den Code unten Wenn Sie als „False“ beantworten wollen oder True Then Code unten verwenden:

Sub UsingBooleans() 
Dim MastNameNew As Boolean 
MsgBox "mastnamenew value = " & MastNameNew 
End Sub 

Und wenn Sie die Antwort als „0“ oder „1“, dann den Code unten verwenden möchten:

Sub UsingBooleans() 
Dim MastNameNew As Boolean 
MsgBox "mastnamenew value = " & CInt(MastNameNew) 
End Sub