アクセスVBAでADOからYes/No型の操作ができない

質問

超初心者ですいません

レコードセットにADOで接続して
Yes/No型のフィールドを操作したいのですが
たとえばCHKというYes/No型フィールドがあったとして

rs!CHK = 0
とか
rs!CHK = false
とかやっても全くダメです。

どうにかして操作できないでしょうか？？
教えてください！！

回答No.2

imogasi · ベストアンサー

アクセスでは、Yes は -1、　No は 0 になります。
ーー
下記で捉えられたが。
フィールド4はYES/No型です。
ーー
Sub test22()
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Set cn = New ADODB.Connection
Set cn = CurrentProject.Connection
Set rs = New ADODB.Recordset
Set rs = cn.Execute("テーブル1")
While Not rs.EOF
If rs!フィールド4 Then
MsgBox rs!氏名 & "=" & rs!フィールド4
End If
rs.MoveNext
Wend
Set rs = Nothing
Set cn = Nothing
End Sub
ーー
チェックのあるレコード分だけ表示されました。
If rs!フィールド4 = -1 Thenでも同じ。
違う質問ですか。

回答No.1

kmetu

rs.Updateを最後に実行してますか？