302 Ahmad Nur Falahul Muttaqin
101. Visual Basic for Application (VBA) adalah dialek modern dari Bahasa Pemrograman :
A. BASIC (Beginner's All Purpose Symbolic Instruction Command)
B. GWBASIC (Graphical Workshop Beginner's All Purpose Symbolic
Instruction Command)
C. BASIC (Beginner's All Purpose Symbolic Instruction Code)
D. GWBASIC (Graphical Workshop Beginner's All Purpose Symbolic Instruction Code)
102. Program di bawah ini yang berfungsi memasukkan nilai 1 sampai 10 dari B1 sampai B10 adalah :
A. Range ("A:A").Select For i-1 to 10
Activecell.Value - i
Activecell.Offset(1,0).Select
Next i
B. Range ("B:B").Select For i-1 to 10
Activecell.Value - i
Activecell.Offset(1,0).Select
Next i
C. Range ("A:A").Select For i-1 to 10
Activecell.Value - i
Activecell.Offset(0,1).Select
Next i
D. Range ("B:B").Select For i-1 to 10
Activecell.Value - i
Activecell.Offset(0,1).Select
Next i
103. Program yang benar untuk tampilan di bawah ini adalah :
A. Range("D3").Select
For i = 1 To 4
ActiveCell.Offset(1, 0).Select
If ActiveCell < 82 Then
Range("C2").Copy ActiveCell.Offset(0, -1)
Else
Range("E2").Copy ActiveCell.Offset(0, 1) End If
Next
B. Range("D2").Select
For i = 1 To 4
ActiveCell.Offset(1, 0).Select If ActiveCell <82 Then
Range("C2").Copy ActiveCell.Offset(0,-1) Else
Range("E2").Copy ActiveCell.Offset(0, 1) End If
Next
C. Range("D3").Select
For i = 1 To 4
ActiveCell.Offset(1, 0).Select If ActiveCell < 82 Then
Range("E2").Copy ActiveCell.Offset(0, -1) Else
Range("C2").Copy ActiveCell.Offset(0, 1) End If
Next
D. Range("D2").Select
For i = 1 To 4
ActiveCell.Offset(1, 0).Select
If ActiveCell < 82 Then
Range("E2").Copy ActiveCell.Offset(0,-1)
Else
Range("C2").Copy ActiveCell.Offset(0, 1)
End If
Next
104. Rumus yang harus diketik pada sel C3 agar spinner button berikut ini dapat bekerja seperti di bawah ini adalah :
A. =HLOOKUP(C2;E2:F5;2)
B. =HLOOKUP(C3;E2:F5;2)
C. =VLOOKUP(C2;E2:F5;2)
D. =VLOOKUP(C3;E2:F5;2)
105. Program di bawah ini yang menyebabkan kursor pindah ke sel di atasnya dan berhenti ketika posisi paling atas adalah
A. Sub AdaWarna_LeftArrow1_Click() If ActiveCell.Column > 1 Then
ActiveCell.Offset(0, -1).Select Else
MsgBox "Kolom Paling Kiri" End If End Sub
B. Sub LeftArrow1_Click() If ActiveCell.Column > 1 Then
ActiveCell.Offset(0, -1).Select End If End Sub
C. Sub Pesan_LeftArrow1_Click() If ActiveCell.Column > 1 Then
ActiveCell.Offset(0, 1). Select Else
MsgBox "Kolom Paling Kiri" End If End Sub
D. Sub Keatas_LeftArrow1_Click() If ActiveCell.Column > 1 Then
ActiveCell.Offset(0, -1). Select Else
ActiveCell.Offset(-1, 0).Select End If
End Sub
106. Jika masalah yang akan dibuat programnya terlalu kompleks, maka solusinya adalah :
A. Masalah tersebut dipecah menjadi modul-modul kecil agar lebih mudah diselesaikan.
B. Silahkan uji program tersebut dengan segala macam kemungkinan yang ada, termasuk error-handlingnya sehingga program tersebut akan benar-benar handal dan layak digunakan.
C. Menulis dokumentasi agar pada suatu saat jika kita akan melakukan perubahan atau membaca source code yang sudah kita tulis dapat kita ingat-ingat lagi dan kita akan mudah membacanya.
D. Menuliskan komentar komentar kecil tentang apa maksud kode tersebut, untuk apa, variabel apa saja yang digunakan, untuk apa, dan parameter-parameter yang ada pada suatu prosedur dan fungsi.
107. Langkah-langkah dalam pemrograman komputer yang benar dan urut adalah :
A. Mendefinisikan masalah, menemukan solusi, memilih algoritma, menulis program, menguji program, merawat program dan menulis dokumentasi
B. Memilih algoritma, mendefinisikan masalah, menemukan solusi, menguji program, menulis dokumentasi, menulis program danmerawat program
C. Mendefinisikan masalah, memilih algoritma, menulis program, menemukan solusi, menguji program, menulis dokumentasi dan merawat program
D. Mendefinisikan masalah, menemukan solusi, memilih algoritma, menulis program, menguji program, menulis dokumentasi dan merawat program
108. Langkah langkah merekam Macro pada MS Excel 2010 yang benar adalah :
A. Letakkan sel aktif pada salah satu sel, gunakan menu Developer Shortcut Key, isikan nama pada Macro Name dan isikan huruf pada Record Macro
B. Letakkan sel aktif pada salah satu sel, gunakan menu Macro Name Shortcut Key, isikan nama pada Developer dan isikan huruf pada Record Macro 2
C. Letakkan sel aktif pada salah satu sel, gunakan menu Shortcut Key Developer, isikan nama pada Record Macro dan isikan huruf pada Macro Name
D. Letakkan sel aktif pada salah satu sel, gunakan menu Developer Record Macro, isikan nama pada Macro Name dan isikan huruf pada Shortcut Key
109. Pernyataan yang benar dalam memberi nama makro adalah :
A. Maksimal 46 huruf, harus diawali dengan huruf, di belakang karakter pertama tidak boleh menggunakan angka dan boleh menggunakan spasi dan titik.
B. Maksimal 64 huruf, harus diawali dengan huruf, di belakang karakter pertama boleh menggunakan angka dan boleh menggunakan spasi dan titik spasi dan titik.
C. Maksimal 46 huruf, harus diawali dengan huruf, di belakang karakter pertama boleh menggunakan angka dan tidak boleh menggunakanspasi dan titik.
D. Maksimal 64 huruf, tidak harus diawali dengan huruf, di belakang
karakter pertama boleh menggunakan angka dan tidak boleh menggunakan spasi dan titik.
110. Program yang benar untuk tampilan di bawah ini adalah :
A. Sub Rounded Rectangle1_Click()
ActiveCell = "Tengah"
Range("C4").Select
Kustiyadi, S.T.
Sub Rounded Rectangle1_Click()
ActiveCell.Offset(0, -1) = "Kiri"
ActiveCell.Offset(-1, 0) = "Atas"
ActiveCell.Offset(1, 0) = "Bawah"
ActiveCell.Offset(0, 1) = "Kanan"
End Sub
B. Sub Rounded Rectangle1_Click()
ActiveCell = "Tengah"
ActiveCell.Offset(0, -1) = "Kiri"
ActiveCell.Offset(-1, 0) = "Atas"
ActiveCell.Offset(1, 0) = "Bawah"
ActiveCell.Offset(0, 1) = "Kanan"
End Sub
C. Sub Rounded Rectangle1_Click()
ActiveCell = "Tengah"
ActiveCell.Offset(0, -1) = "Kiri"
ActiveCell.Offset(-1, 0) = "Atas"
ActiveCell.Offset(1, 0) = "Bawah"
ActiveCell.Offset(0, 1) = "Kanan"
End Sub
D. Sub RoundedRectangle1_Click()
Range("C4").Select
ActiveCell = "Tengah"
ActiveCell.Offset(-1, 0) = "Kiri"
ActiveCell.Offset(0, -1) = "Atas"
ActiveCell.Offset(1, 0) = "Bawah"
ActiveCell.Offset(0, 1) = "Kanan"
End Sub
111. Virus Computer pertama kali dipublikasikan pada Seminar Nasional Keamanan Computer.
A. Tahun 1960 oleh Dr. Fred Cohen dosen Universitas Harvard
B. Tahun 1960 oleh Dr. Fred Cohen dosen Universitas OHЮ
C. Tahun 1984 oleh Perusahaan AT&T
D. Tahun 1984 oleh Dr. Fred Cohen dosen Universitas Harvard
E. Tahun 1984 oleh Dr. Fred Cohen dosen Universitas OHIO
112. Virus Computer pertama kali dipublikasikan pada Seminar Nasional Keamanan Computer.
A. Tahun 1960 oleh Dr. Fred Cohen dosen Universitas Harvard
B. Tahun 1960 oleh Dr. Fred Cohen dosen Universitas OHЮ
C. Tahun 1984 oleh Perusahaan AT&T
D. Tahun 1984 oleh Dr. Fred Cohen dosen Universitas Harvard
E. Tahun 1984 oleh Dr. Fred Cohen dosen Universitas OHIO
ni
Comments
Post a Comment