Contoh Program Array

Di pembahasan sebelumnya kita telah belajar mengenai Apa itu Array, kali ini kita akan membuat sebuah program dengan menggunakan Array, dimana kita akan menulsikan sebuah data berupa nama siswa dengan nomor yang di buat secara otomatis, dengan jumlah data maksimum adalah 15 data, dan kemudian kita akan menampilkan nama yang sudah di tulis kedalam sebuah list, baiklah berikut tutorialnya :

1. Pertama jalankan VB dengan project Standar EXE
2. Tambahkan beberapa tool box, seperti 1 label, 1 text box, 1 list box, dan 2 command button
3. Ubah Properti dari masing-masing toolbox, seperti ini :

Tool BoxPropertiesKeterangan
Form 1CaptionProgram Array
Star Up PositionsCenter Screen
Label 1CaptionNama
Text 1Text(Kosong)
Command 1CaptionSimpan
Command 2Lihat

sehingga akan terlihat seperti ini:

4. Lalu tuliskan script berikut :

Dim nama(15) As String 'Mendefinisikan variabel global nama sebagai array
Dim n As Integer 'Jumlah data

Private Sub Command1_Click()
n = n + 1 'Setiap Command 1 di klik maka nilai n akan bertambah 1
nama(n) = Trim(Text1.Text) 'Memindahkan / menuliskan isi text1 ke array nama
Text1.Text = "" 'Isi dari text 1, setelah klik command 1, akan kosong
Text1.SetFocus 'Menempatkan kursor ke text1
End Sub

Private Sub Command2_Click()
List1.Clear 'Mengkosongkan area list 1
For i = 1 To n 'Menampilkan semua isi array nama di list 1
List1.AddItem nama(i)
Next i
End Sub

Private Sub Form_Load()
n = 0 'Pada saat form di panggil, maka jumlah array disi dengan nol

5. Jika sudah Selesai Jalankan program
Keterangan :
Pertama tuliskan terlebih dahulu sebuah nama / kata di Text1, lalu klik SIMPAN, maka data yang telah di tulis akan di simpan di memory komputer, dan jikta anda ingin menampilkanya klik saja lihat, maka di list 1 akan tampil daftar nama yang telah di tuliskan.

Sekian untuk tutorial kali ini, semoga bermanfaat


Bantu kembangkan Blues Pedia yuk, caranya share artikel ini :

G+

0 Response to "Contoh Program Array"

Post a Comment