【Access示例】窗体间参数传递--全局变量

时　间:2017-01-10 08:23:23
作　者:杨雪   ID：42182  城市：南京
摘　要:窗体间参数传递
正　文:

示例下载

先来回顾一下进销存中 怎样用全局变量在窗体间传递参数的？

一．先在模块1中 定义一个全局变量p_strType

二．在出入库管理_单据类型窗体的确定按钮 单击事件里给全局变量赋值。

三．打开编辑窗体，在新增代码处给控件 单据类型赋值。

四．效果图。

演示一个简单的示例：

（1）插入一模块：M_变量

  '在模块中定义全局变量
Public strNum As String

（2）frmOpen窗体，传递按钮单击事件：

Private Sub cmdOpen_Click()
    strNum = Me!商品编码       '使用全局变量获取商品编码
    DoCmd.OpenForm "窗体1"     '打开窗体1
End Sub

（3）窗体1加载事件：

'加载窗体1时，将全局变量值赋给 Text8控件
Private Sub Form_Load()
    Me.Text8 = strNum
End Sub 

动画图：