我用PictureBox控件的KeyPress事件做了一个通过键盘控制图片运动的工程，只能按下一个键单方向运动，两键同时按下确无法实现斜方向的运动

我的代码如下：
Private Sub Picture1_KeyPress(KeyAscii As Integer)
Select Case Chr(KeyAscii)
       Case "w"
       Picture1.Top = Picture1.Top - 1
       Case "s"
       Picture1.Top = Picture1.Top + 1
       Case "a"
       Picture1.Left = Picture1.Left - 1
       Case "d"
       Picture1.Left = Picture1.Left + 1
End Select
End Sub
怎样才能实现同时按下w和d键往右上的运动，多谢