Listbox1 Mengurutkan dari 1-10
Public Class Form1
Private
Sub Form1_Load(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Dim
halaman As Byte
halaman = 1
Do
While halaman <= 10
ListBox1.Items.Add(halaman)
halaman = halaman + 1
Loop
End
Sub
End Class
Postingan
0 komentar:
Posting Komentar