利用公共变量,我们可以实现在多个模块中引用同一个变量值的功能。
例如,我们在登录界面输入用户名和密码后,可以在主界面显示欢迎用户的标语。
关键技术
如果需要在多个模块中公用一个变量,那么需要利用到标准模块。在标准模块顶部中用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 MeEnd Sub
5,在form2窗体中编写代码,如下所示。
Private Sub Form_Load() If myName = "小明" And password = "123" Then Label1.Caption = "欢迎 " & myName & " 登录系统" Me.Caption = "登录成功" Else Label1.Caption = "用户名或密码不正确" Me.Caption = "登录失败" End IfEnd Sub
6,运行程序,并在用户和密码文本框中,填写"小明"和"123",然后点击确定按钮,则可以进入到form2窗体。
思考
我们在编程时,常常会遇到一些公共变量,在一个窗体中获取和改变变量值,而在另外的窗体中引用变量值。那么这种情况,我们就需要利用到本案例中的方法。