Office中国论坛/Access中国论坛

标题: 定位问题？ [打印本页]

作者: fxtest 时间: 2006-12-27 04:16
标题: 定位问题？
各位高手帮一下，

　　　打开窗体１双击窗体１子窗体的第二记录，打开窗体２会移到第二记录，这样效果怎样能达到．[attach]22311[/attach]

作者: wuaza 时间: 2006-12-27 04:45
下一个示例使用 RecordsetClone 属性和 Recordset 对象来实现记录集内的记录和窗体当前记录的同步。当从组合框中选择公司名称时，使用 FindFirst 方法来定位该公司的记录，同时 Recordset 对象的 DAO Bookmark 属性将分配给该窗体的 Bookmark 属性，使窗体显示找到的记录。

Sub SupplierID_AfterUpdate()
Dim rst As Recordset
Dim strSearchName As String
Set rst = Me.[b]RecordsetClone[/b]
strSearchName = Str(Me!SupplierID)
rst.FindFirst "SupplierID = " & strSearchName
If rst.NoMatch Then
MsgBox "Record not found"
Else
Me.Bookmark = rst.Bookmark
End If
rst.Close
End Sub

复制代码

<SCRIPT language=JScript src="../links/ofvbanl.js">

</script>

复制代码

作者: fxtest 时间: 2006-12-27 23:30
多谢！！

作者: fxtest 时间: 2006-12-27 23:34
能否帮我写个例子？

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)