ACCESS FEED: Re: [belajar-access] Tanggal Terbilang [1 Attachment]

Sabtu, 09 Juli 2011

Re: [belajar-access] Tanggal Terbilang [1 Attachment]

[Attachment(s) from hari yanto included below]

waalaikumsalam warahmatullahi wabarakatuh...

Menurut saya, modul terbilang harus dimodifikasi untuk mendefisinikan angka dalam bentuk huruf. Sedangkan nama hari dan bulan, kita ambilkan dari:

t_hari = Choose(Weekday(T, vbUseSystemDayOfWeek), "Senin", "Selasa", _
"Rabu", "Kamis", "Jum'at", "Sabtu", "Minggu")

t_bulan = Choose(Month(T), "Januari", "Februari", _
"Maret", "April", "Mei", "Juni", "Juli", "Agustus", _
"September", "Oktober", "November", "Desember")

Mengapa tidak pakai misalnya format (T, "dddd")? Karena kalau time zonenya tidak dalam Indonesia, yang muncul adalah nama-nama hari dalam bahasa lain. Begitu juga dengan nama bulan.

Terlampir adalah contoh dalam bentuk mdb-nya.

Semoga bisa membantu dan memberi manfaat.

Hariyanto (Surabaya)

--- On Fri, 8/7/11, rachmandiksi <rachmandiksi@gmail.com> wrote:

From: rachmandiksi <rachmandiksi@gmail.com>
Subject: [belajar-access] Tanggal Terbilang
To: "belajar access" <belajar-access@yahoogroups.com>
Date: Friday, 8 July, 2011, 7:29 PM

Assalamu'alaikum Wr. Wb

Para Master Access saya ingin menampilkan Tanggal dalam bentuk huruf (seperti fungsi terbilang tapi dalam tanggal)

misal :

07 Juli 2011

menjadi

"Hari Jum'at Tanggal Tujuh Bulan Juli Tahun Dua Ribu Sebelas"

Terima kasih atas bantuan para master

Wassalamu'alaikum Wr. WB