
 | Artikel Visual Basic |
 | Basis Data - Database |
 | Pemrograman Grafis |
 | E-Book Tutorial |
 | Video Kursus - Tutorial |
 | Software - Open Source code |
 | W E B Programming |
 | Windows System |
 | XBasicFramework |
 | Berbagi Pengalaman |
 | Quick Basic |
|
Software gratis! Open Source
Code
|
|
|
|
|
MENU>Artikel Visual Basic>Visual Basic 6.0>Array
|
Array |
 |
|
|
|
|
Private Sub Command1_Click()
Dim NamaBulan(12) As String
NamaBulan(1) = "Januari"
NamaBulan(2) = "Februari"
NamaBulan(3) = "Maret"
NamaBulan(4) = "April"
NamaBulan(5) = "Mei"
NamaBulan(6) = "Juni"
NamaBulan(7) = "Juli"
NamaBulan(8) = "Agustus"
NamaBulan(9) = "September"
NamaBulan(10) = "Oktober"
NamaBulan(11) = "November"
NamaBulan(12) = "Desember"
x = Text1.Text
Text2.Text = NamaBulan(x)
End Sub
Download Kode di sini
Untuk memperoleh penjelasan lebih detail anda
bisa baca E-Book saya yang berjudul TRIK DASAR
BELAJAR VISUAL BASIC 6.0
klik
di sini
|
|