VB 2010,忽略了被占用的Textboxes

时间:2013-05-12 16:25:24

标签: vb.net visual-studio-2010

我有一个处理多次点击的按钮,并将信息导入相关的文本框。我试图这样做,如果一个文本框被占用,那么它将把信息插入下一个可用的框。如果文本框被占用,那么它应该打开表单3,如果没有,那么它将打开poppupform。

如下所示,我尝试此方法的方法是,如果值大于或小于零,则尝试跳过该框。由于某种原因,它不能识别这一点。道歉,我对此很新,并乐于在需要时进一步解释。

Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
        Select Case _Step
            Case 0
                _Step = 1
                If Val(Form1.TextBox6.Text) = 0 Then
                    Dim resistivity As Double
                    resistivity = Val(Me.results.Text)
                    popupform.TextBox4.Text = Convert.ToString(resistivity)
                    popupform.Show()
                    If Val(Form1.TextBox6.Text) <= 0 Or Val(Form1.TextBox6.Text) >= 0 Then
                        Dim resistivity2 As Double
                        resistivity2 = Val(Me.results.Text)
                        Form3.TextBox4.Text = Convert.ToString(resistivity2)
                        Form3.Show()
                        popupform.Close()
                        Exit Select
                    End If
                End If
                Exit Select

1 个答案:

答案 0 :(得分:0)

@ user2375267

将第一个“IF”语句替换为:

If( Not String.IsNullOrEmpty( Form1.TextBox6.Text ) )

然后将内部“IF”的内容移动到新的“Else”语句中。所以它看起来像:

If( Not String.IsNullOrEmpty( Form1.TextBox6.Text ) ) Then

   ...    
   popupform.Show()
   ...

Else

  ...
  Form3.Show()
  ...

End If

这应该检查TextBox6.Text是否有值。如果是,那么它将显示一个表格。如果没有,那么它将显示另一个。