VB pomoč

aaaac

Pripravnik
5. avg 2008
32
0
6
lep dober večer vam želim.
bi prosil za manjšo pomoč glede visual basica ker sem popolnoma zakrnel .

kaj bi rad naredil? rad bi en if stavek ali kaj podobnega, da če vnese uporabnik v TxtBoxStarost.Text neko besedo(string), da javi napako oz. napiše opozorilo, da mora vnesti številko, else da gre normalno naprej (če je vnešena številka oz. zadosti pogoju).
Hvala že vnaprej. bi dal alte pa jih nimam, zato delim zvezdice.

tabela(UBound(tabela)) = CStr(textbox1.Text)
tabela2(UBound(tabela2)) = CDec(TxtBoxStarost.Text) 'za tole rabim pogoj,hvala

textbox1.Clear()
textbox1.Focus()
TxtBoxStarost.Clear()
TxtBoxStarost.Focus()


 

matejdro

HACKER 08
6. jan 2008
2.267
0
36
Uporabi IsNumeric

Koda:
IF IsNumeric(textbox1.text) = false then
msgbox("Ni številka!")
End If
 

aaaac

Pripravnik
5. avg 2008
32
0
6
Matej, hvala.

Vendar če vnesem omenjeni if stavek v txtboxstarost.text namesto textbox1 mi javi napako oziroma program zablokira. Za textbox1 mi deluje, sem probal že sam.
verjetno se napaka se pojavi zaradi CDec funkcije..
 

aaaac

Pripravnik
5. avg 2008
32
0
6
V bistvu mi ne vrže nobene napake ampak samo zablokira, potem pa tole:


V tem primeru sem namesto številke vnesel črko "d"..
 

matejdro

HACKER 08
6. jan 2008
2.267
0
36
preverjanje si dal za CDecom. In če ne vneseš številke, ti ne more pretvorit v decimal, zato javi error. Naredi tako, da bo vse skupaj vstavil v tabelo le, če je vpisana številka.
 

aaaac

Pripravnik
5. avg 2008
32
0
6
saj res.. jao sem smotan. hvala
smile-1.gif