Microsoft Office Tutorials and References
In Depth Information
10.2.6 Textfeld und Bezeichnungsfeld
10.2.6
Textfeld und Bezeichnungsfeld
Textfelder (engl. textbox ) dienen zur Eingabe von Texten oder Zahlen.
Bezeichnungsfelder (engl. label ) enthalten Bezeichnungen. Dies sind im
Allgemeinen Texte und Zahlen, die dem Benutzer nur angezeigt werden,
die er aber nicht verändern kann.
Eingabe, Anzeige
Im folgenden Beispiel gibt es drei Bezeichnungsfelder, drei Textfelder
und zwei Buttons. In den ersten beiden Textfeldern kann der Benutzer
zwei Zahlen eingeben. Die Summe der beiden Zahlen wird im dritten
Textfeld angezeigt, sobald man den ersten Button betätigt. Bei Betätigung
des zweiten Buttons wird die gleiche Summe in einem Tabellenblatt
angezeigt.
Abbildung 10.10
Addition von zwei Zahlen
Die drei Bezeichnungsfelder bekommen die Namen lblZahl1 , lblZahl2
und lblErgebnis . Die drei Textfelder heißen entsprechend txtZahl1 ,
txtZahl2 und txtErgebnis .
lbl, txt
Der Code der Ereignisprozedur des ersten Buttons:
Private Sub cmdTextfeld_Click()
If Not IsNumeric(txtZahl1.Text) Or _
Not IsNumeric(txtZahl2.Text) Then
MsgBox "Bitte Zahlen eingeben"
Else
txtErgebnis.Text = CDbl(txtZahl1.Text) _
+ CDbl(txtZahl2.Text)
End If
End Sub
Search JabSto ::




Custom Search