如何从1种表单获取数据。
示例:
当用户在inputbox(“”)中输入内容时,在表单1中将数据发送到表单2 /并将其显示在其中。
Sub form1()
InputBox("Enter something " & Num, "Read Names")
form2.show
end sub
答案 0 :(得分:1)
有很多方法可以做到这一点,例如创建一个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()