vba 窗体 变量

两个窗口：代码如下：
'userform1下：
Public sub a1（）
TextBox1.Value = Application.GetOpenFilename("xls文件 (*.xls), *.xls, 所有文件 (*.*), *.*")
endsub

'userform2下：
Public sub a2（）
xlBook = Workbooks.Open(filetoopen)

xlBook2=xlBook+count1
endsub

'模块代码：
Public filetoopen ，count1
Public sub a3（）
filetoopen = UserForm1.TextBox1.Value
count1= Application.Workbooks.Count

（userform1没有unload）

在userform2，取不到filetoopen和count1的值。 大家看看这是什么原因？
按f8跟踪进去，是先userform1 然后模块 然后userform2的
过程都执行了
在userform2还是取不到filetoopen和count1的值

vba的窗体中如何添加菜单？ Excel VBA怎样为变量赋值 VC/MFC 窗体变量传递问题 VB全局变量、窗体级变量、函数级变量？ EXCEL VBA中如何用变量引用单元格 vb中获得另一个窗体的变量的值 如何进行delphi变量的窗体间传送 C#.net 两个窗体间如何传递变量？ vb 不同窗体之间如何传递参数或者变量？ vb如何定义两个窗体都能用的变量,数组??