Visual Basic ile Programlamayı Öğreniyoruz -6-

[tasiyici]

InputBox – Bilgi Giriş Kutusu

Kullanıcıdan bilgi alınmasını sağlar.



Bilginin girilebilmesi için yeni bir pencere açılacak ve bilgi girişini bekleyecektir. Bilgi giriş penceresinden girilen bilgi String(karakter) türünde olacaktır. Sayısal olarak kullanılacak bilgini VAL fonksiyonu yardımıyla sayısal değere dönüştürülmesi gereklidir.



Dim Adres As String

Dim SıraNo As Integer

Ad = InputBox("Adınızı Giriniz","Bilgi Giriş penceresi")

SıraNo = Val(InputBox("Sıra No Giriniz"))



Ad = InputBox("Adınızı Giriniz","Bilgi Giriş penceresi", “Misafir”)






MsgBox – Mesaj Kutusu

Kullanıcıyı bilgilendirmeyi sağlar. Kullanıcıya elde edilen bilgi ve uyarı mesajlarını bildirmekte ya da seçimin onaylanmasını sağlamak için kullanılır.


Dim Sayı As Integer
Sayı = 45
MsgBox "Öğrenci sayısı" & Sayı

vbCrLf CHR$(13)+(CHR$(10)
vbNullChar Boşluk
vbLf Yeni Satır Başına Geçiş CHR$(10)
vbBack BackSpace CHR$(Bunlar da ne
vbCr Satır Başı Chr$(13)


uyarı = "Kayıt Siliniyor" + Chr$(13) + "Emin misiniz"
Cevap= MsgBox(uyarı, 4, "Kayıt Silme")

MsgBox "Hatalı İşlem", vbCritical, "Mesaj Kutusu"


Cevap = MsgBox(Mesaj, Görünüm, Başlık)



GeriDöndürülenDeğer = MsgBox("Değişiklikleri Kaydedecek misiniz?", _

32 + 3 + 512 + 0, "Kayıt Kontrol")