Dim Value As String = "+123"

If IsNumeric(Value) Then
    PRINT "It is numeric."
End If