MS ACCESS MAILING LIST: Re: [belajar-access] absensi

Friday, April 15, 2011

Re: [belajar-access] absensi

Terima kasih p Hariyanto atas dukungannya agar semangat belajar access ...
Ada beberapa pertanyaan selanjutnya (heheehhe moga2x tdk bosan) ...
1. Rencananya ID card pegawai dilengkapi dengan barcode sehingga
inputnya tdk memakai keyboard
2. Apa keuntungannya memakai VBA dibanding tanpa VBA?
3. Untuk absen pulang cluenya apa ya?? saya coba dulu nanti kalau sudah
mentok tanya lagi heheeheh ....

salam access
ndaru

hari yanto wrote:
>
>
> Untuk merubah digit NIK tampilan bisa dicoba-coba di script form
> "absen masuk" line 29:
>
> NIK_tam = Format(NIK, "000")
>
> Untuk merubah menjadi 4 digit tinggal diganti 0-nya menjadi empat.
> Sehingga menjadi seperti ini:
>
> NIK_tam = Format(NIK, "*_0000_*")
>
> Yang perlu disimpan adalah NIK yang type datanya berbentuk number.
> Mengapa number, karena dalam proses pencarian (nantinya) memiliki
> kecepatan lebih tinggi dibandingkan dengan text.
>
> Sedangkan keperluan tampilan, baik di form maupun di report, formatnya
> di ubah menjadi 4 digit. Agar tidak selalu menulis NIK_TAM, bisa
> memanfaatkan module (karena bisa diakses dari berbagai form/report.
>
> 1. Klik module
> 2. Klik New
> 3. isi ini:
>
> Function UbahNik(NIK)
> UbahNik = Format(NIK, "0000")
> End Function
>
> Cara penggunaannya, masuk ke script form "absen masuk" pada line 29.
> Ubah menjadi ini:
> NIK_tam = UbahNik(NIK)
> 'fungsi NIK sebelumnya > NIK_tam = Format(NIK, "000")
>
> Semoga bisa membantu dan memberi semangat.
>
> Hariyanto (Surabaya)
>
>
> -
>