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.
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 :
