質問編集履歴
1
文書の詳細を追加
test
CHANGED
File without changes
|
test
CHANGED
@@ -1,10 +1,10 @@
|
|
1
|
-
フォーム内にコンボボックスを複数作成し、選択できるようにしたのですが、
|
1
|
+
フォーム内にコンボボックスを複数作成(combo_a,combo_b,comb_c)し、選択できるようにしたのですが、
|
2
|
-
文字の追加や削除ができてしまう為、VBAにて下記を設定しました。
|
2
|
+
選択し以外に文字の追加や削除ができてしまう為、VBAにて下記を設定しました。
|
3
3
|
|
4
4
|
```ここに言語を入力
|
5
5
|
Option Compare Database
|
6
6
|
|
7
|
-
Private Sub combo_
|
7
|
+
Private Sub combo_a_KeyDown(KeyCode As Integer, Shift As Integer)
|
8
8
|
|
9
9
|
'Tab,Enter,Esc以外を無効にする
|
10
10
|
If KeyCode <> vbKeyTab And KeyCode <> vbKeyReturn And KeyCode <> vbKeyEscape Then
|
@@ -14,7 +14,7 @@
|
|
14
14
|
End Sub
|
15
15
|
```
|
16
16
|
|
17
|
-
実際に、こちらを行えば入力等できなくなったのですが、同じ操作を
|
17
|
+
実際に、こちらを行えば入力等できなくなったのですが、同じ操作を他のコンボボックスでも
|
18
18
|
行いたい場合に同じものを何個も入力するのではなく、1つにまとめてできないものかと考えました。
|
19
19
|
|
20
20
|
もし方法がございましたらご教示いただきたく存じます。
|