Membuat Aplikasi Menentukan Bilangan Genap di VB.Net


advertisement

Sebelum anda Membuat Aplikasi Menentukan Bilangan Genap di VB.Net anda harus sudah memahami dasar Visual Basic atau Visual Studio. Disini saya menggunakan Visual Studio 2010.

- Silahkan buat design seperti di atas.
- Beri nama textbox1 =  "dari" dan textbox2 = "sampai"
- Beri nama ListBox dengan "ListGenap"
- Taruh script di bawah ini untuk tombol "TAMPILKAN"


Dim awal, akhir As Integer 
If Val(dari.Text) < Val(sampai.Text) Then 
awal = dari.Text 
akhir = sampai.Text 
End If 
ListGenap.Items.Clear() 
While awal < akhir 
If awal Mod 2 = 0 Then 
ListGenap.Items.Add(awal) 
End If  
awal = awal + 1 
End While



- Taruh script berikut di Button Keluar :

me.Close()

Selesai. Berikut tugas dari pelajaran Pemrograman Terstruktur.

Penjelasan script diatas adalah :

Jika dari kurang dari bagi, maka variabel dibuat "dari" dan "sampai".
Kemudian ListGenap akan dikosongkan.
Looping dimulai ketika variabel awal kurang dari akhir. Artinya jika lebih maka akan berhenti.
Jika awal dibagi 2 sisanya 0, maka akan masuk list. Selain itu dilewati.
Perhitungan terus berjalan ditambah 1 sampai mendekati variabel "sampai"

Mudah kan?

advertisement

Silahkan tinggalkan komentar apabila ada yang ingin ditanyakan

Kamu Pakai Adblock (Anti Iklan)?

Maaf, harap jangan menggunakan Adblock (Anti Iklan) untuk mendukung situs ini tetap berjalan.

Dengan mematikan Adblock (Anti Iklan) berarti kamu telah bersedekah kepada kami.

Terimakasih banyak. ^_^