1. If... Then... Else...
Digunakan sebagai statemen kondisi. Sebuah kode/blok kode akan dijalankan apabila kondisi terpenuhi (true), dan blok kode lainnya akan dijalankan apabila kondisi tidak terpenuhi (false).
Syntax 1:
If conditional Then statement
Contoh:
If nilai_angka >= 80 Then nilai_huruf = “A”
Syntax 2:
If conditional Then
Statement
End If
Contoh:
If nilai_angka >= 80 Then
nilai_huruf = “A”
MsgBox “Selamat Anda mendapat nilai terbaik”, _
vbInformation, “Informasi”
End If
Syntax 3:
If conditional Then
statement
Else
statement
End If
Contoh:
If nilai_angka >= 80 Then
nilai_huruf = “A”
MsgBox “Selamat Anda mendapat nilai terbaik”, _
vbInformation, “informasi”
Else
MsgBox “Anda harus belajar lebih giat lagi”, _
vbInformation, “Informasi”
End If
Syntax 4:
If conditional Then
statement
Else lf condition2 Then
statement
Else
Statement
End If
Contoh:
If nilai_angka >= 80 Then
nilai_huruf = “A”
MsgBox “Selamat Anda mendapat nilai terbaik”, _
vbInformation, “Informasi”
Else lf nilai_angka >= 70 Then
nilai_huruf = “B”
MsgBox “Nilai anda baik”, _
vbInformation, “Informasi”
Else
MsgBox “Nilai anda kurang”, _
vbInformation, “Informasi”
End If
2. Do... Loops
Digunakan sebagai statemen perulangan.
Syntax 1:
Do Until (Expression)
(Code to execute)
Loop
Contoh:
Dim i As Integer
I = 0
Do Until = 100
I = i + 1
Loop
EmoticonEmoticon