0

以下のコードを参照してください。

Public Function Test()
    Dim o As Object = getVariable("Integer")
    If TypeOf o Is Integer Then
        'Do some processing on the integer
    ElseIf TypeOf o Is Decimal Then
        'Do some processing on the integer
    End If
End Function

Public Function getVariable(ByVal strDataType As String)
    If strDataType = "Integer" Then
        Return New Integer
    ElseIf strDataType = "Decimal" Then
        Return New Decimal
    ElseIf strDataType = "Double" Then
        Return New Double
    End If
End Function

リフレクションでこれを行う簡単な方法 (コード行数が少ない) があると思いますか?

4

2 に答える 2

0

本当の問題は、何を解決しようとしているのかということです。アクティベーターが機能します。ファクトリまたは IOC コンテナを作成しようとしています。詳細を教えていただけますか?キーが文字列型であり、実際に型を作成するために使用されるアイテム ストア デリゲートである辞書を作成することもできます。

于 2013-09-11T00:00:01.467 に答える