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