Breaking News
Home / Source / Mendeklarasikan Array pada source code server pulsa
@sourceCode

Mendeklarasikan Array pada source code server pulsa

Anda dapat mendeklarasikan array untuk bekerja dengan seperangkat nilai-nilai dari tipe data yang sama. Array adalah variabel tunggal dengan banyak kompartemen untuk menyimpan nilai-nilai, sedangkan variabel khas hanya memiliki satu kompartemen penyimpanan yang dapat menyimpan hanya satu nilai. Merujuk array secara keseluruhan bila Anda ingin merujuk semua nilai itu berlaku, atau Anda dapat merujuk ke elemen individu.

Misalnya, untuk menyimpan biaya harian untuk setiap hari sepanjang tahun, Anda dapat mendeklarasikan satu variabel array dengan 365 elemen, daripada menyatakan 365 variabel. Setiap elemen dalam array berisi satu nilai. Pernyataan berikut mendeklarasikan array variabel curExpense dengan 365 elemen. Secara default, array diindeks dimulai dengan nol, sehingga batas atas array adalah 364 bukan 365.

Dim curExpense (364) Sebagai Mata Uang

Untuk menetapkan nilai elemen individual, Anda menentukan indeks elemen. Contoh berikut memberikan nilai awal 20 untuk setiap elemen dalam array.

Sub FillArray ()
Dim curExpense (364) Sebagai Mata Uang
Dim inti As Integer
Untuk Inti = 0-364
curExpense (inti) = 20
Berikutnya
end Sub

Mengubah Batas Bawah
Anda dapat menggunakan pernyataan Option Base di atas modul untuk mengubah default index dari elemen pertama dari 0 sampai 1. Pada contoh berikut, pernyataan Option Base perubahan indeks untuk elemen pertama, dan pernyataan Dim demikianlah variabel array curExpense dengan 365 elemen.

Option Base 1
Dim curExpense (365) Sebagai Mata Uang

Anda juga dapat secara eksplisit mengatur batas bawah dari array dengan menggunakan Untuk klausa, seperti yang ditunjukkan dalam contoh berikut.

Dim curExpense (1 Untuk 365) Sebagai Mata Uang
Dim strWeekday (7 Untuk 13) As String

Menyimpan Nilai Varian di Array
Ada dua cara untuk membuat array dari nilai-nilai Varian. Salah satunya adalah dengan mendeklarasikan array dari Variant jenis data, seperti yang ditunjukkan dalam contoh berikut:

Dim varData (3) As Variant
varData (0) = “Claudia Bendel”
varData (1) = “4242 Maple Blvd”
varData (2) = 38
varData (3) = Format ( “1952/06/09”, “Tanggal Umum”)

Cara lain adalah untuk menetapkan array dikembalikan oleh fungsi Array ke variabel Variant, seperti yang ditunjukkan dalam contoh berikut.

Dim varData Sebagai Variant
varData = Array ( “Ron Bendel”, “4242 Maple Blvd”, 38, _
Format ( “1952/06/09”, “Tanggal Umum”))

Anda mengidentifikasi elemen dalam sebuah array nilai Variant dengan indeks, tidak peduli teknik yang Anda gunakan untuk membuat array. Misalnya, pernyataan berikut dapat ditambahkan ke salah satu dari contoh sebelumnya.

MsgBox “Data untuk” & varData (0) & “telah direkam.”

Menggunakan Multidimensional Array
Dalam Visual Basic, Anda dapat mendeklarasikan array dengan sampai 60 dimensi. Misalnya, pernyataan berikut mendeklarasikan 2-dimensi, 5-by-10 array.

Dim sngMulti (1 Untuk 5, 1 Untuk 10) As Single

Jika Anda berpikir tentang array sebagai matriks, argumen pertama merupakan baris dan argumen kedua menunjukan kolom.

Gunakan bersarang Untuk … laporan Berikutnya untuk memproses array multidimensi. Prosedur berikut mengisi array dua dimensi dengan nilai tunggal.

Sub FillArrayMulti ()
Dim inti As Integer, INTJ As Integer
Dim sngMulti (1 Untuk 5, 1 Untuk 10) As Single

‘Isi array dengan nilai-nilai.
Untuk Inti = 1 Untuk 5
Untuk INTJ = 1 Untuk 10
sngMulti (Inti, INTJ) = INTI * INTJ
Debug.Print sngMulti (Inti, INTJ)
Berikutnya INTJ
Berikutnya Inti
end Sub

About noppi

matrixpulsa Developer & CEO

Leave a Reply

Your email address will not be published. Required fields are marked *