accessでブランクを取得したい

質問

フォームをオープンするタイミングであるフィールドのデータの中にブランクがあります。
そのブランク数を計算しテキストボックスに出したい。
以前に”無”の数を計算してテキストボックスに出すVBAを教えてもらいましたが、
そのまねをしてみましたが出来ません。良い知恵を教えてください。
Private Sub Form_Current()
Dim ab As DAO.Recordset
Dim j As Long

Set ab = Me.RecordsetClone
j = 0
ab.MoveFirst
Do Until ab.EOF
If ab!貸与対象者 = "isNull " Then
j = j + 1
End If
ab.MoveNext
Loop
Me!残数 = j
ab.Close: Set ab = Nothing

End Sub
上記のようにしてみましたが、出来ません。
宜しくお願い致します。

貸与対象者→フィールド
○○○○○
×××××
　　　←ブランク
■■■■■

残数→テキストボックス

以上です。

回答No.1

chie65536（@chie65535） · ベストアンサー

If ab!貸与対象者 = "isNull " Then

を

If IsNull(ab!貸与対象者) Then

にします。

元のままだと「貸与対象者のフィールドにisNullという文字列が入っているなら」と言う判定になってしまう。

必要なのは「貸与対象者のフィールドが空欄なのであれば」と言う判定です。

これらの２つは「似ているようでまったく違う」のでご注意を。

お礼

ありがとうございます。大変に助かりました。今後ももしよろしければご指導の程、
何卒、宜しくお願い致します。