0

我如何从一种形式获取数据到另一种形式。

例子:

在表单 1 中,当用户在 inputbox("") 中输入内容时,将数据发送到表单 2/并在其中显示。

Sub form1()
  InputBox("Enter something " & Num, "Read Names")
  form2.show
end sub
4

1 回答 1

2

有很多方法可以做到这一点,例如创建一个 form2 的实例,并在显示它之前设置它的一个控件的属性。如果 form2 有一个名为 Label1 的标签控件:

    Dim userName As String = InputBox("Whats your name?")

    Dim infoForm As New Form2
    infoForm.Label1.Text = userName
    infoForm.ShowDialog()

根据您的评论,您可以像设置标签一样将字符串添加到列表框中:

    Dim userName As String = InputBox("Whats your name?")

    Dim infoForm As New Form2
    infoForm.lstItinerary.Items.Add(usersName)
    infoForm.ShowDialog()    
于 2012-12-06T14:18:18.170 回答