Home / Visual Basic

Aplikasi Menentukan Bilangan Genap atau Ganjil

Diposting oleh Eman Mendrofa Post a Comment
Untuk membuat aplikasi menentukan bilangan genap atau ganjil, maka lakukanlah langkah-langkah berikut:
  1. Buat project baru menggunakan Standard EXE.
  2. Pada Form1, tambahkan komponen-komponen: 2 Label, 2 TextBox dan 1 CommandButton.
  3. Isilah properti sesuai nilai berikut:
      4. Object Property Nilai
      Form1 StartUpPosition 2 – CenterScreen
      Label1 Caption
      Font      		 Bilangan
      Size:12
      Label2 Caption
      Font      		 Keterangan
      Size:12
      Text1 Font
      Text      		 Size:12
      (kosongkan)
      Text2 Font
      Text      		 Size:12
      (kosongkan)
      Command1 Caption
      Font      		 Caption
      Size:12
  4. Click Command1, tambahkan program untuk mengecek apakah bilangan yang dimasukkan bilangan genap atau ganjil dengan cara : “Jika bilangan habis dibagi dua maka bilangan tersebut genap, jika tidak bilangan tersebut ganjil”.
    5. Private Sub Command1_Click()
    bil = Val(Text1)
    If bil Mod 2 = 0 Then
    ket = "GENAP"
    Else
    ket = "GANJIL"
    End If
    Text2 = ket
    End Sub
    Tampilannya seperti berikut:
  5. Simpan project ini dengan memilih menu[File] >> [Save Project].
  6. Jalankan program dan uji dengan beberapa bilangan.

Sumber:
Basuki Achmad, 2006, Algoritma Pemrograman 2 Menggunakan Visual Basic 6.0, Institut Teknologi Sepuluh Nopember, Surabaya.
Eman Mendrofa
Eman Mendrofa Blogger asal Nias yang punya hobi menulis tapi malas ngepost. Salam Ono Niha, Ya'ahowu

Post a Comment for "Aplikasi Menentukan Bilangan Genap atau Ganjil"

Post a Comment

Berkomentarlah sesuai topik artikel dan jangan menyertakan LINK HIDUP