ich arbeite zur Zeit mit dem Buch VB4Kids, ganz einfach aus dem Grund, weil ich mit dieser Programmiersprache erst vor 2-3 Stunden angefangen habe und noch ein ziemliches Greenhorn bin. Hoffe hier mit meiner Frage auf offene Ohren zu stoßen.
Habe mir jetzt selbst einen BMI-Rechner erstellt, halt für den sogenannten Body-Mass-Index. Das hat soweit auch alles gut geklappt.
Code:
Sub BMIrechner()
Const DEF_TITEL = "Berechnung Ihres BMI" 'Konstante des Titels
Const DEF_MSG_EINGABE = "Geben Sie ihr Gewicht ein: " ' Konstante Gewichtstext
Const DEF_MSG_EINGABE2 = "Geben Sie ihre Körpergröße ein (in Meter): " 'Konstante Größetext
Const DEF_MSG_RESULT = "Ihr Körpergewicht: " 'Konstante End_Gewichtstext
Const DEF_MSG_RESULT2 = "Ihre Körpergröße: " 'Konstante_End_Größetext
Dim nEingabe 'Eingabe Gewicht
Dim nEingabe2 'Eingabe Körpergröße
Dim nBerechnung 'Berechnung des BMI (FORMEL)
Dim nBerechnung2 'Berechnung der Körpergröße zum Quadrat
nEingabe = Val(InputBox(DEF_MSG_EINGABE, DEF_TITEL)) 'Eingabe des Gewichts
nEingabe2 = Val(InputBox(DEF_MSG_EINGABE2, DEF_TITEL)) 'Eingabe der Körpergröße
nBerechnung2 = nEingabe2 * 2 'Berechnung der Körpergröße
nBerechnung = nEingabe / nBerechnung2 'Berechnung des BMI
nBerechnung = Format(nBerechnung, "#,##0.00") 'Formatierung auf 2 Stellen
Mir wurde beigebracht die Sachen in Office XP unter der Visual Basic Plattform zu scripten, wie kriege ich es jetzt hin, das die Sachen auch via Exe-Datei z.b. ausgelesen werden bzw. außerhalb von Office.
Jolo_ Coder
Anmeldedatum: 20.03.2007 Beiträge: 210
Verfasst am: 08.01.2008, 22:16
ist eig das selbe nur halt in andere Subs oder Functionen ab besten schaust du dir das Vid tut über die GUI an oder probierst es selbst mal ist eig. ganz einfach
Dafür brauchst du das Programm "Microsoft Visual Basic 6".
Die uneingeschränkte Version ist nicht kostenfrei.
Eine Ablaufversion gibts hier
hier Wie findet ihr meine Sig?
Creacher_ Newbie
Anmeldedatum: 06.01.2008 Beiträge: 3
Verfasst am: 08.01.2008, 22:29
Vielen Dank für eure Hilfe, ich merke das man für Visual Basic einiges an Anfangwissen braucht um richtig durchzustarten. Bald werden bestimmt qualifiziertere Fragen kommen die euch hoffentlich etwas mehr fordern als diese 0815 Standardfragen jeder User =)
Registrieren
Login
Wie findet ihr meine Sig?