2

我有两个引用相同表单的按钮,一个允许直接粘贴信息,另一个用于手动输入信息。表格完成后,他们将结果放入文本框中。

发生的情况是,如果输入法混合使用,即某些粘贴或手动输入的按钮变得不同步,例如按钮 1 可能在案例 3 中,按钮 2 将在案例 5 中,因此它们可能会导致结果错误框甚至替换现有结果。

根据下面的代码,是否有一种方法可以引用每个按钮的状态,例如,如果按钮 2 位于案例 3,则打开表单 5(示例)。

Select Case _Step
            Case 0
                _Step = 1
                If String.IsNullOrEmpty(Me.TextBox6.Text) Then
                    popupform.Show()
                Else
                    Form3.Show()
                End If
                Exit Select

            Case 1
                _Step = 2
                If String.IsNullOrEmpty(Me.TextBox7.Text) Then
                    Form3.Show()
                Else
                    loadform3.Show()
                End If

                Exit Select

            Case 2
                _Step = 3
                If String.IsNullOrEmpty(Me.TextBox8.Text) Then
                    loadform3.Show()
                Else
                    loadform4.Show()
                End If
                Exit Select
4

1 回答 1

2
public sub new()
    AddHandler Button1.Click, AdressOf firstclick
end sub

Private Sub firstclick(ByVal sender As System.Object, ByVal e As System.EventArgs) 
    If String.IsNullOrEmpty(Me.TextBox6.Text) Then
                popupform.Show()
     Else
                Form3.Show()
     End If
RemoveHandler Button1.Click, AddressOf firstclick
AddHandler Button1.Click, AdressOf secondclick    
End Sub

Private Sub secondclick(ByVal sender As System.Object, ByVal e As System.EventArgs)
  If String.IsNullOrEmpty(Me.TextBox7.Text) Then
                Form3.Show()
  Else
                loadform3.Show()
  End If
End sub
于 2013-05-13T08:30:33.633 回答