Office中国论坛/Access中国论坛

标题: [求助]求教一段程序 [打印本页]

作者: youchy652 时间: 2005-11-20 17:02
标题: [求助]求教一段程序
在论坛上下载一个示例，其中从子窗体跳转到下一个控件焦点的方法是下面的一段程序实行的，我看不懂，在此向各位求教了。

Private Sub txtDiscount_Exit(Cancel As Integer)

On Error GoTo Error_Routine

Dim rs As Object
Set rs = Me.Recordset.Clone
rs.MoveLast
If StrComp(Me.Bookmark, rs.Bookmark, 0) = 0 Then
      Forms![frmMoveToMainForm]![cboCustomerID].SetFocus
      Forms![frmMoveToMainForm]![subMovetoMainForm].Requery
End If
Exit Sub

Error_Routine:
   MsgBox "You must be on a record with data"
Exit Sub

End Sub

作者: test2000 时间: 2005-11-20 17:55
好像不是移动控件焦点的程序!

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