Looping kali ini hampir mirip kaya looping pada soal No.1, hanya saja bilangan yang akan kita masukan penbaginya 4 sisa hasilnya adalah 3, mari kita mulai....
Awalnya kita membuat form yang terdiri 1botton untuk proses, 1 textb
ox untuk input nilai dan 1 listbox untuk
menampilkan hasilnya.
Setelah selesai membuat form seperti gambaran diatas langkah se
lanjutnya membuat coding, begini caranya …?
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 4 = 3) Then
ListBox1.Items.Add(i)
End If
Next
End Sub
End Class
Disini kita akan menampilkan hasil 0 jika pembaginya 4 dan sisa hasilnya 3 dari bilangan 1 sampai 100, maka…..
Kecuali mau menampilkan dengan hasil yang beda.
Setelah semua tertulis dengan benar, maka mari kita Running.
Jika g’ ada yang ERROR maka hasil tampilannya akan seperti berikut ini :
Hampir sama kan seperti soal No.1, hanya saja hasil bagi'a yang berbeda...Selamat mencoba
Daftar Blog Saya
About Me
