日志文章

2007年09月26日 18:12:33

定义泛型方法实例

欢迎你发表自己的看法:

Module Module1
Sub Main()
　Dim I As Integer = 5
　Dim J As Integer = 7
　Swap(Of Integer)(I, J)
　Console.WriteLine("I = " & I)
　Console.WriteLine("J = " & J)
　Dim S As String = "Paul"
　Dim R As String = "Lori"
　Swap(Of String)(S, R)
　Console.WriteLine("S = " & S)
　Console.WriteLine("R = " & R)
　Console.ReadLine()
End Sub

Public Sub Swap(Of T)(ByRef a As T, ByRef b As T)
　Dim temp As T
　temp = a
　a = b
　b = temp
End Sub
End Module

Tags： 泛型   vbnet  

类别： desinner pattern |  评论(0) |  浏览(1880) |  收藏
发表评论