İşlem Tablosu Programlama Deneme Sınavı Sorusu #1289700

Private Sub CommandButton1_Click()

 

Dim sayi1 As Integer

Dim sayi2 As Integer

Dim sayi3 As Integer

 

sayi2 = ActiveSheet.Range("B1")

sayi3 = 0

 

For sayi1 = ActiveSheet.Range("A1") To sayi2

    sayi3 = sayi3 + sayi1

Next

 

ActiveSheet.Range("C1") = sayi3

   

End Sub

Yukarıda “CommandButton1” isimli butonun tıklatma eylemini gösteren kod parçası verilmiştir.

“A1” hücresinde “3” sayısı ve “B1” hücresinde “5” sayısı yazılı olduğu durumda “CommandButton1” isimli butona tıklandığı zaman aşağıdakilerden hangisi gerçekleşir?


“C1” hücresine "3" yazılır.

“C1” hücresine "5" yazılır.

“C1” hücresine "12" yazılır.

“C1” hücresine "15" yazılır.

“C1” hücresine "243" yazılır.


Yanıt Açıklaması:

Verilen kod parçası, “A1” hücresinde yer alan değerden “B1” hücresinde yer alan değere kadar döngü içerisinde verilen kod parçasını çalıştırır ve “C1” hücresine “sayi3” değerini yazdırır. Döngü içerinde yer alan kod parçası ise, “sayi3” olarak tanımlanan değere, kendisi ile “sayi1” olarak verilen değerin toplamını atamaktadır.

Buna göre, “A1” hücresinde “3” sayısı ve “B1” hücresinde “5” sayısı yazılı olduğu durumda “CommandButton1” isimli butona tıklandığı zaman “C1” hücresine "12" yazılır.

Yorumlar
  • 0 Yorum