奇怪的 VB.Net 行为答案

【问题标题】：weird VB.Net behavior奇怪的 VB.Net 行为
【发布时间】：2014-02-06 10:03:45
【问题描述】：

我在 vb.net 中有这个程序，它使用文本框和标签将第一个表单上的文本打印到第二个表单..它工作正常..但是当我传输第二个表单的文本和标签时从第一种形式到第三种形式它给了我一个错误这是我的代码提前感谢您的帮助:)

    Public Class Form3
    Private frm2 As New Form2
    Private xfrm3 As New Form4
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim label21 As Label = New Label
        frm2.Label21.Text = label21.Text
        Dim label22 As Label = New Label
        frm2.Label22.Text = label22.Text
        Dim textbox1 As New TextBox
        Dim textbox2 As New TextBox
        If textbox1.Text = frm2.Label22.Text And textbox2.Text = frm2.Label24.Text Then

            xfrm3.Label1.Text = xfrm3.Label1.Text + 1
            Form4.Show()
            Me.Hide()
        End If

    End Sub
End Class

再次感谢:) 编辑：现在没有错误消息，但是当我单击按钮时没有任何反应

【问题讨论】：

错误信息在哪里？
现在没有错误信息，但是当我点击按钮时没有任何反应
@Nidzaaaa 先生，请看我更新的帖子，谢谢 :)
@2GDev 先生，请参阅我更新的帖子，谢谢！ :)
您的代码没有多大意义（语义上）。这不是您通常创建控件的方式，它们甚至不会放置在表单上。新的 TextBox 实例的 Text 属性将没有任何值，从而使您指定的条件永远不可能为真。您必须设置 textbox1.Text = label21.Text 才能让它在这种情况下工作。您还想使用xfrm3.Show() 而不是Form4.Show()。希望这会有所帮助，祝你好运！

标签： vb.net winforms

【解决方案1】：

没有任何事情发生，因为：

If textbox1.Text = frm2.Label22.Text And textbox2.Text = frm2.Label24.Text Then

不满足。我认为第二个条件不“正确”

textbox2.Text = frm2.Label24.Text Then

textbox2.Text 可能是空的，因为刚刚创建，但 frm2.Label24.Text 具有不同的值。

我无法完全理解您的代码...尝试在您的文本框对象上设置一个明确的名称并给调试机会...也许可以帮助您。

【讨论】：