调用主窗体的组件
利用子窗体事件刷新主窗体的Dataset
[解决办法]
子窗体加一个事件
主窗体
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim child As New Form2
AddHandler child.RefreshEvent, AddressOf RefreshFunc
child.ShowDialog()
End Sub
Private Sub RefreshFunc(ByVal msg As String)
MsgBox(msg)
End Sub
子窗体
Public Event RefreshEvent(ByVal msg As String)
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
RaiseEvent RefreshEvent( "test ")
End Sub
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)
最新版本:20070212
http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html