background image

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