りんご
2021/09/04 (土) 15:45:43
c564b@0e907
取引先コードを入力して更新後処理イベントを発生させるけれど、Msgbox、例えば、「Msgbox"更新後、使用可能になりました"」と「Msgbox"更新後、使用不可能になりました"」のどちらも出てこない。
もしそうであるならば、更新後イベントのコードが期待通りに動いていないように見えるので、条件式等を簡略化して、If構文を制御出来るように試行錯誤するのですが。
Public Sub 取引先コード_AfterUpdate()
Msgbox Me.取引先コード.Value
If Me.取引先コード.Value = 1 Then
Msgbox “取引先コードは、1です。”
Else
Msgbox “取引先コードは、1ではありません。”
End If
End Sub
返信の際は、『Msgbox Me.取引先コード.Valueのメッセージ』も教えて下さい。
通報 ...