質問編集履歴
1
コードの追記しました。
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -14,9 +14,13 @@
|
|
|
14
14
|
|
|
15
15
|
```
|
|
16
16
|
|
|
17
|
+
Private Sub btn_Click()
|
|
18
|
+
|
|
17
19
|
Me.Filter = "IN > " & 0
|
|
18
20
|
|
|
19
21
|
Me.FilterOn = True
|
|
22
|
+
|
|
23
|
+
End Sub
|
|
20
24
|
|
|
21
25
|
|
|
22
26
|
|