主题：从字符串“True= True And True= True ”到类型“Boolean”的转换无效

不能这样做的。

你要这样做，比如代码

Dim b1 As Boolean = True
b1 = b1 AndAlso "123" = "123"
b1 = b1 AndAlso "abc" = "aaa"
msgbox(b1)

If r("A") <> Nothing AndAlso r("C") <> Nothing Then

    If r("A1") = true AndAlso r("C1") = True Then

    End If

End If

你现在是想问，如何判断当前行的某列的值？

Dim r As Row = Tables("表A").current

If r("第一列") = true andalso r("第二列") = true Then

End If

你到底哪里不会写啊？

Dim r = 当前行

If r("A") <> Nothing Then

    If r("A1") = true Then

    Else

    End If

elseIf r("B") <> Nothing Then

End If

不能用字符串来做代码，认认真真看懂下面的意思

Dim b As Boolean = True
If r("技术服务部") <> "" Then
    b = b AndAlso r("技术服务部审批")
End If
If r("财务部") <> "" Then
    b = b AndAlso r("财务部审批")
End If
If r("综合管理部") <> "" Then
    b = b AndAlso r("综合管理部审批")
End If

msgbox(b)