Yazı kutusu dışında kullanıcıdan bilgi almak için diyalog pencereleri kullanılabilir. Bunun için kullanılan fonksiyon InputBox (kullanıcının girdiği biçimde atanır) ya da InputBox$ (karakter olarak atanır) dır.

InputBox$ (Açıklama$[,[Başlık$][,[İlkDeğer$][,x%,y%]]])

Sub Form_Load
'Form görüntülendiğinde adınızı soran diyalog penceresi ekrana gelir.
Ad = InputBox$("Lütfen adınızı giriniz:", "Ad", "Damla Buket")
End Sub

Prosedür Kodu

Bu kısımda program için gerekli hesaplamalar yazılacaktır. Programın içine yazılacak olan açıklamalar için satırın en soluna tek tırnak işareti koymak yeterlidir. Yazı kutusundan gelen değerlerin sayı değerine çevrilmesi için gerekli komut Val komutudur.

"txtSure" yazı kutusunun değerini bir değişkene atamak için aşağıdaki komut kullanılabilir:
' Sure değerini değişkene atar
nSure = Val(txtSure.Text)

Programın Çalıştırılması

Bir program 3 şekilde çalıştırılabilir:
1. Visual Basic araç çubuğu üzerindeki "Start" düğmesine basınız.
2. Run/Start menü seçeneğini tıklayınız.
3. Klavyede F5 tuşuna basınız.

Hata olduğu takdirde bunlar bir pencerede görüntülenecektir.