-
textBox Rechnen
Wie kann ich mit einer "textBox" rechnen?
Hier mal die Rechnung wie ich sie haben will:
Code:
textBox13=(textBox1*2+textBox2*2+textBox3*2+textBox4+textBox5+textBox6+textBox7*2+textBox8*2+textBox9*2+textBox10+textBox11+textBox12)/18
Wie soll ich, das in VisualBasic schreiben?
Auf dem Screen zu sehen, in die makierte "textBox13" soll die Rechnung in eine andere Form rein, um den Druchschnitt zu berechnen und das der Schnitt, dann in der Box stehet.
Danke im Vorraus
mfg David
Screenshot:
Große ansicht:
http://www.pic-upload.de/17.03.09/cf5kfc.jpg
Kleine ansicht:
http://www.pic-upload.de/17.03.09/cf5kfc.jpg
-
Ich gehe davon aus,das dein Programm beim Klick auf den Ausrechnen Button
den Durchschnitt berechnen soll.
Du machst einen doppelklick auf den button in deiner Form.
Code für die Funktion(einfach nach End Sub einfügen):
Code:
function Rechnung() As Double 'Eine Funktion zum berechnen
Dim AdditionErgebnis As Double 'Varibale für diesumme aller Noten
AdditionErgebnis = Val(TextBox1.Text) + Val(TextBox2.Text) 'Und so weiter
'Das Val() sorgt dafür das kein Fehler entsteht,wenn der Benutzer statt Zahlen einen text eingibt,Val rechnet diesen dann einfach in 0 um.
return AdditionErgebnis / 18
End Function
Code zum aufrufen der funktion(bei deinem button einfügen):
Code:
Call Rechnung() 'Wobei "call" nicht umbedingt notwendig ist
-
Bei mir unterstreicht er das Rot -.-
Bitte helft mir ICQ: 440-131-909