Pretest Pemrograman Komputer TIL

Apa yang akan terjadi jika kode VBA berikut ini dijalankan?

For i = 1 To 5

    MsgBox i

Next i

• Menampilkan kotak pesan dengan angka 1 hingga 5, satu per satu

• Menampilkan kotak pesan hanya dengan angka 5

• Mengulang eksekusi kode 5 kali tanpa menampilkan pesan

• Menampilkan kotak pesan dengan angka 1 hingga 5 sekaligus dalam satu pesan

Apa yang akan dilakukan kode VBA berikut ini?

If Range("A1").Value > 10 Then

    Range("B1").Value = "Lebih besar dari 10"

Else

    Range("B1").Value = "Kurang atau sama dengan 10"

End If

• Menampilkan nilai "Lebih besar dari 10" di sel B1 jika nilai A1 lebih besar dari 10, dan "Kurang atau sama dengan 10" jika tidak

• Menampilkan nilai "Lebih besar dari 10" di sel A1 dan "Kurang atau sama dengan 10" di sel B1

• Menampilkan pesan kesalahan karena perbandingan tidak valid

• Menyisipkan nilai perbandingan antara A1 dan 10 di sel B1

Dari pilihan berikut, manakah kode VBA yang memberikan perintah untuk menyisipkan angka 1 hingga 5 di sel A1 sampai A5?

• For i = 1 To 5
  Cells(1, i).Value = i 

  Next i

• For i = 1 To 5
  Cells(i, 1).Value = i 

       Next i

• For i = 0 To 5

       Range("A" & i+1).Value = i

       Next i

• For i = 0 To 5
  Cells(i+1, 1).Value = i + 1

  Next i

Perintah VBA manakah yang digunakan untuk mengulang eksekusi kode tertentu dalam loop?

• If-Else

• For-Next

• MsgBox

• Do While

Manakah dari pernyataan berikut yang benar tentang penggunaan Dim dalam VBA

• Dim digunakan untuk menghapus variabel dari memori

• Dim digunakan untuk mengubah tipe data variabel

• Dim digunakan untuk mendeklarasikan variabel dan menetapkan tipe data

• Dim digunakan untuk menginisialisasi nilai variabel

Perintah “Do Until” dalam VBA digunakan untuk…

• Menjalankan perulangan selama kondisi bernilai TRUE

• Menjalankan perulangan selama kondisi bernilai FALSE

• Menjalankan perulangan tanpa henti

• Menghentikan eksekusi program

Tipe data yang digunakan untuk menyimpan teks dalam VBA adalah…

• Integer

• Double

• String

• Boolean

Apa output dari kode berikut?

Dim angka As Integer 

angka = 10 / 3 

MsgBox angka

• 3,33

• 3

• 4

• Error

Program apa yang menampilkan angka ganjil antara 1-10?

• Sub Test() 

  Dim i As Integer 

  For i = 1 To 10 

  If i Mod 2 = 1 Then MsgBox i 

  Next i 

  End Sub

• Sub Test() 

  Dim i As Integer 

  For i = 1 To 10 

  If i Mod 2 = 0 Then MsgBox i 

  Next i 

  End Sub

• Sub Test() 

  Dim i As Integer 

  For i = 1 To 10 Step 3

  MsgBox i 

  Next i 

  End Sub

• Sub Test() 

  Dim i As Integer 

  For i = 2 To 10 Step 2

  MsgBox i 

  Next i 

  End Sub

Dalam flowchart, bagaimana cara merepresentasikan keputusan atau percabangan logika dengan kondisi?

• Dengan simbol oval

• Dengan simbol persegi panjang

• Dengan simbol belah ketupat

• Dengan simbol panah