0
多分それは長い一日だったので......
私はそれを取得しません。
なぜこのコードは「無効な修飾子」メッセージを表示しますか?あなたのエラーへブール値/無効な修飾子を表示
Sub UsingBooleans()
Dim MastNameNew As Boolean
MsgBox "mastnamenew value = " & MastNameNew.Value
End Sub
多分それは長い一日だったので......
私はそれを取得しません。
なぜこのコードは「無効な修飾子」メッセージを表示しますか?あなたのエラーへブール値/無効な修飾子を表示
Sub UsingBooleans()
Dim MastNameNew As Boolean
MsgBox "mastnamenew value = " & MastNameNew.Value
End Sub
:MastNameNew
は"False (0)"
か"True (1)"
としてのみ可能な値を持つブール変数です。したがって、Boolean
のプロパティはありません。 あなたは次に、コードの下に使用し、「偽」またはTrueとしてお答えしたい場合は、以下のコード を見つけてください:
Sub UsingBooleans()
Dim MastNameNew As Boolean
MsgBox "mastnamenew value = " & MastNameNew
End Sub
をそして、あなたは「0」または「1」として答えをしたいならば、以下のコードを使用します。
Sub UsingBooleans()
Dim MastNameNew As Boolean
MsgBox "mastnamenew value = " & CInt(MastNameNew)
End Sub
「MsgBox」mastnamenew value = "&MastNameNew'である必要があります。 – aaa
'MastNameNew'はオブジェクトではなくブール変数で、' .Value'などのプロパティはありません。 – AntiDrondert