If Not Decimal.TryParse(TextBox1.Text, Nothing) Then
MsgBox("Není tam číslo!")
End If
Akorát pozor na prostředí oddělovač desetinné čárky, pokud bude mít uživatel např. nastaveno anglické jazykové prostředí, bude se mu to chovat jinak - bude to akceptovat jako oddělovat tečku a ne čárku.
|