为关联表设计录入窗口

假定订单(父表)和订单明细表(子表)已经建立关联，这样选择某个订单，关联表(订单.订单明细)即可显示此订单的订单明细。
如果希望在关联表(订单.订单明细)双击某个订单明细，能够显示一个录入窗口，用于编辑此订单明细。
此录入窗口的设计和普通录入窗口的设计基本类似

1、首先设计窗口的时候，各文本框需要绑定到关联表(订单.订单明细)的各列，例如下图将TextBox3绑定到此关联表的数量列：

2、窗口中各按钮的代码也应该有所调整：

按钮标题 Click事件代码
删除行 With Tables("订单.订单明细")
    If .Current IsNot Nothing Then
        .Current.Delete
    End If
End With
锁定行 With Tables("订单.订单明细")
    If .Current IsNot Nothing Then
        .Current.Locked = True
    End If
End With
取消锁定 With Tables("订单.订单明细")
    If .Current IsNot Nothing Then
        .Current.Locked = False
    End If
End With
上一行 With Tables("订单.订单明细")
    .Position = .Position - 1
End With
下一行 With Tables("订单.订单明细")
    .Position = .Position + 1
End With

3、最后将订单明细表的DoubleClick事件代码设置为：

If e.Table.Name = "订单.订单明细" Then
   e.Cancel = True '禁止进入编辑状态
   Forms("窗口1").Open()
End If

本页地址：http://www.foxtable.com/webhelp/topics/2497.htm