文本框未填充VB.net

时间:2012-09-05 20:49:02

标签: vb.net

我正在使用vb.net开发一个简单的桌面应用程序。 fillfeilds是从另一个类调用的公共函数。 正在调用该函数,但文本框的值不会更改。但是当我调用Button1_Click而后调用fillfeild时,例程工作正常。

如果有人能指导我做错了什么,我会非常感激,因为我不明白这种行为。

感谢。

Public Sub fillFeilds()

        FirstNamePri.Text = "lll"
        FirstNamePri.Text = "lll"
        LastNameAlt.Text = "kkkk"


    End Sub


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        FirstNamePri.Text = "lll"

        fillFeilds()
    End Sub

'调用fillfeild()函数的类

  

Public Class MainCust

      Dim cust As New CustInfo
    MainWindow.MainPanel.Controls.Add(cust)

    Dim rec As New Customer

    Dim dataArr As ArrayList = rec.getFirstCust()

    Dim customer As New CustInfo
    customer.fillFeilds(dataArr)


End Sub

End Class

2 个答案:

答案 0 :(得分:1)

您正在创建CustInfo的两个单独实例。您正在显示第一个但不显示第二个。第二个,从未显示的是您实际填充字段的那个。试试这个:

Dim cust As New CustInfo
MainWindow.MainPanel.Controls.Add(cust)
Dim rec As New Customer
Dim dataArr As ArrayList = rec.getFirstCust()
cust.fillFeilds(dataArr)

答案 1 :(得分:0)

如果你从另一个线程中调用另一个线程,你可能会遇到线程问题?也许?但我会尽管它会抛出异常。它是在另一个线程上调用的吗?