access2016 VBAについて質問です。

access2016 VBAについて質問です。 テキストボックスの「テキスト0」に10の値を先に入れて、 「テキスト1」の値と比較するために、 ボタンクリックイベントで以下のコードのようなことをしたいのですが、 Private Sub ボタン_Click() Me.テキスト0.Value=10 If Me.テキスト1.Value=Me.テキスト0.Value Then MsgBox "一致します" End If If Me.テキスト0.Value <> Me.テキスト1.Value Then MsgBox "一致しません" End If End Sub 例えば、テキスト1に12を入れるとコード通りメッセージボックスが 「一致しません」になりますが、 テキスト1に10を入れても 「一致しません」になってしまい、「一致します」になりません。 どこかコードが間違っているのでしょうか。 ご教授頂けると幸いです。 よろしくお願いします。

Visual Basic | Microsoft Access53閲覧xmlns="http://www.w3.org/2000/svg">25

ベストアンサー

0

>テキスト1に10を入れても この時の10は文字としての10です。 >Me.テキスト0.Value=10 この時の10は数値の10です。 Me.テキスト0.Value="10" とするか If Me.テキスト1=Me.テキスト0 Then とすれば希望の動作になると思います。

ThanksImg質問者からのお礼コメント

できました。ありがとうございました。

お礼日時:2016/10/17 18:55