在一个窗体中创建的变量如何能让其他窗体访问？

Question

如：
form1中有变量定义：
dim a as interger
....form2中可以对form1的变量引用：
...
a=10
msgbox a
...'请问如何实现啊？

Answer 1

要在模块中用public定义才行.
public a as interger
也可以在窗体中用public定义,比如在form1中定义  public a as interger
那么其它窗休就要用  msgbox form1.a  这样来读了.在模块中用public定义的,在其它窗体上就可以直接  msgbox a

Answer 2

如：
form1中有变量定义：
public a as interger
....form2中可以对form1的变量引用：
...
form1.a=10
msgbox form1.a...

Answer 3

第一促方式：使用属性处理
Dim MM_ID As Integer ''模板编号
Public Property Let Sub_MMID(p_MM_ID As Integer)
   MM_ID = p_MM_ID
End Property
Public Property Get Sub_MMID() As Integer
   Sub_MMID = MM_ID
End Property
则可以这样用：如Form1.Sub_MMID="值"第二种方式：（不推荐）
public MM_ID as Integer
则可以这样用：如Form1.MM_ID="值"