初学者请问:在用户控件中如何定义全局变量或是引用其它窗体的变量

菜鸟请教:在用户控件中怎么定义全局变量或是引用其它窗体的变量?
学习例子中有个用户控件和模块,我想在窗体中得到用户控件中的一些参数,请教如何才能在窗体中使用用户控件中定义的变量?
------解决方案--------------------

'以下是类或控件中增加属性的示例,即在其它引用的此类或控件的窗体\类\控件中对数据进行读取值

'以下示例在其它窗体\模块中对引用了此类的数据Data进行操作

''增加一个类,类名 Class1 , 以下代码在类中


Private Data As String '申明要操作的数据 采用私有



'读取Data的数据

Public Property Get Value() As String

   Value = Data

End Property


'对Data进行赋值

Public Property Let Value(ByVal vNewValue As String)

   Data = vNewValue

End Property





'以下是引用的窗体或类或模块中的代码


Private NewClass1 As New Class1


Private Sub Express()

    NewClass1.Value = "示例数据" '

    MsgBox NewClass1.Value

End Sub