Jawaban:

Deklarasi variabel alas, tinggi, dan luas yang bertipe data Double pada VB

• Dim alas, tinggi, luas As Double

Deklarasi variabel nama dan alamat yang bertipe data String pada VB

• Dim nama, alamat As String

Kode program untuk mendeteksi bilangan genap atau ganjil dengan If Then Else

Misalkan sudah terdeklarasi sebuah variabel x bertipe Integer atau Long dan sudah terisi nilainya. Sebagai contoh output, dipilih Console.WriteLine(). Bisa menggunakan cara output yang lain, misalnya dengan MsgBox.

• If x Mod 2 = 0 Then
     ' x adalah bilangan genap
     Console.WriteLine("x adalah bilangan genap.")
  Else
     ' x adalah bilangan ganjil
     Console.WriteLine("x adalah bilangan ganjil.")
  End If

Kode program untuk menampilkan hari berdasarkan suatu bilangan menggunakan Select Case

Misalkan sudah terdeklarasi sebuah variabel h bertipe Integer untuk menyimpan angka dari 1 hingga 7, dan variabel namahari bertipe String untuk menyimpan nama hari.
Asumsi: hari ke-1 = Senin, hari ke-7 = Minggu.

• Select Case h
     Case 1
         namahari = "Senin"
     Case 2
         namahari = "Selasa"
     Case 3
         namahari = "Rabu"
     Case 4
         namahari = "Kamis"
     Case 5
         namahari = "Jumat"
     Case 6
         namahari = "Sabtu"
     Case 7
         namahari = "Minggu"
     Case Else
         namahari = "(tak terdefinisi)"
  End Select
  ' contoh output
  Console.WriteLine("Hari ke-" + Trim(Str(h)) + " adalah hari " + namahari + ".")

Kita juga dapat memanfaatkan enumerasi pada VB.

Contoh kode programnya:

• Dim h as Integer
  Dim namahari as String
  Enum hari
     Senin
     Selasa
     Rabu
     Kamis
     Jumat
     Sabtu
     Minggu
  End Enum
  Public Sub Main()
     h = 5
     Select Case h
         Case 1 To 7
             namahari = [Enum].GetNames(GetType(hari))(h-1)
         Case Else
             namahari = "(tak terdefinisi)"
     End Select
     Console.WriteLine("Hari ke-" + Trim(Str(h)) + " adalah hari " + namahari + ".")
  End Sub