回答編集履歴
1
直しました。書き方がよくわからなかったので。。。すみません。
test
CHANGED
|
@@ -12,9 +12,11 @@
|
|
|
12
12
|
|
|
13
13
|
2番目のレコードを削除したときには、次のようなプログラムを走らせます
|
|
14
14
|
|
|
15
|
+
```ここに言語を入力
|
|
15
16
|
|
|
16
17
|
|
|
18
|
+
|
|
17
|
-
|
|
19
|
+
Sub 並び順振り直し()
|
|
18
20
|
|
|
19
21
|
|
|
20
22
|
|
|
@@ -64,10 +66,18 @@
|
|
|
64
66
|
|
|
65
67
|
|
|
66
68
|
|
|
69
|
+
Me.Requery
|
|
70
|
+
|
|
71
|
+
|
|
72
|
+
|
|
67
73
|
Err_Renumber:
|
|
68
74
|
|
|
69
75
|
rs.Close
|
|
70
76
|
|
|
71
|
-
|
|
77
|
+
|
|
72
78
|
|
|
73
79
|
End Sub
|
|
80
|
+
|
|
81
|
+
コード
|
|
82
|
+
|
|
83
|
+
```
|