Imports System
Module Program
Sub Main()
' Deklarasi variabel
Dim angka As Integer = 10
Dim hasil As Integer
' Struktur pengkondisian
If angka > 5 Then
hasil = angka * 2
Console.WriteLine("Angka lebih besar dari 5, hasil: " & hasil)
Else
hasil = angka - 2
Console.WriteLine("Angka lebih kecil atau sama dengan 5, hasil: " & hasil)
End If
' Perulangan
For i As Integer = 1 To 5
Console.WriteLine("Iterasi ke-" & i)
Next
' Menunggu input sebelum menutup aplikasi
Console.ReadLine()
End Sub
End Module