kontrol do while loop anugrah bintang langkari 20219948 1EB10 PKTI 2B

tahapan pembuatan program dan logikanya dengan flowchart:
1. klik Microsoft Visual Basic
2.  Buat 1 Text; 1  ListBox ; 1 Label dan 3 Command
3.  Pengaturan Desain Form Pengaturan dilakukan dalam jendela properti
 List 1 - 
Text 1 Text 
Label 1 Caption Input Bilangan 
Command 1 caption do while
 Command 2 caption do until
 Command 3 Caption Caption Caption Clear
4.  Pembutan Kode Program : 
Private Sub Command1_Click()
 List1.Clear 
i = Val(Text1.Text)
 Do 
List1.AddItem "Angka " & i 
i =  i + 2 Loop While i <= 10
 End Sub
Private Sub Command2_Click() 
List1.Clear i = 
Val(Text1.Text) 
Do 
List1.AddItem "Angka " & i
 i = i - 4 Loop Until i < 5 
End Sub
Private Sub Command3_Click()
 Text1.Text = "" 
List1.Clear 
End Sub
5. Uji Coba Aplikasi Do Loop While
6. klik code2flow.com
7. masukan kode program yang tadi dibuatkan dari vb