Visual Basic - ošetření chyb

Potřeboval bych vědět, jak se ošetří ve Visual Basicu chyba tohoto typu:

vysledek.Text = 2 * 3,141592 * polomer.Text

Pokud do pole "polomer" někdo napíše třeba dsgjki, tak program zákonitě spadne. Jak docílit toho, aby se to při takto špatně zadaném "čísle" zobrazil např MsgBox s nápisem "Piš pouze číslice!!!" a program se v tu chvíli zastavil. Chci mít ten můj program vyšperkovaný, ale jak říká jeden z Murphyho zákonů něco takového : Napíšeš program, ošetříš ho jak můžeš, ale VŽDY se najde jeden blbec, kterej ho shodí
Díky za odpovědi.

P.S. Na Googlu jsem hledal ale nic jsem nenašel, možná je heslo "Visual Basic ošetření chyb" špatné

Jsou zobrazeny jen nové odpovědi. Zobrazit všechny

Předmět	Autor	Datum
3-[ Moje pocity euforie nahrazuje zlost. Ono to nefunguje pro desetinná čísla. No nic, prostě zadám,… marekdrtic 19.12.2007 20:51	marekdrtic	19.12.2007 20:51
If IsNumeric(vykon.Text) Then If IsNumeric(syceni.Text) Then dopprurez.Text = Sqr((vykon.Text / 0.8)… marekdrtic 20.12.2007 09:41	marekdrtic	20.12.2007 09:41
dobré je používat nějaký logický operátor typu: OR/AND: If isNumeric(vykon.text) AND IsNumeric(syce… poslední AZOR 20.12.2007 09:49	AZOR	20.12.2007 09:49

Moje pocity euforie nahrazuje zlost. Ono to nefunguje pro desetinná čísla. No nic, prostě zadám, že když to bude větší než 0 a menší než 10000 tak to bude počítat, pokud ne = chyba

If IsNumeric(vykon.Text) Then
If IsNumeric(syceni.Text) Then
dopprurez.Text = Sqr((vykon.Text / 0.8) / syceni.Text)
Else
MsgBox ("Zadaná hodnota musí být číslo s desetinnou čárkou!")
End If
Else
MsgBox ("Zadaná hodnota musí být číslo s desetinnou čárkou!")
End If

Prasácky uděláno ale jde to

dobré je používat nějaký logický operátor typu: OR/AND:

If isNumeric(vykon.text) AND IsNumeric(syceni.Text) Then
vypocet
Else
MsgBox("Musi byt cislo")
End if

Zpět do poradny Odpovědět na původní otázku Nahoru