Zwei Massen mit VBA Excel ausrechnen
12.05.2008 14:58:03
toni
kann mir jemand bitte helfen diese Aufgabe in VBA Excel zu programmieren , da ich seit zwei Tage mich damit beschäftigt habe dies hinzukriegen aber ich habe leider dazu keine Vorkentnisse und komme nicht weiter.
Danke im vorraus!
1) Erstellen Sie ein Programm das die Berechnung des Gewichts von Kegeln und Pyramiden aus Stahl bzw. Granit ermöglicht: Zu Beginn Ihres Programms programmieren Sie eine Anweisung, die Ihren Vornamen, Nachnamen und die Matrikelnummer ausgibt. Diese Anweisung fügen Sie bitte allen Programmen hinzu, die Sie mir zur Bewertung zusenden. Anschließend soll das Programm den Benutzer fragen ob er das Gewicht eines Kegels oder einer Pyramide berechnen will. In Abhängigkeit von der Auswahl (betätigte Taste) sollen die Berechnungen entweder für Pyramiden oder Kegel durchgeführt werden. Es müssen dabei jeweils zwei Berechnungen für die Stoffe Stahl und Granit erfolgen. Beide Werte geben Sie dann in einem Fenster aus, dann endet das Programm. Für die Berechnungen müssen Sie die entsprechenden Werte einlesen. Für die Kegelberechnung sind das zwei Werte (Radius und Höhe) und für die Pyramidenberechnung ein Wert (Grundkante). Alle Werte sollen in mm eingegeben werden. Die Zahlen für pi und Dichte deklarieren Sie als Konstanten. Ihr Programm soll mit gebrochenen Zahlen rechnen können. Alle Variablen deklarieren Sie am Anfang des Programms mit einem entsprechenden Typ.
m = 2/3*a^3*Dichte
m = r^2*pi/3*h* Dichte
Dichte von Stahl 7855 kg/m^3
Dichte von Granit 2800 kg/m^3
2) Fehler abfangen Testen Sie Ihr Programm mit Werten und ohne Eingabe von Werten. Beim betätigen der Abbrechen Taste, oder wenn nichts eingegeben wurde, gleichgültig in welchem Fenster soll das Programm eine Meldung ausgeben (wie weiter unten dargestellt).
3) Auswahlfenster, Eingabefenster, Ausgabefenster und Abbruchfenster So sollen Ihre Fenster aussehen: Das Auswahlfenster:
Das Auswahlfenster:
("Ja = Das Gewicht von regelmäßigen vierseitigen Piramiden berechnen." & vbCrLf & "Nein = Das Gewicht von geraden Kegeln berechnen.", 35, "Gewicht einer Pyramide")
Ein Eingabefenster (Pyramide):
("Die Länge der Grundkante in (mm) eingeben!", "Gewicht einer Pyramide")
Ein Eingabefenster (Kegel):
("Den Radius in (mm) eingeben!", "Gewicht eines Kegels")
Das Fenster für die Eingabe der Höhe sollte entsprechend aussehen!
Ausgabefenster (Pyramide):
("Das Gewicht der Pyramide aus Stahl beträgt: ... ", "Gewicht einer Pyramide")
Ausgabefenster ( Kegel):
("Das Gewicht der Pyramide aus Granit beträgt: ... ", "Gewicht eines Kegels")
Abbruchfenster:
("Das Programm wurde abgebrochen oder es wurde kein Wert eigegeben", "!!!Programmabbruch!!!")
Den Anfang habe ich programmiert
"Zu Beginn Ihres Programms programmieren Sie eine Anweisung, die Ihren Vornamen, Nachnamen und die Matrikelnummer ausgibt."