birkaç visual basic sorusu???

Private Sub Command1_Click()
Cls
Dim ad,b
ad=Inputbox("bir metin giriniz")
b=Left (ad,6)
Print b
End Sub

bu prog çalıştırılıp metin kutusuna görsel programlama yazılırsa ekrana hangi ifade yazılır? şıklar görse,6,5.görsel,görsel programlama

-------------------------------------------------------------------

Dim a As Integer
Dim b As Integer
For a=1 to 10
b=b+a
Next
Print b
End Sub

program çalıştırıldığında b değeri ne olur? şıklar 10,25,40,55,70


--------------------------------------------------------------------

Private Sub Command1_Click()
Dim a,b As Integer
Dim sayi(1 to 5) As Long
b=1
For a=1 to 5
b=b*a
sayi(a)=b
Print "Sayi"; (a), sayi(a)
Next
End Sub

bu kod çalıştırıldığında sayi(3) değeri ne olur? şıklar 1,2,6,24,120

-----------------------------------------------------------------------
visual basic kullanmasını bilmiyorum yardımcı olursanız cevaplar için sevinirim.teşekkürler...

1. soru --> ekrana görsel yazar.
2. soru --> 1'den 10'a kadar (10 dahil) sayıların toplamadır. 55
3. soru --> sayi(3) değeri 6 olur.

bizim sınavlarda keşke böyle sorular çıksa