zahlen nur bis 1000

rest
Die eingegebene Zahl darf nicht 1000 überschreiten !
und sollte eine meldung kommen "Sie dürfen nur bis 1000 eingeben! oder so!!

Wie mach ich das?

Kann mir da einer Helfen?!

Danke!!
ThiefMaster
code:
1:
2:
3:
if zahl > 1000 then
msgbox "blah"
end if
rest
wie kann ich es machen?
wenn ich jetzt über 1000 eingib das shift, clear & ok button inaktive werden?

hier ist es unter 0 (also nix eingegeben)

code:
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
lblZahlein.Caption = Zahl
    If Len(Zahl) > 0 Then
        Cmdshift.Enabled = True
        CmdClear.Enabled = True
        Cmdok.Enabled = True
    Else
        Cmdshift.Enabled = False
        CmdClear.Enabled = False
        Cmdok.Enabled = False
    End If


aber ich möchte das es mit beiden geht!!

danke!
Wolf
Hä? meinst du jetzt, dass der user nur noch zahlen von 1-1000 eingeben darf? wenn ja:

code:
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
Zahl = lblZahlein.Caption
    If Len(Zahl) > 0 and Zahl>1 Then
        Cmdshift.Enabled = True
        CmdClear.Enabled = True
        Cmdok.Enabled = True
    Else
        Cmdshift.Enabled = False
        CmdClear.Enabled = False
        Cmdok.Enabled = False
    End If
rest
genau

aber bei mir funkts nciht ich kann noch immer über 1000 eingeben!
Wolf
Argh, shit, ich bin so doof Mauer Mauer
Ersetz das Zahl>1 durch Zahl<1001

Kann man aber eigentlich alleine drauf kommen. Trotzdem Sorry Mauer Mauer Mauer Mauer Mauer Mauer Mauer Mauer Mauer Mauer Mauer Mauer Mauer Mauer Mauer Mauer Mauer Mauer Mauer
rest
ja hab ich schon gemacht aber troztdem danke!!