Porównanie typów w VB.NET

Question

Jak mogę porównać typ danych typu w VB.NET? Mój kod:

Private Function Equal(ByVal parameter As String, ByVal paramenterName As String, ByVal dataType As Type) As String 

    If dataType = String Then 
     return 1; 
    End If 

End Function 

Jakieś pomysły?

Answer 1

Przyjęta odpowiedź zawiera błąd składni. Oto poprawne rozwiązanie:

If dataType = GetType(String) Then 
    Return 1 
End If 

Albo

If dataType.Equals(GetType(String)) Then 
     Return 1 
End If 

Albo

If dataType Is GetType(String) Then 
    Return 1 
End If 

Ostatnim sposobem jest prawdopodobnie najlepszym sposobem, aby sprawdzić, ponieważ nie będzie wyjątek, jeśli obiekt ma wartość null.

zobaczyć również https://msdn.microsoft.com/en-us/library/system.object.gettype(v=vs.110).aspx?cs-save-lang=1&cs-lang=vb#code-snippet-1

Answer 2

If dataType = GetType(String) Then 
    return 1; 
End If 

Answer 3

If datatype Is GetType(String) Then 
    'do something 
End If 

Zastępca Is dla = i wszystko działa

Answer 4

To chyba najlepszy sposób, aby to zrobić w VB.

If dataType Is String Then 
    return 1 
End If