关于键盘控制方向

Question

Private Sub Form_KeyPress(KeyAscii As Integer)
If Chr(KeyAscii) Like "[a]" Then
    Image1.Move Image1.Left - 20
ElseIf Chr(KeyAscii) Like "[s]" Then
    Image1.Move Image1.Top + 20
ElseIf Chr(KeyAscii) Like "[w]" Then
    Image1.Move Image1.Top - 20
ElseIf Chr(KeyAscii) Like "[d]" Then
    Image1.Move Image1.Left + 20
    
End IfEnd Sub
为什么上下不能控制?还有其它的方法吗？

Answer 1

请问 Like "[a]" 是什么意思 还有其他的表示方法嘛 
我是个新手

Answer 2

比较两个字符串。设置为键盘a,比如你要在text中只能输入a-z的话
Private Sub Form_KeyPress(KeyAscii As Integer)
dim a as boolean
a=chr(keyascii) like "[a-zA-Z]"or keyascii=8
if a=true then
    keyascii=0
endif
end sub
有人回答我的问题吗？谢谢