Looping pada VB.Net 2008, Soal 1

Di sini saya akan mencoba membua membuat aplikasi sederhana looping, dan form2 yang digunakan adalah : 1 textbox yang diproses dengan menggunakan Botton dengan menampilakan hasil pada listbox.

Awalnya kita membuat form yang terdiri 1botton untuk proses, 1 textbox untuk input nilai dan 1 listbox untuk menampilkan hasilnya. Mari kita Mulai Yuuukkk…


Setelah selesai membuat form seperti gambaran diatas langkah selanjutnya membuat coding, begini caranya …?



wah gambar'a ga jelas..Ni q kasih sintak-nya...!!

Public Class Form1


Private Sub Proses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Proses.Click

Dim i As Integer

ListBox1.Items.Clear()


For i = 1 To Val(TextBox1.Text)


If (i Mod 7 = 0) And (i Mod 4 = 0) Then


ListBox1.Items.Add(i)

End If


Next

End Sub

End Class


Disini kita akan menampilkan hasil 0 jika pembaginya 4 dan 7 dari bilangan 1 sampai 100, maka…..

masukan coding sesuai pada tampilan diatas tanpa merubah sedikit kata apapun.

Kecuali mau menampilkan dengan hasil yang beda.

Setelah semua tertulis dengan benar, maka mari kita Running atau dengan menekan F5

Jika tidak ada yang ERROR maka hasil tampilannya akan seperti berikut ini :


Jika ada kesalahan, mohon dimaafkan ya...soalnya w juga masih dalam tahap belajar. Jangan lupa comentarnya ditunggu...

Leave a Reply

Daftar Blog Saya

About Me

Diberdayakan oleh Blogger.

About


ShoutMix chat widget