Biber Posted May 5, 2014 Posted May 5, 2014 Hallo, ich bin im VBScript bereich total neu und habe deswegen eine Berechnung von Volumen versucht... versucht, wenn leider mag sie nicht, warum? MsgBox "Hallo! Hier können Flächen berechnet werden!" Code: Sub1(s1)z1 = InputBox("Bitte geben Sie die Länge ein!")If IsNumeric(z1) = False ThenMsgBox "Bitte eine Zahl eingeben!"End IfEnd SubSub2(s2)z2 = InputBox("Bitte geben Sie die Breite ein!")If IsNumeric(z2) = False ThenMsgBox "Bitte eine Zahl eingeben!"End IfEnd SubSub3(s3)z3 = InputBox("Bitte geben Sie die Höhe ein!")If IsNumeric(Zahl) = False ThenMsgBox "Bitte eine Zahl eingeben!"End IfEnd SubErgebnis = CInt(z1) * CInt(z2) * CInt(z3)MsgBox (CStr(Ergebnis)) Ich habe mit 3 Subs gearbeitet, passt ihm das vielleicht nicht?? LG
MWojt Posted June 1, 2014 Posted June 1, 2014 (edited) Ich habe zwar keine Ahnung von VBS, allerdings denke ich, es könnte daran liegen, dass du "Sub1", "Sub2" usw. geschrieben hast. Ich würde das mal durch "Sub" ersetzen. //EDIT: Lol, der erste Beitrag ist von vor fast einem Monat. Aber vielleicht hat meine Nachricht ja doch noch irgend einen Sinn. Edited June 1, 2014 by MWojt
28Smiles Posted June 3, 2014 Posted June 3, 2014 MWoijt hat recht du musst die prozeduren nach voldegenden Schema schreiben: Sub <Name> (<Variablen>) End Sub
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now