Einzelnen Beitrag anzeigen
Alt 13.08.2003, 17:14   #16
renew
Inventar
 
Registriert seit: 22.10.2000
Alter: 41
Beiträge: 5.552


Standard

Zitat:
Original geschrieben von potassium
nun funzt es mir war nicht klar das ich keine boxen selber machen darf. sondern das InputBox und mfgbox vom proggi selbst gemacht werden. thx für alles und noch eine letzte frage: wie kann ich bewirken das wenn man auf abrechen bei der ratezahlabrage klickt keine fehlermeldung kommt sondern das er abbricht?
aso alles klar. Man muss nicht alles selber machen.

Um keine Fehlermeldung zu kassieren:

oben im Kopf noch:
dim strX as string

statt dem "x = InputBox "Bitte geben Sie eine Zahl ein:"" kommt folgendes:
strX = input("Geben Sie eine Zahl ein")
if strX <> "" and isnumeric(strX) then
x = int(strX)
else
msgbox "Keine Zahl" 'oder was du auch machen willst ...
end if
renew ist offline   Mit Zitat antworten