質問するログイン新規登録

質問編集履歴

1

キーコードが間違えてました

2017/04/11 06:48

投稿

VB_Beginner
VB_Beginner

スコア19

title CHANGED
File without changes
body CHANGED
@@ -10,21 +10,21 @@
10
10
  ```
11
11
 
12
12
  上記コードは正常に動作します。
13
- リターンキーの他に↓キー(コードは32)を入力されても動作するように
13
+ リターンキーの他に↓キー(コードは40)を入力されても動作するように
14
14
  'リターンキーが押下された時に検索処理を呼ぶ処理
15
15
  ```visual basic
16
16
  Private Sub ShohinCode_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TokuiSakiCode.KeyPress
17
17
  Console.WriteLine(e.KeyChar)
18
- If e.KeyChar = Chr(13) Or e.KeyChar = Chr(32) Then
18
+ If e.KeyChar = Chr(13) Or e.KeyChar = Chr(40) Then
19
19
  searchItemByCode()
20
20
  End If
21
21
  End Sub
22
22
 
23
23
  ```
24
24
  と書き換えると、リターンキーは拾うのですが↓キーは拾ってくれません。
25
- これをスペースキー(コードは40)に書き換えると
25
+ これをスペースキー(コードは32)に書き換えると
26
26
  ```visual basic
27
- If e.KeyChar = Chr(13) Or e.KeyChar = Chr(40) Then
27
+ If e.KeyChar = Chr(13) Or e.KeyChar = Chr(32) Then
28
28
  ```
29
29
  スペースキーは拾って処理をしてくれます。
30
30