Array VB.Net: String, Dinamis dengan CONTOH

Apa itu Array?

Array adalah struktur data yang digunakan untuk menyimpan elemen-elemen yang sama. tipe dataElemen-elemen diurutkan secara berurutan dengan elemen pertama berada pada indeks 0 dan elemen terakhir pada indeks n-1, di mana n adalah jumlah total elemen dalam array.

Cara Mendeklarasikan dan Menginisialisasi Array

In VB.Net, array dideklarasikan menggunakan pernyataan Dim. Misalnya:

Dim myData() As Integer

Dalam contoh di atas, kita telah mendefinisikan sebuah array bernama myData, dan array tersebut harus menampung elemen-elemen bertipe data integer. Contoh berikut menunjukkan bagaimana kita dapat mendeklarasikan sebuah array untuk menampung elemen-elemen string:

Dim myData(10) As String

Kami telah mendefinisikan array bernama myData untuk menampung 10 string.

Kita dapat menginisialisasi array pada saat deklarasinya. Misalnya:

Dim myData() As Integer = {11, 12, 22, 7, 47, 32}

Kami telah mendeklarasikan array myData dan menambahkan 6 elemen integer ke dalamnya. Hal ini juga dapat dilakukan untuk kasus string:

Dim students() As String = {"John", "Alice", "Antony", "Gloria", "jayden"}

Kami telah membuat array bernama siswa dan menambahkan 5 nama ke dalamnya.

Array dalam VB.Net terbagi menjadi dua kelompok tergantung pada apakah ukurannya dapat berubah setelah deklarasi. Kelompok pertama adalah array berukuran tetap.

Array Ukuran Tetap

Array berukuran tetap menampung sejumlah elemen tetap. Ini berarti Anda harus menentukan jumlah elemen yang akan ditampungnya selama definisinya. Misalkan Anda memerlukan sebuah array untuk menampung hanya 3 nama siswa. Anda dapat mendefinisikan dan menginisialisasi array sebagai berikut:

Dim students(0 to 2) As String 
      
students(0) = "John"
students (1) = "Alice"
students (2) = "Antony"

Kita mulai dengan mendeklarasikan array string bernama students. Angka 0 hingga 2 menyatakan bahwa array akan menyimpan elemen dari indeks 0 hingga indeks 2, yang berarti kita akan memiliki total 3 elemen.

Untuk menambahkan elemen ke dalam array, kita telah menggunakan nama array dan menentukan indeks di mana elemen tersebut akan disimpan. Misalnya nama John akan disimpan pada indeks 0 array, artinya akan menjadi elemen pertama array. Antony akan menjadi elemen terakhir dari array.

Ketika jumlah elemen tidak diketahui sebelumnya, array dinamis menjadi pilihan yang lebih baik.

Array Dinamis

Ini adalah array yang dapat menampung sejumlah elemen. Ukuran array dapat bertambah kapan saja. Ini berarti Anda dapat menambahkan elemen baru ke array kapan saja kita mau. Untuk mendemonstrasikannya, pertama-tama mari kita definisikan array bilangan bulat:

Dim nums() As Integer

Kami telah mendefinisikan array bilangan bulat bernama nums. Anda sekarang perlu menambahkan dua elemen ke array, sambil memberikan ruang untuk mengubah ukurannya. Anda perlu menggunakan pernyataan ReDim sebagai berikut:

ReDim nums(1)
nums(0) = 12
nums(1) = 23

Array kita sekarang memiliki dua elemen di indeks 0 dan 1. Kita perlu menambahkan elemen ketiga ke dalamnya di indeks 3 sambil mempertahankan dua elemen yang sudah dimilikinya. Kita dapat melakukannya sebagai berikut:

ReDim Preserve nums(2)
nums(2) = 35

Array sekarang memiliki tiga elemen.

Setelah sebuah array diisi, tugas selanjutnya adalah membaca kembali nilai-nilai yang ada di dalamnya.

Mengambil Isi Array

Mengambil berarti mengakses elemen array. Untuk mengakses elemen array, kami menggunakan indeksnya. Mari kita tunjukkan ini dengan menggunakan sebuah contoh.

Langkah 1) Mulailah dengan membuat aplikasi konsol baru.

Langkah 2) Tambahkan kode berikut ke aplikasi:

Module Module1
    Sub Main()

       Dim students(0 to 2) As String 

        students(0) = "John"

        students(1) = "Alice"

        students(2) = "Antony"

        Console.WriteLine("First student is {0} ", students(0))

        Console.WriteLine("Second student is {0} ", students(1))

        Console.WriteLine("Third student is {0} ", students(2))


        Console.ReadKey()

    End Sub

