Wednesday, May 31, 2017

Visual Basic : Membuat Tombol/Button Navigasi



Setelah membuat koneksi ke database seoperti yang sudah di jelaaskan di artikel sebelumnya (Koneksi Ke Database), selanjutnya kita coba buat tombol navigasi sehingga data bisa berpindah tanpa kita harus memilih di datagridnya. Tombol Navigasi yang akan kita buat adalah :
  1. Next (Pindah ke record selanjutnya)
  2. Previous (Pindah ke record sebelumnya)
  3. Home (Pindah ke record pertama)
  4. Last (Pindah ke record terakhir)
Buatlah desain seperti di dibawah ini :


Selanjutnya dimasing-masing button/tombol ketikkan isi procedure seperti dibawah ini sesuai dengan fungsinya masing-masing. Double klik di masing- masing button dan isi script berikut :
  • Di procedure tombol Home ketikkan  :  Adodc1.Recordset.MoveFirst
  • Di procedure tombol Previous  ketikkan : Adodc1.Recordset.MovePrevious
  • Di procedure tombol Next  ketikkan : Adodc1.Recordset.MoveNext
  • Di procedure tombol Last  ketikkan : Adodc1.Recordset.MoveLast
Kalau sudah selesai coba jalankan programnya (Tekan F5) dan pilih masing-masing button. Lihat perubahannya di datagrid. kalau berpindah datanya berarti programnya sukses. Selanjutnya kita akan coba input, edit, delete, view dan search di artikel selanjutnya.

No comments:

Post a Comment