Identify if number is integer or decimal ?

Dim numar = TextBox1.Text
        If TypeName(numar) = "Integer" Then
            Label1.Text = "The number is integer"
        ElseIf TypeName(numar) = "Decimal" Then
            Label1.Text = "The number is DecimaL"
 
        End If