Diese Werbeeinblendung erscheint nach 5 Minuten Idletime.
- Werbung - weiter auf Codershell surfen.
Visual Basic » Addition 2er Zahlen
Seiten:  1 
[ Sie müssen angemeldet sein, um einen Beitrag zu verfassen. ]
Geschrieben von gix am 12.04.2007 um 00:00 Uhr.
Beiträge: 185 / #1203

Kontakt: Mailen | ICQ

In meinem 1. Tutorial, habe ich euch noch erklärt, wie ihr zur entsprechenden Form kommt.
Diesmal nenne ich euch nur noch was ihr benötigt.

Form:
CODE
1.
2.
3.
4.
• 2 TextBoxen
• 1 Button


Wir haben vor, die 2 Zahlen aus den TextBoxen mit einander zu addieren, sobald man auf den Button klickt.

Dazu verwenden wir wieder:
CODE
1.
2.
3.
4.
Private Sub Command1_Click()
End Sub


Wir wollen unser Ergebnis natürlich in einer Variable speichern und später wieder über eine MsgBox ausgeben lassen.
Dazu müssen wir die Variable vorher noch deklarieren. Dies geschieht mit Dim.
Also fügt ihr einfach:
CODE
1.
2.
3.
       Dim ergebnis as Long

in das Click-Event ein.

Nun müssen wir nurnoch die Zahlen aus der 1. und 2. TextBox addieren.
Da die Werte einer TextBox stehts als String gespeichert werden, könnten wir nichts errechnen.
Dazu müssen wir die Werte umwandeln.Anschließend können wir das Ergebnis in einer MsgBox ausgeben lassen.
Man kommt also zu folgendem Code:
CODE
1.
2.
3.
4.
    ergebnis = CDbl(Text1.Text) + CDbl(Text2.Text)
    MsgBox ergebnis


Hier nocheinmal der gesamte Code im überblick:
CODE
1.
2.
3.
4.
5.
6.
7.
8.
Private Sub Command1_Click()
    Dim ergebnis As Long
    
    ergebnis = CDbl(Text1.Text) + CDbl(Text2.Text)
    MsgBox ergebnis
End Sub




wong itdel.iciode.blinklisttechnoratigoogleblinkbitsyahooyiggblogmarksfurlspurlwebnewsstumbleupondigg itma.gnolia.comco.mments Zitieren Beitrag melden
[ Sie müssen angemeldet sein, um einen Beitrag zu verfassen. ]
Seiten:  1 
Login / Account
E-Mail Adresse:

Passwort:



Passwort zurücksetzen
Werbung