Coding Menentukan Bilangan Ganjil Genap dengan VB 6.0

Pada kesempatan ini kami akan mengulas tentang dengan judul artikel .

Artikel Terkait Visual Basic 6 Lainnya
Pada Latihan VB 6.0 kali ini akan dibahas tentang Cara Menentukan Bilangan Ganjil Genap Dengan VB 6.0

Berikut Langkahnya :
Buka Aplikasi VB 6.0 anda
Buatlah sebuah Form Dengan Design seperti gambar dibawah ini :
Cara Menentukan Bilangan Ganjil Genap Dengan VB 6.0

Gambar diatas terdapat :
Label1
Label2
Text1
Command1
Command2

Kemudian masukan koding dibawah ini :

Private Sub command1_Click()
    If Text1 = "" Then
        MsgBox "Bilangan masih kosong"
        Else
           If Text1.Text Mod 2 = 0 Then
           Label2.Caption = Text1.Text + " Bilangan Genap"
           Else
           Label2.Caption = Text1.Text + " Bilangan Ganjil"
           End If
        End If
End Sub

Private Sub Command2_Click()
End
End Sub

Private Sub Form_Load()
Label2.Caption = ""
Text1.Text = ""
End Sub

Kemudian jalankan Program diatas


Selain Sebagai Penyedia Panduan Belajar Database dan Tutorial Pemrograman, Kami Juga Membagikan Kumpulan Source Code Program Aplikasi dan Ebook Pemrograman Terlengkap yang Bisa Anda Dapatkan Secara Gratis di Halaman :

Penelusuran terkait Visual Basic 6

Berlangganan artikel
Daftarkan e-mail Anda dibawah ini
Selanjutnya cek e-mail untuk verifikasi.
Kategori Terpopuler

0/Posting Komentar/Komentar

Lebih baru Lebih lama