WHILE END WHILE

WHILE END WHILE

Berikut adalah perulangan while end while

Perulangan While -End While digunakan untuk perulangan yang jumlah perulangannya tidak diketahui. Perulangan ini akan dijalankan sesuai kondisi yang telah ditetapkan.

Sintaks: 

                       While(Kondisi)

                              ekspresi

                         End While

Komple:

                       Dim i As Integer

                        i=1

                        ListBox1.Items.Clear()

                        While i<=10

                           ListBox1.Items.Add(i)

                           i=i+1

                          End While