|
有難うございます。
>On Error 文は作成を終結してエラーが無いことを
>確認できるまでコメントかした方がいいです。
はい。処理を完成するまでコメント化します。
>おそらく Null ではなく 長さゼロの文字列が入力されると
>判定されないのでは?
>
>>If Nz(Me!記入者,"") = "" Then
>
>このように Nz関数に変更するとどうなりますか?
思い通りに処理が動きました。何故何も入力していない
のにNULLではなく、長さゼロの文字列が入力されてしまうの
でしょうか。
以上、ご教授をお願いします。
▼Nao さん:
>まず、エラーチェック等は処理の中ではなく
>処理開始時にチェックするべきです。
>
>On Error 文は作成を終結してエラーが無いことを
>確認できるまでコメントかした方がいいです。
>
>>Private Sub コマンド20_Click() 'レコード追加処理
>>
>>Dim Cn As ADODB.connection
>>Dim Rs As ADODB.Recordset
>
>>On Error GoTo Err_コマンド20_Click
>>
>>If IsNull(Me!記入者) Then
>> MsgBox "入力が不十分です!!"
>> DoCmd.GoToControl "記入者"
>> Exit Sub
>>End If
>
>質問の件について・・・
>おそらく Null ではなく 長さゼロの文字列が入力されると
>判定されないのでは?
>
>>If Nz(Me!記入者,"") = "" Then
>
>このように Nz関数に変更するとどうなりますか?
|
|