Jump to content

Recommended Posts

Posted

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

  • 4 weeks later...
Posted (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 by MWojt

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...
B
B