Mi sono scritto questa classe:

Public Class Class1
Public Function VarType(ByVal val As String) As VariantType

Return VariantType.Null

End Function
End Class

e nel codebehind della pagina ho messo:

Dim c As New Class1
If c.VarType("") = VariantType.Null Then

End If

Fammi sapere
Ciao
Kalman