Office中国论坛/Access中国论坛

标题: [求助]下面的vba语句是干啥用的,能解释一下吗? [打印本页]

作者: beaccesssuper    时间: 2007-4-11 16:50
标题: [求助]下面的vba语句是干啥用的,能解释一下吗?
谢谢拉
Set db = CurrentDb
Set frm = Forms!frmEditsample!edit_sub.Form
    Set rs = Me.RecordsetClone
    rs.MoveFirst
    Do Until rs.EOF
        If rs!idlamp = Me!idlamp Then
        Me!txtFile_No = frm!txtFile_No
            rs.Close
            Exit Do
        End If
    rs.MoveNext
    Loop
作者: tz-chf    时间: 2007-4-11 21:24
没必要这么复杂,用dlookup找一下就可以了。
作者: beaccesssuper    时间: 2007-4-11 22:26
指点一下,谢啦

[此贴子已经被作者于2007-4-13 16:55:06编辑过]






欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3