End Module

Langkah 3) Jalankan kode dengan mengklik tombol Mulai dari bilah alat. Anda akan mendapatkan jendela berikut:

Kami telah menggunakan kode berikut:

penjelasan dari Code:

1. Membuat modul bernama Module1.
2. Membuat sub-prosedur utama.
3. Membuat array bernama siswa untuk menyimpan elemen string. Array akan menyimpan elemen dari indeks 0 hingga indeks 2, yang berarti akan memiliki total 3 elemen.
4. Menambahkan nama John sebagai elemen pertama array, yaitu John disimpan pada indeks 0.
5. Menambahkan nama Alice sebagai elemen kedua dari array, yaitu Alice disimpan di indeks 1.
6. Menambahkan nama Antony sebagai elemen ketiga dari array, yaitu Antony disimpan di indeks 2.
7. Mencetak beberapa teks dan elemen yang disimpan pada indeks 0 dari array siswa di konsol. Siswa(0) membantu kita mengakses elemen pada indeks 0 dari array bernama siswa.
8. Mencetak beberapa teks dan elemen yang disimpan pada indeks 1 dari array siswa di konsol. Siswa(1) membantu kita mengakses elemen pada indeks 1 dari array bernama siswa.
9. Mencetak beberapa teks dan elemen yang disimpan pada indeks 2 dari array siswa di konsol. Siswa(2) membantu kita mengakses elemen pada indeks 2 dari array bernama siswa.
10. Menjeda jendela konsol menunggu pengguna mengambil tindakan untuk menutupnya.
11. Akhir dari sub-prosedur.
12. Akhir modul.

Menambahkan Elemen Baru ke Array

Ini hanya akan terjadi jika Anda memiliki array dinamis. Jika Anda telah mendeklarasikan array berdimensi ukuran tetap dan array tersebut penuh dengan elemen array, Anda tidak dapat menambahkan elemen baru ke dalamnya. Contoh berikut menunjukkan cara menambahkan elemen baru ke array dinamis:

Langkah 1) Mulailah dengan membuat aplikasi konsol baru.

Langkah 2) Tambahkan kode berikut ke aplikasi:

Module Module1
    Sub Main()

        Dim nums() As Integer

        ReDim nums(1)
        nums(0) = 12
        nums(1) = 23

        For x = 0 To nums.Length - 1
            Console.WriteLine("Initial array element: {0}", nums(x))
        Next

        ReDim Preserve nums(2)
        nums(2) = 35

        For x = 0 To nums.Length - 1
            Console.WriteLine("Final array element: {0}", nums(x))
        Next

        Console.ReadKey()
    End Sub

End Module

Langkah 3) Klik tombol Mulai dari bilah alat untuk menjalankan kode. Anda akan mendapatkan jendela berikut:

Kami telah menggunakan kode berikut:

penjelasan dari Code:

1. Membuat modul bernama Module1.
2. Membuat sub-prosedur utama.
3. Membuat array bernama nums untuk menampung nilai integer.
4. Menentukan bahwa array di atas akan menyimpan dua elemen, yaitu pada indeks 0 dan 1 sambil menyediakan ruang untuk pengubahan ukuran.
5. Menambahkan elemen 12 ke indeks 0 nomor array.
6. Menambahkan elemen 23 ke indeks 1 nomor array.
7. Menggunakan perulangan for untuk membuat variabel x untuk membantu kita melakukan iterasi dari elemen pertama hingga terakhir dari nomor array. Perhatikan bahwa array sekarang memiliki dua elemen, 12 dan 23.
8. Mencetak beberapa teks dan elemen array di konsol.
9. Mengakhiri perulangan for dan melompatping ke bagian kode selanjutnya.
10. Ubah ukuran jumlah array untuk mengizinkan elemen pada indeks 0 hingga 2. Sekarang array dapat menyimpan 3 elemen, bukan 2. Kata kunci Preserve membantu kita mempertahankan elemen array saat ini, yaitu 12 dan 23.
11. Menambahkan elemen 35 ke indeks 2 array. Array sekarang memiliki tiga elemen, 12, 23 dan 35.
12. Menggunakan perulangan for untuk membuat variabel x untuk membantu kita melakukan iterasi dari elemen pertama hingga terakhir dari nomor array. Perhatikan bahwa array sekarang memiliki tiga elemen, 12, 23 dan 35.
13. Mencetak beberapa teks dan elemen array di konsol.
14. Mengakhiri perulangan for dan melompatping ke bagian kode selanjutnya.
15. Jeda jendela konsol menunggu pengguna mengambil tindakan untuk menutupnya.
16. Akhir dari sub-prosedur.
17. Akhir modul.

