Bräuchte dringend Hilfe bei einem Taschenrechnerprojekt!

[Liberty Hunter]

Ja hallo Leute. Ich bräuchte dringend etwas Hilfe bei einem Projekt, dass ich schreiben soll für meine Ausbildungsstelle. Es geht um ein Visual basic Projekt welches ich schreiben soll, aber nicht so wirklich weiß wie. Also nun zu der Aufgabenstellung:

Ein Malerbetrieb der sich auf Industriebauten spezialisiert hat, möchte seine Angebotskalkulation automatisieren. Der Preis wird wie folgt kalkuliert:

Preis = (Fläche abzüglich Abzüge) multipliziert mit dem Grundpreis. Abzüge sollen in Prozent eingegeben werden können. Weiterhinsoll die Begründung für den Abzug erfasst werden können.

Beispiel: Preis = (5000qm-10%)*5.75 Euro

Der Grundpreis wird aus einer 2 Spaltigen Datei eingelesen. Die erste Spalte enthält die Beschreibeung, die zweite den Preis.

1. Ich soll eine Benutzerfreundlich oberfläche erstellen.
2. Ich soll eine Datei anlegen, mit Beispieldaten zum Grundpreis.
3. Und natürlich den Code soll ich schreiben dafür.

Eine Zusatzaufgabe wäre auch noch das Programm so zu erweitern, dass mehrer Positionen kalkuliert werden können und diese tabellenartig angezeigt werden. Das Ergebniss davon soll wiederum gleich in eine Datei geschrieben werden.

Hinweis: Ich darf dabei keine Tabellenkalkulation wie Excel oder ähnliches verwenden.
Also wenn mir da jemand helfen könnte wäre ich euch echt dankbar.

MfG Liberty Huter

[Eckard41]

Und wo genau hast du Probleme?
Ich würde für die Datei mit dem Grundpreis und der Beschreibung (=Begründung?) eine csv-Datei nehmen. Die lässt sich einfach auslesen und später auch mit Excel bearbeiten.
Spalten werden in Csv-Dateien durch , getrennt Zeilen durch Zeilenumbrüche (vbNewLine).
Eine csv-Datei mit dem Inhalt
Beschreibung,Preis
Irgendwas,5.75€
würde also so aussehen:
+------------------+------------+
|.Beschreibung.|....Preis.....|
+------------------+------------+
|...Irgendwas...|....5,75€....|
+------------------+------------+

Diese Datei kannst du ja dann mit gewöhnlichen VB-Mitteln einlesen.

Weiterhinsoll die Begründung für den Abzug erfasst werden können.

Welche Begründung soll wo erfasst werden?

Vielleicht noch was zur Oberfläche:
http://www.activevb.de/tutorials/tut.../xpstyles.html

[Liberty Hunter]

Naja gut. Das mit der Datei hat sich mittlerweile erledigt. Eigentlich wollte ich das mit einer Datenbanl lösen was aber nicht so wirklich funktioniert hat. Nun hänge ich nur noch an zwei speziellen Problemen:

1. Die Rechnung. Kann mir jemand die VB Formel für folgende Mathe-Formal sagen? Preis=(5000qm-10%)x5.75€

2. Comboboxen. Gibt es eine Möglichkeit, dass man den folgenen Befehl praktisch unendlich weiter ausführen lassen kann:

If Combo1.ListIndex = 1 Then
Combo2.ListIndex = 1
Else If Combo 1.ListIndex = 2
Combo2.Listindex = 2
...

Ja und so weiter. Also wenn ich diese Zwei Probleme noch weg bekäme wäre ich schon fertig ^^.

[Genesis]

1. Die Rechnung. Kann mir jemand die VB Formel für folgende Mathe-Formal sagen? Preis=(5000qm-10%)x5.75€

Preis = (5000 - (0.1 * 5000)) * 5.75

oder dynamisch:

dim preis as double
dim qm as double
dim euronen as double

preis = (qm - (0.1 * qm)) * euronen

Gruß
Genesis

[Eckard41]

Comboboxen. Gibt es eine Möglichkeit, dass man den folgenen Befehl praktisch unendlich weiter ausführen lassen kann:

If Combo1.ListIndex = 1 Then
Combo2.ListIndex = 1
Else If Combo 1.ListIndex = 2
Combo2.Listindex = 2

Warum schreibst du nicht einfach Combo2.ListIndex = Combo1.ListIndex ?

[Liberty Hunter]

lol. Cool danke. Hab den den Wald vor lauter Bäumen nich gesehn ^^

[Liberty Hunter]

Jo Leute. Is vorbei. ^^ Ich bin fertig und das Programm auch. Es läuft es laufen soll und somit bedanke ich mich bei eure Hilfe.

MfG Liberty Hunter