Berikut ini adalah contoh mendeklarasikan array dan mencoba untuk mengakses setiap elemennya di visual basic 6, untuk mempraktekannya siapkan :
1. Buat 1 Project baru dengan 1 Form dan 1 Commandbutton
2. Copy-kan coding berikut ke dalam editor form yang bertalian
Dim i As Integer, j As Integer2. Copy-kan coding berikut ke dalam editor form yang bertalian
Private Sub Command1_Click()
Dim Counters(14) As Integer
Dim Sums(20) As Double
'Deklarasi pertama membuat sebuah array dengan 15 element,
'dengan nomor indeks dimulai dari 0 sampai 14. Yang kedua
'membuat sebuah array dengan 21 element, dengan nomor
'indeks dimulai dari 0 sampai 20.
'Default indeks terendah adalah 0 (nol).
'Berikut salah satu cara untuk mengisi
'dan mengakses array tsb:
For i = 0 To 14
Counters(i) = i
MsgBox Counters(i)
Next i
For j = 0 To 20
Sums(j) = j * 0.2
MsgBox Sums(j)
Next j
'Untuk membuat elemen array yang terendah sesuai dengan keinginan, kita harus
'mengekspresikannya secara eksplisit (seperti sebuah tipe data Long) menggunakan
'kata kunci "To". Perhatikan contoh di bawah ini:
Dim Counters1(1 To 15) As Integer
Dim Sums1(100 To 120) As String
'Deklarasi yang pertama, jumlah indeks dari Counters1 mulai dari 1 sampai 15,
'dan jumlah indeks dari Sums1 mulai dari 100 sampai 120.
'Berikut cara mengisi dan mengakses array tsb:
For i = 1 To 15
Counters1(i) = i
MsgBox Counters1(i)
Next i
For j = 100 To 120
Sums1(j) = "String ke-" & j
MsgBox Sums1(j)
Next j
End Sub
Tags:
contoh program vb6, contoh fungsi di vb6, cara penggunaan fungsi vb, tutorial vb6, download tutorial vb6, vb6 tutorial download, dasar dasar vb6, belajar vb6, cara mudah belajar vb6, vb6 artikel download, vb6 blog, contoh program vb6, artikel vb6, semua tentang vb6, vb6 api, cara menggunakan module, cara menggunakan class module
0 komentar:
Posting Komentar