office交流网--QQ交流群号

Access培训群:792054000         Excel免费交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

Access窗体之间控件的传值三种方式

2017-10-16 17:27:00
tmtony8
原创
14744

Access窗体间的数据是如何传递的?前面有发过子窗体的数据传递。今天讲解3种方法传递窗体里的数据:

如有窗体“传递窗体”和“接收窗体”两个窗体,通过“传递窗体”控件的值传给“接收窗体”的控件。




方法一:

打开窗体后,直接用打开的窗体的控件值等于当前窗体的控件值

Forms("接收窗体").控件= Me.控件


方法二:


通过openform方法的最后一个参数openargs将值传递过去。

openform最后参数等于文本框的值,打开“接收窗体”的open事件:控件值= Me.OpenArgs


方法三:

用全局变量。在模块定义一个全局变量,这里是“Public strName As String

再将“传递窗体”的控件值赋给strName .  然后在窗体2的加载事件中将strName 赋值给“接收窗体”的控件。




传递窗体代码:

Private Sub Command6_Click()
    DoCmd.OpenForm "接收窗体", , , , , , Me.Text2
    Forms("接收窗体").Text0.Value = Me.Text0
    strName = Me.Text4
    
End Sub


接收窗体代码:

Private Sub Form_Load()
    Me.Text8 = strName
End Sub

Private Sub Form_Open(Cancel As Integer)
    Me.Text6 = Me.OpenArgs
End Sub


模块代码

Public strName As String


其中“传递窗体”的文本框值分别为:“Text0”,“Text2”,“Text4”

其中“接收窗体”的文本框值分别为:“Text0”,“Text6”,“Text8

    分享