Program Perulangan For Next VB 6.0
Home »
Pemrograman Visual
» Program Perulangan For Next VB 6.0
kodingnya :
Private Sub Command1_Click()
End
End Sub
Private Sub Form_Load()
Dim i As Integer
Dim awal, akhir As Integer
awal = 1
akhir = 26
For i = awal To akhir Step 3
'List1.AddItem MonthName(i)
'List1.addItem i
kode_ascii = 64 + i
List1.AddItem Chr(kode_ascii)
Next i
End Sub
dan artikel tentang visual basic akan saya bahas lagi di lain waktu... hehehe..semoga nggk ada yang salah ya,...
berkunjung kemari, sambil baca artikel menarik ini :)
ReplyDelete@Yousake NKRI thanks gan... udah ane visit back juga,...
ReplyDelete