Krótkie teksty i liczby - kontrolki typu Label i TextBox

Kontrolka typu Label

służy wyłącznie do wyświetlania tekstu. Treść napisu

stanowi wartość jej właściwości Text, która jest typu String.
Jeżeli trzeba wyświetlić liczbę, należy dokonać jej konwersji do typu String, na przykład:
label1.Text = liczba.ToString().

Kontrolka typu TextBox

może służyć zarówno do wprowadzania tekstu z

klawiatury, jak i do wyświetlania tekstu. Treść napisu stanowi jej właściwość Text, która
jest typu String.
Jeżeli wprowadzasz z klawiatury daną liczbową, to TextBox przyjmie daną jako ciąg cyfr typu
String i trzeba będzie dokonać konwersji wprowadzonej danej na typ int lub double, na
przykład: Integer.Parse(textBox1.Text) lub Double.Parse(textBox1.Text).
Jeżeli trzeba wyświetlić liczbę, należy dokonać jej konwersji do typu String, na przykład:
textBox1.Text = liczba.ToString().

VisualBasic umożliwia wykorzystanie konwersji niejawnej do odczytania wartości
liczbowych z łańcucha znaków lub zamianę liczby na
łańcuch znaków

Przykład. Niech program pobiera z klawiatury imię i
wiek użytkownika w latach, a po kliknięciu przycisku
niech wyświetla jakieś powitanie z zastosowaniem
imienia, oraz niech przelicza lata na dni, przyjmując
bardzo zaokrąglony mnożnik 1 rok = 365 dni.

Przygotuj formularz jak obok. Program ma pozwolić
użytkownikowi spokojnie wpisać dane do kontrolek
textBox1 i textBox2. Program powinien podjąć swoją
działalność dopiero po kliknięciu przycisku.
Programista musi więc obsłużyć dla przycisku
zdarzenie Click:

Private

Sub

Button1_Click(sender

As

Object

, e

As

EventArgs

)

Handles

Button1.Click

Dim

imie

As

String

Dim

lata

As

Integer

Dim

dni

As

Integer

REM czytanie tekstu

imie = TextBox1.Text

TextBox3.Text =

"Cześć "

+ imie +

" jesteś OK"

REM czytanie tekstu i konwersja do liczby całkowitej

lata = TextBox2.Text

REM czytanie tekstu i konwersja do liczby całkowitej z wykorzystaniem

obiektu Integer

REM lata = Integer.Parse(TextBox2.Text)

dni = 365 * lata

REM wyświetlanie liczby z konwersją na String

Label3.Text =

"Masz za sobą "

& dni.ToString() &

" dni życia"

REM wyświetlanie liczby z konwersją nie jawną na String

Label3.Text =

"Masz za sobą "

& dni &

" dni życia"

End

Sub