请问在A窗体调用B窗体的时候,如何传递参数?
做一个进销存的软件,要求点击A窗体上某个按钮之后,弹出B窗体,B中列出所有的客户名称供选择,并把选择结果显示在A窗体上。
问题:两个窗体间如何输送和返回参数?
[解决办法]
http://www.programfan.com/article/showarticle.asp?id=2002
[解决办法]
我习惯于这么做:
窗体A
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim frm As New Form2
AddHandler frm.SelectedUser, AddressOf Selected
frm.ShowDialog(Me)
End Sub
Private Sub Selected(ByVal User As String)
MsgBox( "您选择的客户名称为 " + User)
End Sub
End Class
窗体B
Public Class Form2
Public Event SelectedUser(ByVal UserName As String)
Private Sub ListBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.DoubleClick
Dim str As String = ListBox1.Items(ListBox1.SelectedIndex)
RaiseEvent SelectedUser(str)
Me.Close()
End Sub
Private Sub Form2_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
For i As Integer = 0 To 10
ListBox1.Items.Add( "客户 " + i.ToString)
Next
End Sub
End Class
以上仅供参考。呵呵