Tampilkan postingan dengan label Materi. Tampilkan semua postingan
Tampilkan postingan dengan label Materi. Tampilkan semua postingan

Array

Baca Penuh >>>                                                                             <<< Kembali

Array yang sedang kita bahas ini merupakan array dari variabel, yang dideklarasikan di dalam kode Anda. Array ini berbeda dari array yang berlaku pada control (control array) yang dapat Anda buat dengan mengeset nilai property Index milik suatu control pada saat design-time. Variabel array selalu berdampingan; tidak seperti control array, Anda tidak dapat memuat dan membebaskan elemen-elemen dari tengah-tengah array.
Semua elemen di array memiliki tipe data yang sama. Tentu saja, ketika tipe datanya Variant, elemen-elemen secara individu dapat mengandung jenis data yang berbeda (object, String, angka, dan sebagainya). Anda dapat mendeklarasikan sebuah array dari tipe data umum, termasuk user-defined types dan object variables (akan kita bahas pada artikel yang lainnya).
Di Visual Basic, terdapat dua jenis array, yaitu:
  1. Array dengan ukuran tetap, yang selalu memiliki ukuran yang sama,
  2. Array Dinamis (dynamic array), yang ukurannya dapat diganti pada saat run-time.

Logika

Listing Program

 Private Sub cmdbatal_Click()
Me.txtname.Text = ""
Me.txtpass.Text = ""
Me.txtname.SetFocus
End Sub

Private Sub cmdlogin_Click()
If Me.txtname.Text = "ADMIN" And Me.txtpass.Text = "ADMIN" Then
pesan = MsgBox("Selamat Anda Berhasil Login", vbOKOnly, "Selamat")
Unload Me
Else
pesan = MsgBox("Username & Password salah", vbInformation, "ERROR")
End If
End Sub

Private Sub txtname_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Me.txtpass.SetFocus
End If
End Sub

Private Sub txtpass_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Me.cmdlogin.SetFocus
End If
End Sub

Prosedure

Baca Penuh >>>                                                               <<< Kembali
 Design Form
 Ketentuan Program : 

Jurusan Ditentukan berdasarkan 3 Karakter Pertama dari Kode Bus
  •  PHK  = PAHALA KENCANA, Jurusan = Jakarta - Bali
  •  DWS = DEWI SARTIKA, Jurusan = Jakarta - Solo
  •  DDJ  = DEDY JAYA, Jurusan =  Jakarta - Magelang
Harga Tiket ditentukan 1 karakter terakhir dari Kode Bus
  • A = Rp. 275.000,-
  • B = Rp. 325.000,-
  • C = Rp. 452.000,-

Perulangan (LOOPING)

Baca Penuh>>>                                                            <<
Do .... WHILE
Penyeleksian Kondisi dijalankan pada awal proses, dimana pernyataan akan dilaksanakan selama kondisi bernilai TRUE. Perintah dijalankan minimal 0 Kali.
BU :  
      DO WHILE
      PERNYATAAN1
      PERNYATAAN2
      LOOP


Do .... UNTIL
Pernyataan akan dijalankan selama nilai batas belum tercapai atau kondisi bernilai FALSE, Perintah dijalankan minimal satu kali.
Bu :
      DO UNTIL < KONDISI>
      PERNYATAAN1
      PERNYATAAN2
      LOOP

Fungsi String

Baca Penuh>>>                                                                  <<<
                                                     FUNGSI STRING

Fungsi String adalah fungsi pengambilan beberapa n karakter dari sebuah String.
  • Left (String,n) : Fungsinya adalah untuk mengambil n karakter sebelah kiri dari nilai string
  • Right (String,n) : Fungsinya adalah untuk mengambil n karakter sebelah kanan dari nilai string.
  • Mid (String,p,n) : Fungsinya adalah untuk mengambil karakter mulai dari karakter ke p, sebanyak n karakter