小编She*_*zad的帖子

我试图从一个独立的子程序引用KeyDown事件,并让它循环回原始的独立子程序.

1. 独立子程序启动(DisplayAction - 然后调用KeyDown事件)
2. 进入KeyDown事件(KeyDown然后调用DisplayAction)
3. 回到原始子程序(DisplayAction)并继续循环.

*步骤1和2在我的代码中工作得很好.第3步是问题所在.我的程序没有循环回到独立的子程序.

Public Class frmMain
    Dim RandomNumber As Integer
    Dim RandomNumbers(1000) As Integer
    Dim intAction As Integer
    Dim strAction1 As String = "A"
    Dim strAction2 As String = "B"
    Dim strAction3 As String = "C"
    Dim strAction4 As String = "D"
    Dim i As Integer

    Private Sub frmMain_Load(sender As Object, e As System.EventArgs) Handles Me.Load
        FormLoad(sender, e)
    End Sub

    Private Sub FormLoad(sender, e)

    'Creates random numbers here                    
        DisplayAction(sender, e)
    End Sub

    Public Sub DisplayAction(sender, …