Cara Membuat Program Looping Do UNtil Pada Visual Basic 2010

Langsung saka ke prakteknya yah gan ,

pertama : buka aplikasi microsoft visual basic 2010

kedua : tambahkan satu buah listbox dan button

ketiga : Klik 2 kali di tombol button lalu masukan koding berikut

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim a As Integer
        a = 1
        Do Until a = 11
            ListBox1.Items.Add(a)
            a = a + 1
        Loop
    End Sub

Selesai persoalan gan ... Berikut ane kasih penampakannya :

 Gambarnya ane buat pake ms paint jadi maaf kalau berantakan