1.在工程属性中设置启动对象为"Sub Main"
2.新建一个模块(.bas文件)
3.在模块中设置全局变量
4.在模块中添加:
Sub Main()
变量初始化语句
原来的启动窗体.Show
End Sub
模块里加 Private a As Integer '声明全局变量a
N修改为form1.N即可。
VB可以在标准模块声明一个全局变量。也可在某个窗体的通用代码中声明一个全局变量。
1)标准模块(文件扩展名为 .BAS)是应用程序内其它模块访问的过程和声明的容器。它们可以包含变量、常数、类型、外部过程和全局过程的全局(在整个应用程序范围内有效的)声明或模块级声明。
2)使用Public 语句声明模块级(通用部分)使用 Public 语句,来显式声明公用的变量。
Public Number As Integer '公用的整数变量。
Public NameArray(1 To 5) As String '公用的字符串数组变量。
3)在窗体模块中声明的全局变量,在程序的其它部分使用需要加窗体名做前缀。
例:
在Form1窗体的通用部分声明的全局变量A,
Public A as String
在Form2中使用,
Text1.Text = Form2.A