LabQ5

Berita Tgl. 17 Feb 2010 "Nikah Sirri mau dilarang ... pelakunya dipidana...." Huh! lawong yang Zinah aja ga dihukum yang selingkuh ga dihukum, yang Nikah Sirri mo dipenjara. Tegakkan dulu hukum yang jelas-jelas melanggar perintah Agama, baru memperbaiki hukum yang disalah gunakan (exm. Nikah Sirri). Memang sifat manusia selalu mengutak-atik & menyelewengkan hukum agama demi kepentingannya sendiri. "Nikah Sirri" dijadikan sarana orang untuk menghalalkan perzinahan & perselingkuhan-nya, agar perselingkuhannya tidak melanggar agama. Orang yang melakukan ("Nikah Sirri") biasanya tidak ingin diketahui orang lain "Iya Kan ??", kalau tidak ngapain pake jalan "Nikah Sirri" segala... Tapi seharusnya para wanita harus menggunakan akal-nya untuk berfikir apa yang akan terjadi setelah pernikahan "Sirri"-nya itu terjadi. Lihat dulu siapa orangnya yang mau dinikahinya; Jujurkah, berakhlaqkah atau hanya orang yang mengumbar nafsu sya...

Sediakan 1 Project, 1 Form, 1 Modul Option Explicit Public VAR_Tanggal, TglSekarang As String Public Function Format_Tanggal_Indonesia() As String Dim DataTanggal, DataBulan, DataTahun, NamaBulan As String VAR_Tanggal = Format(Date, "DD-MMM-YYYY") DataTanggal = Left$(VAR_Tanggal, 2) 'Mengambil data yg akan diolah menjadi data Tanggal DataBulan = Mid$(VAR_Tanggal, 4, 3) 'Mengambil data yg akan diolah menjadi data Bulan DataTahun = Right$(VAR_Tanggal, 4) 'Mengambil data yg akan diolah menjadi data Tahun If DataBulan = "Jan" Then NamaBulan = " Januari " ElseIf DataBulan = "Feb" Then NamaBulan = " Februari " ElseIf DataBulan = "Mar" Then NamaBulan = " Maret " ElseIf DataBulan = "Apr" Then NamaBulan = " April " ElseIf DataBulan = "May" Then NamaBulan = " Mei " ElseIf DataBulan = "Mei" Then NamaBulan = " Mei " ElseIf DataBulan =...

Masya Allaah, capeknya... Pingin bikin report di VB6 yang pake Grup Header ga....' ktemu2, nyari di web ga seperti yang diharapkan. Kalo pake CR harus beli... Masya Alla.........h !!! Cari ilmunya susah amat se...h, Sampe ngantu...k. Alhamdulillaaaah dibulan Maret 2010 ini udak ketemu.