Bu derste değişkenlere sabit değerler atamak yerine kullanıcının girdiği değerleri atamayı öğrenicez.

TextBox'tan aldığınız değerleri değişkenlere atamak ve işlemek

Değişkenlerinize doğrudan text yüklemek yerine, text bilgisini text kutularından alabilirsiniz. Bu derste text kutularından alacağımız text değerlerini değişkenlere atayacağız. Öncelikle şunu yapın:

Formunuza yeni bir texbox ekleyin
Property listesinden Name özelliğini txtLastName olarak değiştirin ve Text özelliğini ise boş bırakın (varolan standart değeri silin)

İlk textbox'ı seçin ve Name özeliğini txtFirstName olarak değiştirin. Artık 2 adet text kutumuzun daha akılda kalıcı adları vardır. Onları ilerde hatırlamamızı kolaylaştıracaktır.

Ne yazık ki, ekranın üstündeki Form1.vb tabını seçerek yada F7'ye basarak kod penceresine dönerseniz, hata gösteren dalgalı çizgilerin tekrar geldiğini görürsünüz.


Fare imlecini satır üzerine getirdiğinizde ise aşağıdaki hata etiketini görürsünüz:


Bu hata mesajının nedeni TextBox1 adlı kontrolun adını değiştirmiş olmanızdır. Artık adı Textbox1 olan bir kontrol olmadığına göre kod penceresinde de Textbox1 yerine txtFirstName yazmanız gerekir. Bunu yaparsanız VB hemen dalgalı hata çizgisini ve hata etiketini yok eder. Yeni kod satırı artık şu şekilde görünmelidir:

txtFirstName.Text = FullName

Programınızı çalıştırın ve eğer hata mesajı görürseniz durdurup kod penceresinde dalgalı hata çizgisi arayın.

Artık kodumuz biraz değişti ve ikinci text kutusunu da kullanabiliriz. Şimdi sırada kullanıcıların text kutularına gireği bilgileri yakalayacak kodları yazmak var.

Aşağıdaki satırları bulun, FirstName = "Bill"
LastName = "Gates"
şu şekilde değiştirin: FirstName = txtFirstName.Text
LastName = txtLastName.Text
Eşittir işareti solunda bulunan bilgiyi sağda bulunan değişkene atadığına göre text kutularına yüklenen değerleri de öndeki değişkenlere atayacaktır.

Kodunuzu aşağıdaki gibi değiştirin. Bu kez WholeName adında yeni bir değişken oluşturduk: Dim FirstName As String
Dim LastName As String
Dim WholeName As String

FirstName = txtFirstName.Text
LastName = txtLastName.Text

WholeName = FirstName & " " & LastName

MsgBox(WholeName)
Programınızı çalıştırın. İlk text kutusuna Bill, ikinci text kutusuna Gates yazın ve butona basın. Aşağıdaki görüntü oluşacaktır:


Bu text girişi işleminden önce Bill adını sabit bir değer olarak FirstName değişkeninin içine yazıyor ve değiştirilmesine imkan vermiyorduk: FirstName = "Bill"
Artık, kişinin girdiği bilgiyi değişkenlerimize aktarabiliyoruz.

Alıştırmalar:

Formunuza üçüncü bir textbox ekleyin.
Name property'sini txtWholeName olarak değiştirin.
Text kutularının anlamlarını belirten Label'lar ekleyin. (tek label ekledikten sonra, label üzerine fare ile tıklayıp - sağ klik - copy yolunu takip ettikten sonra formun herhagi bir yerine paste yaparsanız (yapıştırırsanız) yeni bir label'i kolaylıkla elde edersiniz.)
Kodlarınızı "String Test" butonuna basılınca kişinin tüm adı (ad+soyad) görünecek şekilde değiştirin. İşlemi tamamladığınızda formunuz şu şekilde görünmelidir:


Sonraki derste diğer veri türleri hakkında çalışma yapacağız. Ders hakkındaki sorularınızı buradan belirtebilirsiniz. Kolay gelsin.

__________________