Question

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

发生的事情是，如果输入方法是混合的，我，一些粘贴或一些手动输入的按钮变得不同步，如按钮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

Answer 1

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

VB两个按钮，多次点击，同步问题

1 个答案: