FindRow的用法 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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

此主题相关图片如下：微信截图_20210311214022.png

蓝总：FindRow 多个条件进行查找该怎么写？

主题：FindRow的用法