str函数

直来直往　发表于：2008-01-04 10:37:42 　

使用str函数需要包含什么库吗？

运行下面代码怎么总是提示我编译错误，找不到工程或库，问题出在哪呢？

Dim rs As Object

    Set rs = Me.Recordset.Clone
    rs.FindFirst "[nUserID] = " & Str(Nz(Me![cboUserName], 0))
    If Not rs.EOF Then Me.Bookmark = rs.Bookmar

竹笛发表于：2008-01-04 11:04:29

先编译一下代码。看看哪一行代码有提示错误。

直来直往发表于：2008-01-04 11:12:24

刚查了一下，是我在引用中有一个提示丢失的引用，我把它取消就好了。

但是对上面这段代码不是很理解，我是借鉴别人的，不知能否给解释一下？

呵呵发表于：2008-01-05 10:36:18

Dim rs As Object

Set rs = Me.Recordset.Clone '对当前数据集进行备份（克隆）
rs.FindFirst "[nUserID] = " & Str(Nz(Me![cboUserName], 0)) '找到第一个符合条件的（非空）记录

If Not rs.EOF Then Me.Bookmark = rs.Bookmar '用复制数据集的书签赋值给当前的数据集，使其取得一致，可以实现同步

上面是我的理解，如有出入，在探讨。

总记录：3篇页次：1/1 9 1 :

Access交流中心