Subscribe

Membuat program looping dengan VB.6

Diposkan oleh Faid_Sang on Selasa, 31 Mei 2011

sekarang saya akan membahas Looping menggunakan VB.
langsung ja ya!
Langkah pertama  temen-temen buka program VB dunk!!,,,
buka new projec, 4 commad button dan 4 pictutebox!
kemudian copy coding di bawah ini!

Private Sub Command1_Click()
For i = 1 To 10
   Picture1.Print i;
Next i
End Sub


Private Sub Command2_Click()
Do
 i = i + 1
   Picture2.Print i;
  Loop Until i = 10
End Sub


Private Sub Command3_Click()
  While i < 10
  i = i + 1
  Picture3.Print i;
Wend
End Sub


Private Sub Command4_Click()
   Do While i < 10
     i = i + 1
     Picture4.Print i;
   Loop
End Sub


Private Sub Command5_Click()
Do
   i = i + 1
   Picture5.Print i;
   If i = 10 Then Exit Do
Loop
End Sub


Mudah khan?!!!
semoga bermanfaat....

0 komentar: