Visual Basic 2010 Perulangan Dengan While

//lh3.googleusercontent.com/-K5UKWzgJhmU/AAAAAAAAAAI/AAAAAAAACdI/CN3nwiBZsGE/s512-c/photo.jpg
November 16, 2016





Perulangan Dengan While VB 2010

 Public Class Form5

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim bilangan As Integer = 1

        ListBox1.Items.Clear()

        While bilangan <= TextBox1.Text

            ListBox1.Items.Add(bilangan)

            bilangan = bilangan + 1

        End While

    End Sub


    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        End

    End Sub

End Class 

Sekian share di atas semoga apa yang kami share bermanfaat bagi anda semua, jangan lupa share keteman kalian juga supaya kita saling mengetahui cara meggunakan vb2010.


Related Post

SUBSCRIBE TO OUR NEWSLETTER

closed