Save dan Load Layout Pada TrueDBGrid 7

Pernahkan memperhatikan aplikasi yang layoutnya tersimpan otomatis pada saat kita menutup aplikasi tersebut? sehingga saat kita membuka kembali, layout yang ditampilkan sama dengan layout sebelum kita tutup. User biasanya suka jika aplikasi yang digunakannya mampu melakukan hal tersebut.
Khusus pada form yang menampilkan data dalam bentuk tabel (baris dan kolom), salah satu komponen favorit yang digunaka adalah TrueDBGrid 7. Komponen tersebut menawarkan fasilitas yang sangat bagus. Selain itu layout terakhir yang disetting user pun dapat disimpan.
Berikut penggalan program yang digunakan untuk menyimpan dan memanggil layout:

Mengatasi Masalah SendKeys Pada VB6 di Windows 8

Sendkeys() adalah suatu perintah yang digunakan program untuk memerintahkan keyboard menekan suatu tombol seperti Tab atau Home atau End atau yang lainnya. Perintah ini biasanya sering digunakan oleh programmer VB agar program yang dibuat lebih atraktif. Namun fungsi ini bermasalah jika source code dijalankan di Windows 8 atau yang lebih baru. Permasalahan tidak akan muncul jika yang dijalankan adalah file exe hasil compilasi.


Jika code dijalankan maka akan muncul error: Run-time error 70: Permision Denied seperti gambar dibawah ini.

Untuk mengatasi hal tersebut ganti perintah Sendkeys dengan CreateObject("WScript.Shell").SendKeys "{tab}".
Contoh:
Sendkeys "{tab}"
diganti dengan
CreateObject("WScript.Shell").SendKeys "{tab}"

Fungsi Split() Pada VB6

Fungsi Split() adalah fungsi yang digunakan untuk mencacah data yang memiliki delimiter (pemisah) terntentu. Contoh sebuah data 01-10-0000014, data tersebut terdiri dari 3 group data dipisah oleh tanda (-). Masing-masing group tersebut dapat kita pisahkan dengan menggunakan fungsi Split().

Fungsi Split() bekerja dengan cara memisahkan data dengan pemisah tertentu, kemudian mengembalikan hasil pencacahan dalam bentuk array.

Contoh penggunaan fungsi Split():

Hasil dari code diatas adalah:
x0 --> 01
x1 --> 10
x2 --> 0000014

Fungsi IsNumeric() Pada VB6

Fungsi IsNumeric() adalah fungsi yang digunakan untuk mengecek suatu data number atau bukan. Fungsi ini biasanya digunakan saat melakukan validasi data sebelum data tersebut diproses. Fungsi ini mengembalikan data bertipe boolean (True/False). Penggunaan fungsi ini sangat mudah,




Contoh penggunaan fungsi IsNumeric():