主题：不包括

例如我们需要在当前表中的公司名称列中，查找包括“湛江”二字的单位：

With CurrentTable
    Dim r As Integer
    r = .FindRow("[公司名称] Like '*湛江*'", .Position + 1, True ) '从当前行开始查找
    If r >= 0 Then '如果找到的话
        .Position = r '定位到找到的行。
    End If
End With
若我们需要在当前表中的公司名称列中，查找不包括“湛江”二字的单位，如何设置代码？