使用布尔值扩展运算符

Question

我正在尝试将布尔值装箱以在我的代码中共享它。我在使用加宽运算符（C# 中的隐式运算符）来简化事物时遇到问题。

Public Class CancellationToken

    Public Property IsCancelled As Boolean

    Public Shared Widening Operator CType(a As CancellationToken) As Boolean
        Return a.IsCancelled
    End Operator
End Class

以下代码工作正常：

Sub DoIt(IsCancelled As CancellationToken)
    Do Until IsCancelled
        ...
    Loop
End Sub

但此块报告编译时错误：未为类型“CancellationToken”和“Boolean”定义运算符“Or”。

Sub DoIt(IsCancelled As CancellationToken)
    Dim ContentLength As Long = ...
    Do Until IsCancelled OrElse ContentLength = 0
        ...
    Loop
End Sub

显然，ContentLength = 0 被评估为布尔值。鉴于 OrElse 期望每一侧都有一个布尔值，为什么 IsCancelled 不隐式转换为布尔值？

创建 IsTrue、IsFalse、Or 和 And 运算符也无法解决问题。我启用了 Option Explicit 和 Option Strict。

Answer 1

首先，请注意它仅适用于 C#。但是，在这种情况下 VB 编译器可能想要使用 IsTrue/IsFalse 运算符：

重载 Or 和 IsTrue 运算符会影响 OrElse 运算符的行为。

（源）

因此：添加一个 IsTrue() 和 IsFalse()，也许除了一个Or()（尽管我会先尝试不使用Or()）。