其中的case 37 case 38 case39 case 40 什么意思啊

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

  Select Case KeyCode

        Case 37

          If snakemoveDirect(1) <> 0 Then snakemoveDirect(1) = 2

        Case 38

          If snakemoveDirect(1) <> 1 Then snakemoveDirect(1) = 3

        Case 39

          If snakemoveDirect(1) <> 2 Then snakemoveDirect(1) = 0

        Case 40

          If snakemoveDirect(1) <> 3 Then snakemoveDirect(1) = 1

        Case 13            ‘回车可以暂停

          Timer1.Enabled = Not Timer1.Enabled

          If Not Timer1.Enabled Then

选择分析程序，属于程序语言，比较难看得懂，除非你英语比较 牛

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息