Latihan III

LOOPING

Latihan III

            Looping adalah pengurutan variable bisa urutan dari bawah ke atas atau kebalikannya contoh urutan nomor 1 sampai setrusnya A sampai Z dan lain-lain. Di dalam looping akan kita temukan yang namanya “Do until”,”Do while”,”For”.Pada Visual basic kita mencoba menerapkan looping didalamnya. Silahkan melihat langkah-langkahnya dibawah ini.

Langkah-langkah

1.      Buatlah tampilan seperti gambar dibawah ini text disesuaikan dengan contoh gambar,jangan lupa name pada properti masing-masing tools

2.      Klik 2x pada button do until ketik programnya seperti dibawah ini

Dim z As Byte

        ListBox1.Items.Clear()

        z = 1

        Do Until z = 11

            ListBox1.Items.Add(z)

            z = z + 1

        Loop

3.      Klik 2x pada button do while kembali kita ketik program dibawah ini

Dim x As Byte

        ListBox2.Items.Clear()

        x = 1

        Do While x <= 10

            ListBox2.Items.Add(x)

            x = x + 1

        Loop

4.      Klik 2x button for next ketik program dibawah ini

Dim y As Integer

        ListBox3.Items.Clear()

        For y = 20 To 1 Step -5

            ListBox3.Items.Add(y & "b")

        Next

5.      Klik 2x button while F while ketik program dibawah ini

dim b As Byte

        ListBox4.Items.Clear()

        b = 1

        While b <= 10

            ListBox4.Items.Add(b)

            b = b + 1

        End While

6.       Dan yang terakhir klik 2x for next ke 2 ketik program dibawah ini

Dim a As Integer

        ListBox5.Items.Clear()

        For a = 1 To 10

            ListBox5.Items.Add("STMIK")

        Next

Jalankanlah VB anda liat hasilnya,inilah contoh pengunaan looping pada proram VB dan dapat kita simpulkan pula perbedaan for dengan while yaitu pada for perintah akan dikerjakan apa bila statemen salah dan kebalikannya pa while perintah akan dikerjakan bila statemen benar

Demikian pembahasan kita mengenai looping mudah-mudahan dapat bermanfaat buat diri saya pribadi dan anda sekalian