Cara Membuat Aplikasi List Bilangan Ganjil VB.NET
1. Pertama, buka VB.NET sobat.
2. Buat form baru, kasih nama terserah sobat.
3. Tambahkan : 3 Label, 2 TextBox, 2 Button, 1 ListBox
4. Kemudian Susun dan atur nama text seperti gambar dibawah ini :
5. Disini saya ganti nama TextBox1 menjadi DR dan TextBox2 menjadi SA, ganti aja nama apa aja terserah sobat, tapi jangan lupa kodingnya juga harus benar ya.
6. Lalu Klik dua kali pada button1 atau TAMPILKAN, dan masukkan koding dibawah ini :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim awal As Integer, akhir As Integer
If Val(DR.Text) < Val(SA.Text) Then
awal = DR.Text
akhir = SA.Text
Else
awal = DR.Text
akhir = SA.Text
End If
LIST.Items.Clear()
While awal < akhir
If awal Mod 2 = 1 Then
LIST.Items.Add(awal)
End If
awal = awal + 1
End While
End Sub
7. Kemudian pada button2 atau KELUAR isi koding Me.Close() koding ini berfungsi untuk menutup aplikasi atau form.
8. Nah selamat project aplikasi sobat sudah jadi, sekarang tinggal test apakah aplikasi ini berjalan dengan benar, cara testnya dengan memasukkan angka terserah sobat pada kolom TextBox1 dan TextBox2, disini saya mencoba memasukkan angka 1 sampai 50, lalu klik tampilkan, maka aplikasi ini akan mencari bulangan ganjil dari angka 1-50 dan akan ditampilkan pada listbox. Lebih jelasnya lihat gambar dibawah ini :
Selamat, apilasinya berjalan dengan lancar ^_^, jika terjadi error coba cek pada koding atau pada penamaan common controls pada form sobat. Cukup mudah bukan? selamat mencoba. Terima kasih telah membaca artikel mengenai Cara Membuat Aplikasi List Bilangan Ganjil VB.NET
Wah gan makasih atas codingnya, berjalan sempurna (y)
ReplyDeletewahh bagus juga nih program,coba ahh
ReplyDelete