如何在程序运行实现和用户交互？？？在线等

VB.NET 如何实现 在函数中打开窗体A（将后台数据绑定到窗体A上） 让用户选择数据 然后把选择的结果返回函数
当调用这个函数的时候 最后返回用户选择后的结果

参考VB.NET窗体传值相关技巧讲解

'Form1.vb的VB.NET窗体传值代码：
Private Sub Button1_Click
(ByVal sender As Object, 
ByVal e As System.EventArgs) 
Handles Button1.Click  
form2.Instance(Me)  
form2.ShowDialog()  
End sub 

'Form2.vb的VB.NET窗体传值代码：
Private frm1 As Form1  
Public Function Instance
(ByVal frm As Form1)  
frmfrm1 = frm  
End Function

Private Sub Form2_Load
(ByVal sender As Object, 
ByVal e As System.EventArgs) 
Handles MyBase.Load  
Label1.Text = frm1.Label1.Text  
End Sub 

参考：http://bbs.csdn.net/topics/360140208