Question

VB 如何设置全局变量

两个窗体，第一个窗体有一个组合框，组合框选中的内容赋值给一个全局变量N。在第二个窗体里面会用到这个N。
我是这么做的，但结果不行。要怎么改？
建立一个模块。public N as string
第一个窗体：N=“& combo1.text &”
第二个窗体：
Dim rs As New ADODB.Recordset
rs.Open " select * from 学生信息 where 学号=N", Cnn
提示上面这句出问题。

Answer 1

1.在工程属性中设置启动对象为"Sub Main"
2.新建一个模块(.bas文件)
3.在模块中设置全局变量
4.在模块中添加：
Sub Main()
变量初始化语句
原来的启动窗体.Show
End Sub

Answer 2

模块里加 Private a As Integer '声明全局变量a

Answer 3

N修改为form1.N即可。

Answer 4

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