以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  指定行为当前行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=157660)

--  作者:zhuxinhui
--  发布时间:2020/10/24 16:05:00
--  指定行为当前行
Dim ymm  = Forms("帐簿查询").Controls("DropBox1").value
With Tables("科目表")
    Dim r As Integer
    r = .Find("ymm", 0, "科目编码", False, False, True)
    If r > - 1 Then \'如果找到符合条件的行
        .Position = r \'则选择该行
    End If
End With


这段代码的  r = .Find("ymm", 0, "科目编码", False, False, True)中的YMM需要怎样写才行


--  作者:有点蓝
--  发布时间:2020/10/24 16:48:00
--  
这个是变量,不需要双引号

r = .Find(ymm, 0, "科目编码", False, False, True)

--  作者:zhuxinhui
--  发布时间:2020/10/26 9:52:00
--  
多谢