Berikut ini adalah pertanyaan dari nisaelpina26 pada mata pelajaran TI untuk jenjang Sekolah Menengah Atas
Dim angka As Integer,
i As Integer
angka 50
For i = 1
To angka
If (i Mod 7 = 0) Then
List1.AddItem (i)
End If
Next i
End Sub
Jawaban dan Penjelasan
Berikut ini adalah pilihan jawaban terbaik dari pertanyaan diatas.
Jawaban:
List1 = [7,14,21,28,35,42,49]
Penjelasan:
kodingannya gak lengkap banget, List1 ini dari mana datangnya, apakah global variable ?
Tapi asumsi ada List1 awalnya kosong ya
itu berarti akan iterasi dari 1 sampai 50 dan masukkan angka YANG habis dibagi 7, berarti List1 = [7,14,21,28,35,42,49]
Private Sub Form Load()
Dim angka As Integer,
i As Integer
angka 50
For i = 1 To angka
If (i Mod 7 = 0) Then List1.AddItem (i) End If
Next i
End Sub
Semoga dengan pertanyaan yang sudah terjawab oleh katon20 dapat membantu memudahkan mengerjakan soal, tugas dan PR sekolah kalian.
Apabila terdapat kesalahan dalam mengerjakan soal, silahkan koreksi jawaban dengan mengirimkan email ke yomemimo.com melalui halaman Contact
Last Update: Tue, 11 May 21