質問編集履歴
2
誤字修正
test
CHANGED
File without changes
|
test
CHANGED
@@ -24,7 +24,7 @@
|
|
24
24
|
|
25
25
|
|
26
26
|
|
27
|
-
ボタンをクリックすると、IDが2の
|
27
|
+
ボタンをクリックすると、IDが2の「チェックあり」を「チェックなし」にしたい
|
28
28
|
|
29
29
|
|
30
30
|
|
1
誤字修正
test
CHANGED
File without changes
|
test
CHANGED
@@ -10,11 +10,11 @@
|
|
10
10
|
|
11
11
|
ID,Y_N
|
12
12
|
|
13
|
-
1,
|
13
|
+
1,v←チェックマーク
|
14
14
|
|
15
|
-
2,
|
15
|
+
2,v
|
16
16
|
|
17
|
-
3,
|
17
|
+
3,v
|
18
18
|
|
19
19
|
|
20
20
|
|
@@ -38,11 +38,11 @@
|
|
38
38
|
|
39
39
|
rs.Open "テーブル1", CurrentProject.Connection, , adLockOptimistic
|
40
40
|
|
41
|
-
rs.Find "Y_N=" &
|
41
|
+
rs.Find "Y_N=" & True, adSearchForward
|
42
42
|
|
43
|
-
Do While rs!Y_N =
|
43
|
+
Do While rs!Y_N = True
|
44
44
|
|
45
|
-
rs!Y_N =
|
45
|
+
rs!Y_N = False
|
46
46
|
|
47
47
|
rs.Update
|
48
48
|
|