如何查找到内容,突出显示当前行
Dim s1 As String = "查找内容"
For Each c As Col In CurrentTable.Cols
For Each r As Row In CurrentTable.Rows
If r(c.Name) = s1 Then
突出显示当前行
Next