主子窗体(两个子窗体)显示

时　间:2013-05-16 16:20:58
作　者:小赵   ID：30394  城市：兰州
摘　要:http://www.accessoft.com
正　文:

在主窗体的“采购订单号”的获得焦点事件里面
Private Sub 采购订单号_GotFocus()
    On Error GoTo Err_采购订单号_GotFocus:
    Me.Parent.Form.cgddid = Me.采购订单号   '这一行要加，让父窗体的cgddid文本框获值 (要在主窗体里面加个文本框控件，名称写为cgddid)

    selectstr = Me.采购订单号
    Forms!usysfrmMain!labFind.Tag = 1
    Forms!usysfrmMain!btnEdit.Tag = 999
Exit_采购订单号_GotFocus:
    Exit Sub
Err_采购订单号_GotFocus:
    Resume Exit_采购订单号_GotFocus
End Sub