转换是将一种数据类型转换为另一种数据类型的过程。例如，将整数类型强制转换为字符串类型。VB.NET中的某些操作需要特定的数据类型才能工作。强制转换将创建所需的类型。本系列由两部分组成的第一篇文章，VB.NET中的强制转换和数据类型转换，介绍了强制转换。本文介绍了可用于在VB.NET中强制转换的三个操作符—DirectCast、CType和TryCast—并比较了它们的性能。

何时使用不同的铸造操作

微软和其他文章称，性能是三家铸造运营商之间最大的差异之一。例如，微软通常谨慎地警告说，“DirectCast。。。在转换数据类型对象和从数据类型对象转换数据时，可以提供比CType更好的性能。”（重点已添加。）

我决定写一些代码来检查。

但首先，我要提醒你一句。丹·阿普尔曼（Dan Appleman）是技术书籍出版商Apress的创始人之一，也是一位可靠的技术大师，他曾告诉我，要正确地进行基准测试，要比大多数人意识到的困难得多。有一些因素，如机器性能、其他可能并行运行的进程、内存缓存或编译器优化等优化，以及您对代码实际执行情况的假设中的错误。在这些基准测试中，我试图消除“苹果和橙子”的比较错误，并且所有测试都是使用发布版本运行的。但这些结果仍可能存在错误。如果您注意到任何问题，请告诉我。

三名铸造操作员是：

• 直播
• CType
• TryCast

直播

实际上，您通常会发现应用程序的要求将决定您使用哪个操作符。DirectCast和TryCast的要求非常狭窄。使用DirectCast时，类型必须已知。虽然代码。。。

字符串=DirectCast（对象，字符串）

... 将成功编译，如果对象不是字符串，则代码将引发运行时异常。

trycast

TryCast的限制性更大，因为它对Integer等“值”类型根本不起作用(字符串是引用类型。有关值类型和引用类型的更多信息，请参阅本系列的第一篇文章）。。。

Integer=TryCast（对象，整数）

... 甚至不会编译。

当您不确定正在使用的对象类型时，TryCast非常有用。TryCast并没有抛出像DirectCast这样的错误，而是什么也不返回。通常的做法是在执行TryCast后不进行任何测试。

ctype

只有CType（以及其他“Convert”操作符，如CInt和CBool）将不具有继承关系的类型（如整数）转换为字符串：

Dim theString As String = "1"Dim theInteger As IntegertheInteger = CType(theString, Integer)

这是因为CType使用不属于.NET CLR（公共语言运行库）的“帮助函数”来执行这些转换。

但是请记住，如果字符串不包含可以转换为整数的内容，那么CType也会抛出异常。如果字符串可能不是这样的整数。。。

Dim theString As String = "George"

... 那么铸造操作员就不能工作了。即使TryCast也不能处理Integer，因为它是一种值类型。在这种情况下，您必须使用有效性检查，如运算符的类型，在尝试强制转换数据之前检查数据。

性能测试

Microsoft的DirectCast文档特别提到使用对象类型进行转换，所以这是我在第一次性能测试中使用的。测试从下一页开始！

DirectCast通常使用对象类型，所以这是我在第一次性能测试中使用的。为了在测试中包括TryCast，我还包括了一个If块，因为几乎所有使用TryCast的程序都有一个If块。然而，在这种情况下，它将永远不会被执行。

下面是将对象强制转换为字符串时比较这三种情况的代码：

Dim theTime As New Stopwatch()Dim theString As StringDim theObject As Object = "An Object"Dim theIterations As Integer =CInt(Iterations.Text) * 1000000'' DirectCast TesttheTime.Start()For i = 0 To theIterationstheString = DirectCast(theObject, String)NexttheTime.Stop()DirectCastTime.Text =theTime.ElapsedMilliseconds.ToString'' CType TesttheTime.Restart()For i As Integer = 0 To theIterationstheString = CType(theObject, String)NexttheTime.Stop()CTypeTime.Text =theTime.ElapsedMilliseconds.ToString'' TryCast TesttheTime.Restart()For i As Integer = 0 To theIterationstheString = TryCast(theObject, String)If theString Is Nothing ThenMsgBox("This should never display")End IfNexttheTime.Stop()TryCastTime.Text =theTime.ElapsedMilliseconds.ToString

这项初步测试似乎表明微软的目标是正确的。这是结果(在不同条件下进行的大量和少量迭代以及重复测试的实验与该结果没有任何显著差异。）

DirectCast和TryCast在323毫秒和356毫秒时相似，但CType在1018毫秒时所用的时间是前者的三倍。当转换这样的引用类型时，您需要为CType在性能上的灵活性付出代价。

但它总是这样工作吗？在他们的DirectCast页面中的Microsoft示例主要用于告诉您使用DirectCast什么不起作用，而不是什么会起作用。以下是Microsoft的示例：

Dim q As Object = 2.37Dim i As Integer = CType(q, Integer)' The following conversion fails at run timeDim j As Integer = DirectCast(q, Integer)Dim f As New System.Windows.Forms.FormDim c As System.Windows.Forms.Control' The following conversion succeeds.c = DirectCast(f, System.Windows.Forms.Control)

换句话说，您不能使用DirectCast（或TryCast，尽管这里没有提及）将对象类型强制转换为整数类型，但可以使用DirectCast将表单类型强制转换为控件类型。

让我们检查一下微软的DirectCast示例的性能。使用上面显示的相同代码模板，替换为。。。

c = DirectCast(f, System.Windows.Forms.Control)

... 与CType和TryCast的类似替换一起输入代码。结果有点令人惊讶。

结果

DirectCast实际上是三个选项中速度最慢的，为145毫秒。CType在127毫秒时稍微快一点，但TryCast（包括If块）在77毫秒时最快。我还试着写我自己的东西：

Class ParentClass...End ClassClass ChildClassInherits ParentClass...End Class

我得到了类似的结果。如果不强制转换对象类型，最好不要使用DirectCast。