MDI窗体间的数据传递

来源:互联网 发布:玩手机出车祸数据 编辑:程序博客网 时间:2024/04/30 06:50

MDI窗体间的数据传递与普通窗体间的传递略有不同。普通的窗体可以用以下的方式实现,

 

t2 t3分别是f2,f3下的text控件 
b2是f2下的按钮

f2下

Public Class f2
    Public b As String   ‘定义一个全局变量

    Private Sub b2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles b2.Click
        b = t2.Text 
        f3.Show()
    End Sub
End Class


f3 下

    Private Sub f3_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        t3.Text = f2.b    ’调用f2中的全局变量
    End Sub

 

 

当f2,f3是MDI子窗体时就略有不同了,

 

t2 t3分别是f2,f3下的text控件 
b2是f2下的按钮

f2下

Public Class f2
    Public shared b As String   '定义全局变量时要加shared

    Private Sub b2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles b2.Click
        b = t2.Text
        dim mf3 as new f3
        mf3.MdiParent = f1
        mf3.Show()
    End Sub
End Class


f3 下

    Private Sub f3_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        t3.Text = f2.b
    End Sub

 

一个小小的shared价值好多根头发啊。

 

原创粉丝点击