수다닷컴

private Sub Form_KeyPress(KeyAscii As Integer)
Char = Chr(KeyAscii)

If Char = Enter Then
Command1_Click
End If
If Char = j Then
Command2_Click
End If
If Char = J Then
MsgBox caps lock이 켜저있어요
End If
If Char = s Then
Command5_Click
End If
If Char = S Then
MsgBox caps lock이 켜저있어요
End If
If Char = m Then
Command7_Click
End If
If Char = M Then
MsgBox caps lock이 켜저있어요
End If

If Char = c Then
Command4_Click
End If
If Char = C Then
MsgBox caps lock이 켜저있어요
End If
End Sub
다른 것들은 잘됩니다......그러나 Enter이것만 유일하게 안되내요.......왜그런가요?

신청하기