Visual Basic 中的泛型过程
“泛型过程”，也称为“泛型方法”，是用至少一种类型参数定义的过程。 调用代码每次调用该过程时，都可根据其需要修改数据类型。
一个过程之所以成为泛型过程，并不是简单地由于在泛型类或泛型结构中进行定义。 若要成为泛型过程，除了可能采用的所有普通参数外，该过程还必须采用至少一种类型参数。 泛型类或泛型结构中可以包含非泛型过程；而非泛型类、结构或模块中也可以包含泛型过程。
泛型过程可以在它的普通参数列表、返回类型（如果有）和过程代码中使用其类型参数。
类型推断
可以调用泛型过程，而不需提供任何类型变量。 如果以这种方式调用该过程，编译器将尝试确定传递到该过程类型变量中的相应数据类型。 这称为“类型推理”。 下面的代码演示一个调用，编译器推断它会将类型 String 传递给类型参数 t。
Public Sub testSub(Of t)(ByVal arg As t)
End Sub
Public Sub callTestSub()
testSub("Use this string")
End Sub
如果编译器无法从调用的上下文中推断出类型变量，则将报告错误。 此类错误的一种可能原因是数组秩不匹配。 例如，假设您将一个普通参数定义为类型参数的数组。 如果所调用的泛型过程具有不同秩（维数）的数组，则秩不匹配将导致类型推理失败。 下面的代码演示一个调用，其中，二维数组被传递到需要一维数组的过程中。
Public Sub demoSub(Of t)(ByVal arg() As t)
End Sub
Public Sub callDemoSub()
Dim twoDimensions(,) As Integer
demoSub(twoDimensions)
End Sub
只需省略所有类型变量，即可调用类型推理。 如果您提供了一种类型变量，就必须提供所有类型变量。
只有泛型过程才支持类型推理。 无法对泛型类、泛型结构、泛型接口或泛型委托调用类型推理。
示例
说明
下面的示例定义了泛型 Function 过程，用于查找数组中的特定元素。 它定义一个类型参数，并用该类型参数在参数列表中构造两个参数。
代码
Public Function findElement(Of T As IComparable) (
ByVal searchArray As T(), ByVal searchValue As T) As Integer
If searchArray.GetLength(0) > 0 Then
For i As Integer = 0 To searchArray.GetUpperBound(0)
If searchArray(i).CompareTo(searchValue) = 0 Then Return i
Next i
End If
Return -1
End Function
注释
在上例中，需要能够将 searchValue 与 searchArray 中的每个元素进行比较。 为保证具有此能力，上例约束类型参数 T 实现 IComparable 接口。 代码使用 CompareTo 方法取代 = 运算符，这是因为无法保证为 T 提供的类型变量支持 = 运算符。
可以用下面的代码测试 findElement 过程。
Public Sub tryFindElement()
Dim stringArray() As String = {"abc", "def", "xyz"}
Dim stringSearch As String = "abc"
Dim integerArray() As Integer = {7, 8, 9}
Dim integerSearch As Integer = 8
Dim dateArray() As Date = {#4/17/1969#, #9/20/1998#, #5/31/2004#}
Dim dateSearch As Date = Microsoft.VisualBasic.DateAndTime.Today
MsgBox(CStr(findElement(Of String)(stringArray, stringSearch)))
MsgBox(CStr(findElement(Of Integer)(integerArray, integerSearch)))
MsgBox(CStr(findElement(Of Date)(dateArray, dateSearch)))
End Sub
以前对 MsgBox 的调用分别显示“0”、“1”和“-1”。
请参见
任务
如何：定义可对不同数据类型提供相同功能的类 (Visual Basic)