Menghapus Array

Disarankan agar Anda menghapus array Anda setelah Anda selesai menggunakannya, terutama ketika Anda berurusan dengan array dinamis. Ini akan membantu Anda mengosongkan sebagian ruang memori.

Untuk menghapus sebuah array, Anda hanya perlu memanggil pernyataan Erase diikuti dengan nama array. Misalnya:

Dim nums(1) As Integer
        nums(0) = 12
        nums(1) = 23
Erase nums

Kami telah mendeklarasikan array bilangan bulat bernama nums dan menambahkan dua elemen ke dalamnya. Pernyataan Erase nums akan menghapus array.

Selain menyimpan nilai, VB.Net menyediakan fungsi bawaan yang mengkonversi antara string dan array. Yang pertama adalah fungsi Split.

Fungsi Pemisahan

Fungsi split yang disediakan oleh Visual Basic .NET membantu kita membagi string menjadi beberapa bagian dan menyimpannya dalam sebuah array. Contoh berikut menunjukkan cara menggunakan fungsi ini:

Langkah 1) Buat aplikasi konsol baru.

Langkah 2) Tambahkan kode berikut ke aplikasi:

Module Module1
    Sub Main()

        Dim myarray() As String
        Dim guru99 As String
        Dim x As Integer

        guru99 = "Welcome, to, Guru99"
        myarray = Split(guru99, ", ")

        For x = LBound(myarray) To UBound(myarray)

            Console.WriteLine(myarray(x))

        Next

        Console.ReadKey()
    End Sub

End Module

Langkah 3) Jalankan kode dengan mengklik tombol Mulai dari bilah alat. Anda akan mendapatkan jendela berikut:

Kami telah menggunakan kode berikut:

penjelasan dari Code:

1. Membuat modul bernama Module1.
2. Memulai sub-prosedur utama.
3. Membuat array bernama myarray untuk menampung nilai string.
4. Membuat variabel string bernama guru99.
5. Membuat variabel integer bernama x.
6. Menetapkan string ke variabel guru99.
7. Memisahkan String di atas menjadi beberapa bagian dan menempatkannya dalam array bernama myarray. Tanda “,” (koma) adalah pembatas, oleh karena itu fungsi split akan menggunakannya untuk menandai akhir dari berbagai bagian String.
8. Menggunakan variabel x untuk melakukan iterasi melalui array bernama myarray. LBound dan UBound masing-masing menentukan batas bawah dan batas atas array.
9. Mencetak nilai array bernama myarray di konsol.
10. Mengakhiri perulangan for.

Fungsi Gabung

Fungsi join membantu kita menggabungkan beberapa array menjadi satu string. Contoh berikut menunjukkan hal ini:

Langkah 1) Mulailah dengan membuat aplikasi konsol baru.

Langkah 2) Tambahkan kode berikut ke aplikasi:

Module Module1
    Sub Main()

        Dim students(0 To 2) As String

        students(0) = "John"

        students(1) = "Alice"

        students(2) = "Antony"

        Dim classmates As String


        classmates = Join(students, ", ")

        Console.WriteLine(classmates)

        Console.ReadKey()
    End Sub

End Module

Langkah 3) Jalankan kode dengan mengklik tombol Mulai pada toolbar:

Kami telah menggunakan kode berikut:

penjelasan dari Code:

1. Membuat modul bernama Module1.
2. Membuat sub-prosedur utama.
3. Membuat array bernama siswa untuk menampung 3 nilai string.
4. Menambahkan nama John ke indeks 0 array.
5. Menambahkan nama Alice ke indeks 1 array.
6. Menambahkan nama Antony ke indeks 2 array.
7. Mendefinisikan variabel bernama teman sekelas bertipe data string.
8. Menggabungkan semua elemen array students dan memisahkannya menggunakan koma (,). Hasil operasi ini akan diberikan ke variabel classmates.
9. Mencetak konten variabel teman sekelas di konsol.
10. Menjeda jendela konsol menunggu pengguna mengambil tindakan untuk menutupnya.
11. Mengakhiri sub-prosedur utama.
12. Mengakhiri modul.

Pertanyaan Umum Demo Slot