利用公共变量,我们可以实现在多个模块中引用同一个变量值的功能。
例如,我们在登录界面输入用户名和密码后,可以在主界面显示欢迎用户的标语。


关键技术
如果需要在多个模块中公用一个变量,那么需要利用到标准模块。在标准模块顶部中用public关键词定义的变量,则可以在全局使用。
设计过程
1,建立form1窗体,如下图,该窗体中有2个标签,2个文本框,1个按钮。并将密码对应的文本框的PasswordChar属性设置为"*"。

2,建立form2窗体,如下图,该窗体中只有一个标签。

3,创建一个标准模块,如下图,并在模块中定义全局变量。

Public myName$, password$
4,在form1窗体中编写代码,如下所示。
Private Sub Command1_Click()
myName = Text1
password = Text2
Form2.Show
Unload Me
End Sub
- 2
- 3
- 4
- 5
- 6
5,在form2窗体中编写代码,如下所示。
Private Sub Form_Load()
If myName = "小明" And password = "123" Then
Label1.Caption = "欢迎 " & myName & " 登录系统"
Me.Caption = "登录成功"
Else
Label1.Caption = "用户名或密码不正确"
Me.Caption = "登录失败"
End If
End Sub
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
6,运行程序,并在用户和密码文本框中,填写"小明"和"123",然后点击确定按钮,则可以进入到form2窗体。
思考
我们在编程时,常常会遇到一些公共变量,在一个窗体中获取和改变变量值,而在另外的窗体中引用变量值。那么这种情况,我们就需要利用到本案例中的方法。



















