vb编程问题 把form1里面Text1如何复制到一个变量

来源：百度知道 编辑：UC知道 时间：2024/06/04 02:30:49
vb编程问题
把form1里面Text1如何赋值到一个变量，这个变量无论在任何时候都可以调用
我尝试编辑一个过程放入到模块中，却无用！
Public Sub fuzhi()
zongzijin = Val(Form1.Text1.Text)
End Sub
但是调用的结果就是没有

请问高手帮忙菜鸟啊！

要是想在一个模块内的任何地方可以使用，请这样：
在一个模块的最上方写：
Private zongzijin as long

然后在Form1_Load()中写：
zongzijin= Val(Form1.Text1.Text)

要是想在整个程序中的任一个角落都可以使用，只把上面的Private 改成Public 即可。

嗯，您可以试下。

'这样写试一试
Public Function zongzijin() As Variant
zongzijin = Val(Form1.Text1.Text)
End Function

你还要对zongzijin定义，定义成全局变量