以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- FindRow的用法 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=161278) |
-- 作者:lisangyu -- 发布时间:2021/3/11 21:46:00 -- FindRow的用法 ElseIf nd.level = 1 Then With Tables("知识文档") Dim r As Integer r = .FindRow("[二级目录] Like \'%" & nd.Text & "%\'" And "[一级目录] Like \'%" & nd.ParentNode.Text & "%\'") \'从第一行开始查找 If r >= 0 Then \'如果找到的话 Messagebox.show("目录内包含文件,禁止删除目录!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) Else DataTables("目录表").DeleteFor("一级目录 = \'" & pth(0) & "\' And 二级目录 = \'" & pth(1) & "\'") nd.Delete() tr.Select() End If End With 蓝总:FindRow 多个条件进行查找 该怎么写?
|
-- 作者:lisangyu -- 发布时间:2021/3/11 21:58:00 -- 解决了,用“”把两个条件放到一起,不然会被当成RowStart ,所以报错 |