Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/16.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb.net VB 2010,忽略已占用的文本框_Vb.net_Visual Studio 2010 - Fatal编程技术网

Vb.net VB 2010,忽略已占用的文本框

Vb.net VB 2010,忽略已占用的文本框,vb.net,visual-studio-2010,Vb.net,Visual Studio 2010,我有一个按钮,可以处理多次单击并将信息导入关联的文本框。我正在尝试这样做,如果一个文本框被占用,那么它会将信息插入下一个可用的框中。如果文本框已被占用,则应打开表单3,如果未被占用,则将打开弹出表单 我尝试这样做的方式如下所示,如果值大于或小于零,则尝试跳过该框。出于某种原因,它没有确定这一点。抱歉,我对这一点还不熟悉,如果需要的话,我很乐意进一步解释 Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As Syst

我有一个按钮,可以处理多次单击并将信息导入关联的文本框。我正在尝试这样做,如果一个文本框被占用,那么它会将信息插入下一个可用的框中。如果文本框已被占用,则应打开表单3,如果未被占用,则将打开弹出表单

我尝试这样做的方式如下所示,如果值大于或小于零,则尝试跳过该框。出于某种原因,它没有确定这一点。抱歉,我对这一点还不熟悉,如果需要的话,我很乐意进一步解释

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
Private子按钮7\u单击(ByVal sender作为System.Object,ByVal e作为System.EventArgs)处理按钮7。单击
选择Case\u步骤
案例0
_步骤=1
如果Val(Form1.TextBox6.Text)=0,则
双折射率
电阻率=Val(Me.results.Text)
popupform.TextBox4.Text=Convert.ToString(电阻率)
popupform.Show()
如果Val(Form1.TextBox6.Text)=0,则
暗电阻2为双电阻
电阻率2=Val(Me.results.Text)
Form3.TextBox4.Text=Convert.ToString(电阻2)
表格3.Show()
popupform.Close()
退出选择
如果结束
如果结束
退出选择
@user2375267

将第一条“如果”语句替换为:

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是否有值。如果是,那么它将显示一种形式。如果没有,则它将显示另一个。

使用
If String.IsNullOrEmpty(Form1.TextBox6.Text),然后使用
替换。感谢您的快速响应,但它似乎仍然忽略If String.TextBox6.Text=0。代码是否进入内部If块?乍一看,TextBox6似乎总是与该表达式匹配,因为如果它为空,它将为零,但如果它有一个值,那么它将小于或大于。我明白你的意思,我正在尝试让它像这样工作:使用文本框6,如果它为空,则打开一个表单,如果没有,则打开另一个表单。很高兴提供帮助。如果您认为答案合适,请记住将其标记为答案。