小编use*_*603的帖子

过早取消While循环

我正在使用While循环,它根据用户输入的值循环一定数量的循环(1-576).它由用户单击"开始"按钮激活,但我希望能够使用"Escape"键取消它.

但是,当循环进行时,我无法让程序识别任何按键.

Private Sub OnGlobalKeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles kh.KeyDown

        lblInput.Text = String.Format("'{0}' Code:{1}", e.KeyCode, CInt(e.KeyCode).ToString())


        If e.KeyCode = CType(27, Keys) Then
                    count = 0
                    loops = 0
        End If
    End Sub
Run Code Online (Sandbox Code Playgroud)

我的循环

Private Sub RUNLOOP()
            While loops >= 1
                  ' my code that runs in the loop
                  loop = loop - 1
            End While
End Sub
Run Code Online (Sandbox Code Playgroud)

当循环运行时,我的按键不会注册,否则它们会正常注册.

vb.net loops while-loop

2
推荐指数
1
解决办法
1334
查看次数

标签 统计

loops ×1

vb.net ×1

while-loop ×1