有没有什么方法可以实现类似于下面的功能啊?
下面的这两个方法是我随意写是,是会报错的,我只是想用它来表达我的需求。
关键疑问是如何将数据类型作为一个表达式来放进参数中。(我看CType函数好像是可以的,它虽然用了Overloads,但是它可以将Single等数据类型作为参数来输入)。
Public Sub main()
Dim V1 As Integer=ConvertDataType(12.3,Integer)
Dim V2 As String =ConvertDataType(12.3,String)
End Sub
Private Function ConvertDataType(ByVal SouceData As Object, ByVal DestinationType As Type) As Object
Return CType(SouceData, DestinationType的数据类型)
End Function
------解决思路----------------------
完全看不懂你要表达的问题,
对于如何把类型作为参数,关键字:泛型
------解决思路----------------------
转成任意类型参考:
http://stackoverflow.com/questions/2891797/typecasting-generic-parameters
------解决思路----------------------
Public Shared Function ConvertString(Of T)(ByVal s As String) As T
Dim local As T '直接这么用传入的类型
GetType(T) 'GetType就可以获取T对于的System.Type
End Function