Download Free Ebook Cara Mengkoneksikan Database MySQL Dengan Visual Basic 6.0

Download Free Ebook Cara Mengkoneksikan Database MySQL Dengan Visual Basic 6.0

Download Free Ebook Cara Mengkoneksikan Database MySQL Dengan Visual Basic 6.0 | Visual Basic Magazine |  Gho Blog's - Spesial di akhir tahun ini, saya bagikan ebook pertama yang saya buat kepada sobat semua. Meskipun masih kurang sempurna tapi setidaknya pembahasan pada ebook ini mencakup beberapa point-point utama tentang cara mengkoneksikan database MySQL dengan program Visual Basic 6.0 dan dilengkapi dengan gambar agar sobat lebih mudah memehami materi yang dibahas.

Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!

Adapun hal-hal yang dibahas pada ebook ini antara lain :

1. Persiapan (Software penunjang yang dibutuhkan)
  • DBMS MySQL
  • MYSQL ODBC Connector 3.51 Driver
  • Visual Basic 6.0

2. Membangun Database Menggunakan DBMS MySQL
  • Menjalankan Local Server/MySQL
  • Membuat Database dan Tabel

3. Membuat Koneksi
  • Membuat koneksi dengan MYSQL ODBC 3.51 Driver
  • Mengkoneksikan Visual Basic 6.0 dengan Database MySQL
  • Uji Coba Koneksi pada Visual Basic 6.0

Jika sobat berminat, silakan download GRATIS ebook ini melalui link berikut ini :

Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!






Sekian posting kami yang berjudul Download Free Ebook Cara Mengkoneksikan Database MySQL Dengan Visual Basic 6.0. Semoga ebook ini bisa menjadi referensi yang berguna buat sobat semua.

Cara Mengatasi Pengulangan Data Dari Database Yang Ditampilkan Pada Combobox

FAQ : Cara Mengatasi Pengulangan Data Dari Database Yang Ditampilkan Pada Combobox
Cara Mengatasi Pengulangan Data Dari Database Yang Ditampilkan Pada Combobox | Gho Blog's - Pembahasan berikut ini adalah jawaban kepada salah satu member forum yang bertanya tentang bagaimana mengatasi pengulangan data yang muncul pada combobox, dimana data tersebut dipanggil dari database.

Kunci utamanya berada pada query yang digunakan untuk memanggil data tersebut. Sebagai contoh, saya akan narasikan secara singkat kasus yang terjadi.

Saya mempunyai sebuah tabel produk seperti gambar berikut ini :

FAQ : Cara Mengatasi Pengulangan Data Dari Database Yang Ditampilkan Pada Combobox

Kemudian saya ingin menampilkan record dari field "merk" kedalam combobox menggunakan coding seperti berikut ini :

Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!


Saat program di running, hasilnya seperti berikut ini :

FAQ : Cara Mengatasi Pengulangan Data Dari Database Yang Ditampilkan Pada Combobox

Jika sobat perhatikan gambar diatas, maka terjadi perulangan data merk sesuai dengan apa yang ada di database. Nah sekarang bagaimana caranya agar cukup satu data yang sama saja yang muncul di combobox..?

Sobat cukup mengganti query coding diatas seperti berikut ini :

Coding sebelumnya :
Ubah Menjadi :

Berikut ini hasilnya setelah query nya diubah :

FAQ : Cara Mengatasi Pengulangan Data Dari Database Yang Ditampilkan Pada Combobox


Silakan download contoh programnya melalui link berikut ini :

Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!






Sekian dulu posting jawaban yang berjudul Cara Mengatasi Pengulangan Data Dari Database Yang Ditampilkan Pada Combobox. Semoga bermanfaat buat sobat yang mengalami masalah yang sama.


Menghitung Selisih Hari Dari 2 Buah DTPicker Dengan Visual Basic 6.0

Menghitung Selisih Hari Dari 2 Buah DTPicker Dengan Visual Basic 6.0
Menghitung Selisih Hari Dari 2 Buah DTPicker Dengan Visual Basic 6.0 | Gho Blog's - Pada posting kali ini saya akan menunjukan cara menentukan jumlah hari berdasarkan dua buah DTPicker. Logika seperti ini umumnya di gunakan untuk menentukan total denda pada aplikasi yg mengelola penyewaan seperti perpustakaan, rental movie dan lain sebagainya.

Untuk lebih memahaminya, silakan ikuti tutorial sederhana berikut ini. Sebagai bahan uji coba dan latihan, silakan sobat buat sebuah disain form seperti dibawah ini :



Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!


Setelah itu, kita akan menempatkan logika dan coding program pada event DTPicker2_Change sebagai procedur eksekusi untuk menentukan jumlah hari (terlambat) dan denda. Double klik pada DTPicker2 dan masukkan script berikut ini tepat diantara Private Sub DTPicker2_Change() dengan End Sub :


Kemudian agar DTPicker1 dan DTPicker2 menyesuikan tanggal dengan setting tanggal dikomputer, masukkan script berikut pada Form_Load() :


Sekarang coba jalankan program tersebut, lalu pilih tanggal melalui DTPicker2 dan lihat hasil nya. Untuk lebih jelasnya, sobat bisa doenload contoh projectnya disini :

Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!









Sekian dulu postong saya yang berjudul Menghitung Selisih Hari Dari 2 Buah DTPicker Dengan Visual Basic 6.0. Semoga bermanfaat dan selamat mencoba.


Cara Menambahkan List Item Pada ComboBox Di Visual Basic 6.0

Cara Menambahkan List Item Pada ComboBox Di Visual Basic 6.0
Cara Menambahkan List Item Pada ComboBox Di Visual Basic 6.0 | Gho Blog's - Walaupun terkesan sepele, pertanyaan seputar bagaimana caranya memasukkan list item ke dalam Combobox sering saya dapati di beberapa forum maupun ada yang bertanya langsung ke saya.

Posting kali ini adalah bentuk apresiasi saya kepada sobat yang baru belajar pemorograman Visual Basic 6.0. Karena banyak dari mereka yang bertanya kepada saya mengatakan sebenarnya malu bertanya tentang hal yang sangat dasar sekali.

Saya sangat menghargai semangat sobat yang mau belajar, oleh sebab itu buat sobat yang mungkin merasa malu bertanya tentang hal ini, maka saya buatkan sebuah tutorial sederhana tentang cara menambahkan list item ke dalam combobox.


Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!

Cara 1 : Dengan Coding
Sebagai contoh, saya akan membuat list nama-nama hari yang akan dimunculkan pada combobox. Cara menggunakan coding sangatlah mudah, cukup sobat letakkan script berikut pada Form Load :



Cara 2 : Melalui Properties
Cara berikut ini lebih mudah lagi, sobat cukup mengetik item yang ingin di masukkan ke dalam combobox melalui properties, perhatikan gambar berikut ini.

Cara Menambahkan List Item Pada ComboBox Di Visual Basic 6.0

Cara 3 : Memanggil Dari Database
Sebagai contoh latihan, saya membuat sebuah database dengan Access dalam forman .mdb (Access 2003), kemudian saya beri nama database tersebut dengan nama "test.mdb". Kemudian saya buat sebuah tabel/file dengan nama "datacombo" yang memiliki satu buah field yaitu "hari".

Kemudian saya inputkan nama-nama hari pada tabel tersebut. Untuk lebih jelasnya silakan sobat perhatikan gambar berikut :
Cara Menambahkan List Item Pada ComboBox Di Visual Basic 6.0

Setelah itu buat disain form yang terdiri dari 1 buah combobox dan 1 buah ADODC, seperti gambar berikut ini :

Cara Menambahkan List Item Pada ComboBox Di Visual Basic 6.0

Selanjutnya kita beralih ke bagian coding form, masukkan coding berikut ini pada General Declaration atau letakkan di bagian atas sekali :


Setelah itu kita buat script koneksi database, letakkan script berikut dibagian Form Load :


Sekarang kita buat sebuah fungsi pemanggilan record/data yang akan dimunculkan pada combobox. Letakkan script berikut dibagian kosong, atau dibawah event Form Load :


Terakhir, sisipkan script berikut pada Form Load agar saat program dijalankan fungsi dari pemanggilan data juga ikut dieksekusi. Letakkan saja script berikut sebelum End Sub pada event Form Load.


Sebelum menjalankan program ini, save project terlebih dahulu dan simpan satu folder dengan database nya.

Silakan download contoh programnya melalui link berikut ini :

Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!








Sekian posting saya yang berjudul Cara Menambahkan List Item Pada ComboBox Di Visual Basic 6.0. selamat mencoba dan semoga bermanfaat..

Cara Menampilkan Dua Record Dalam Satu Textbox Dengan Visual Basic 6.0

FAQ : Cara Menampilkan Dua Record Dalam Satu Textbox Dengan Visual Basic 6.0
Cara Menampilkan Dua Record Dalam Satu Textbox Dengan Visual Basic 6.0 | Gho Blog's - Masalah kecil seperti ini cukup membuat bingung bagi orang yang baru belajar Visual Basic 6.0, yaitu bagaimana cara menggabungkan dua buah field kedalam satu buah textbox.

Berikut ini akan saya berikan contoh sederhana agar sobat bisa mengerti cara penyelesaian dari masalah diatas.

Sebagai contoh, saya punya sebuah file/tabel seperti berikut ini :

FAQ : Cara Menampilkan Dua Record Dalam Satu Textbox Dengan Visual Basic 6.0


Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!

Disini kita akan menggabungkan field "nama_depan" dan field "nama_belakang" kedalam satu buah textbox berdasarkan field "kode" yang dipilih. Berikut ini contoh form agar sobat lebih mengerti maksud yang saya sampaikan :

FAQ : Cara Menampilkan Dua Record Dalam Satu Textbox Dengan Visual Basic 6.0

Saya akan langsung membahas ke inti masalah saja, disini saya anggap sobat sudah bisa membuat koneksi database ke program VB. Berikut ini contoh coding yang saya gunakan dan saya letak di tombol "Cari" :


Perhatikan pada bagian coding "Text2.Text = rs.Fields(1) & " " & rs.Fields(2)" antara "rs.Fields(1)" dengan "rs.Fields(2)" dipisahkan oleh kode pemisah & " " & yang dibaca sebagai satu spasi oleh sistem. Dan berikut ini hasil eksekusi program dengan penggabungan dua field kedalam satu textbox :

FAQ : Cara Menampilkan Dua Record Dalam Satu Textbox Dengan Visual Basic 6.0


Silakan download contoh programnya melalui link berikut ini :

Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!








Sekian dulu posting saya yang berjudul Cara Menampilkan Dua Record Dalam Satu Textbox Dengan Visual Basic 6.0. Semoga dapat menjawab pertanyaan sobat dan dijadikan referensi pemrograman Visual basic 6.0.



Cara Register Library / Ocx Visual Basic 6.0

Cara Register Library / Ocx Visual Basic 6.0
Cara Register Library / Ocx Visual Basic 6.0 | Gho Blog's - Mungkin sobat pernah mengalami gagal saat akan menambahkan komponen ke tools box di Visual Basic 6.0. Pada saat melakukan proses penambahan komponen muncul pesan "Object library not registered".

Pada posting kali ini, saya akan menunjukkan bagai mana caranya meregister library atau ocx yang menjadi komponen Visual Basic 6.0.

Sebagai contoh saya akan merigester komponen "Microsoft Data Bound List Control 6.0". Caranya kita harus tahu dulu nama library nya yaitu "dblist32.ocx" yang berada di C:\Windows\system32.

NOTE : Pastikan library / ocx tersebut berada di C:\Windows\system32, jika tidak maka proses register tidak akan berhasil.


Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!


Cara Register Library / Ocx Visual Basic 6.0

Jika sudah tahu nama library nya, silakan ikuti langkah-langkah berikut ini :
  • Jalankan Command Prompt (Start --> All Programs --> Accessories --> Command Prompt)
  • Masuk kedirectory "system32" dengan cara mengetik : cd c:\windows\system32 kemudian tekan enter.
Cara Register Library / Ocx Visual Basic 6.0

  • Setelah itu ketikkan perintah regsvr32 dblist32.ocx kemudian tekan enter.
Cara Register Library / Ocx Visual Basic 6.0

  • Jika berhasil, maka akan muncul pesan seperti berikut ini :
Cara Register Library / Ocx Visual Basic 6.0


FAQ : Setelah melakukan langkah-langkah diatas ternyata proses register gagal...!!

Berdasarkan pengalaman saya, ada beberapa hal yang harus dilakukan bila cara diatas gagal. Mungkin sobat yang belum berhasil bisa mencoba beberapa tips berikut ini :




1. Compatibility Visual Basic 6.0 di Windows
Jika sobat menggunakan Windows 7, pastikan compatibility VB6.exe yang telah sobat install menggunakan settingan Windows XP (Service Pack 2).

Cara mengetahuinya, masuk ke folder C:\Program Files\Microsoft Visual Studio\VB98, kemudian cari VB6.EXE lalu klik kanan dan pilih Properties. Kemudian atur setting sebagai berikut :

Cara Register Library / Ocx Visual Basic 6.0


2. Download library baru.
Sebaiknya sobat download saja library/ocx yang bermasalah, kemudian letak di C:\Windows\system32 dan ulangi proses register seperti diatas.

3. Install ulang Visual Basic 6.0
Coba install ulang Visual Basic 6.0 sobat dengan master installer yang baru, karna ada kemungkinan installer yang sobat gunakan sebelumnya sudah tidak terlalu baik atau sudah rusak.

Mungkin masih ada cara lain, hanya saja saya kurang tahu. Karena tips diatas berdasarkan pengalaman pribadi saya.

Sekian dulu posting saya yang berjudul Cara Register Library / Ocx Visual Basic 6.0. Selamat mencoba dan semoga bermanfaat.



Ketika Al-Qur'an Berkata : Ada Laut Yang Di Dalam Tanahnya Ada Api

Ketika Al-Qur'an Berkata : Ada Laut Yang Di Dalam Tanahnya Ada Api
Ketika Al-Qur'an Berkata : Ada Laut Yang Di Dalam Tanahnya Ada Api | Gho Blog's - “Ada laut yang di dalam tanahnya ada api(Qs. Ath-Thur 6).

Nabi SAW bersabda: “Tidak ada yang mengarungi lautan kecuali orang yang berhaji, berumrah atau orang yang berperang di jalan Allah. Sesungguhnya di bawah lautan terdapat api dan di bawah api terdapat lautan.

Bangsa Arab, pada waktu diturunkannya Al-Qur’an tidak mampu menangkap dan memahami isyarat sumpah Allah SWT demi lautan yang di dalam tanahnya ada api ini. Karena bangsa Arab (kala itu) hanya mengenal makna “sajara” sebagai menyalakan tungku pembakaran hingga membuatnya panas atau mendidih. Sehingga dalam persepsi mereka, panas dan air adalah sesuatu yang bertentangan. Air mematikan panas sedangkan panas itu menguapkan air. Lalu bagaimana mungkin dua hal yang berlawanan dapat hidup berdampingan dalam sebuah ikatan yang kuat tanpa ada yang rusak salah satunya?

Persepsi demikian mendorong mereka untuk menisbatkan kejadian ini sebagai peristiwa di akhirat (bukan di dunia nyata). Apalagi didukung dengan firman Allah SWT: “Dan apabila lautan dipanaskan(QS. At-Takwir 6).

Ulasan Hadits Nabi :
Hadits yang Nabi sebutkan sangat sesuai dengan sumpah Allah SWT yang dilansir oleh Al-Qur’an pada permulaan Surah Ath-di mana Allah bersumpah (Maha Besar Allah yang tidak membutuhkan sumpah apapun demi lautan yang di dalam tanahnya ada api “al-bahrul masjur.”)” “Demi bukit, dan kitab yang ditulis; pada lembaran yang terbuka; dan demi Baitul Ma’mur; dan atap yang ditinggikan (langit), dan laut yang di dalam tanahnya ada api, sesungguhnya azab Tuhanmu pasti terjadi, tidak seorangpun yang dapat menolaknya.” (Qs. Ath-Thur: 1-8)

Memang, ayat-ayat pada permulaan Surah At-Takwir mengisyaratkan peristiwa-peristiwa futuristik yang akan terjadi di akhirat kelak, namun sumpah Allah SWT dalam Surah Ath-Thur semuanya menggunakan sarana-sarana empirik yang benar-benar ada dan dapat ditemukan dalam hidup kita (di dunia).

Hal inilah yang mendorong sejumlah ahli tafsir untuk meneliti makna dan arti bahasa kata kerja “sajara” selain menyalakan sesuatu hingga membuatnya panas. Dan mereka ternyata menemukan makna dan arti lain dari kata “sajara” yaitu “mala’a” dan “kaffa” (memenuhi dan menahan). Mereka tentu saja sangat gembira dengan penemuan makna dan arti baru ini karena makna baru ini dapat memecahkan kemusykilan ini dengan pengertian baru bahwa Allah SWT telah memberikan anugerah kepada semua manusia dengan mengisi dan memenuhi bagian bumi yang rendah dengan air sambil menahannya agar tidak meluap secara berlebihan ke daratan.

Namun, hadits Rasulullah SAW yang sedang kita bahas ini secara singkat menegaskan bahwa: Sesungguhnya di bawah lautan ada api dan di bawah api ada lautan.

Setelah Perang Dunia II, para peneliti turun dan menyelam ke dasar laut dan samudera dalam rangka mencari alternatif berbagai barang tambang yang sudah nyaris habis cadangannya di daratan akibat konsumerisme budaya materialistik yang dijalani manusia sekarang ini. Mereka dikejutkan dengan rangkaian gunung berapi (volcanic mountain chain) yang membentang berpuluh-puluh ribu kilometer di tengah-tengah seluruh samudera bumi yang kemudian mereka sebut sebagai ‘gunung-gunung tengah samudera’.

Dengan mengkaji rangkaian gunung-gunung tengah samudera ini tampak jelas bahwa gunung-gunung tengah samudera tersebut sebagian besar terdiri dari bebatuan berapi (volcanic rocks) yang dapat meledak layaknya ledakan gunung berapi yang dahsyat melalui sebuah jaring retak yang sangat besar. Jaring retak ini dapat merobek lapisan bebatuan bumi dan ia melingkupi bola bumi kita secara sempurna dari segala arah dan terpusat di dalam dasar samudera dan beberapa lautan. sedangkan kedalamannya mencapai 65 km. Kedalaman jaring retak ini menembus lapisan bebatuan bumi secara penuh hingga menyentuh lapisan lunak bumi (lapisan bumi ketiga) yang memiliki unsur bebatuan yang sangat elastis, semi cair, dan memiliki tingkat kepadatan dan kerekatan tinggi.

Bebatuan lunak ini didorong oleh arus muatan yang panas ke dasar semua samudera dan beberapa lautan semacam Laut Merah dengan suhu panas yang melebihi 1.000 derajat Celcius. Batuan-batuan elastis yang beratnya mencapai jutaan ton ini mendorong kedua sisi samudera atau laut ke kanan dan ke kiri yang kemudian disebut oleh para ilmuwan dengan “fenomena perluasan dasar laut dan samudera.” Dengan terus berlangsungnya proses perluasan ini, maka wilayah-wilayah yang dihasilkan oleh proses perluasan itupun penuh dengan magma bebatuan yang mampu menimbulkan pendidihan di dasar samudera dan beberapa dasar laut.

Meskipun sebegitu banyak, air laut atau samudera tetap tidak mampu memadamkan bara api magma tersebut. Dan magma yang sangat panas pun tidak mampu memanaskan air laut dan samudera….

Salah satu fenomena yang mencengangkan para ilmuwan saat ini adalah bahwa meskipun sebegitu banyak, air laut atau samudera tetap tidak mampu memadamkan bara api magma tersebut. Dan magma yang sangat panas pun tidak mampu memanaskan air laut dan samudera. Keseimbangan dua hal yang berlawanan: air dan api di atas dasar samudera bumi, termasuk di dalamnya Samudera Antartika Utara dan Selatan, dan dasar sejumlah lautan seperti Laut Merah merupakan saksi hidup dan bukti nyata atas kekuasaan Allah SWT yang tiada batas.

Laut Merah misalnya, merupakan laut terbuka yang banyak mengalami guncangan gunung berapi secara keras sehingga sedimen dasar laut ini pun kaya dengan beragam jenis barang tambang. Atas dasar pemikiran ini, dilakukanlah proyek bersama antara Pemerintah Kerajaan Saudi Arabia, Sudan, dan salah satu negara Eropa untuk mengeksploitasi beberapa kekayaan tambang yang menggumpal di dasar Laut Merah.

Kapal-kapal proyek ini melemparkan stapler barang tambang untuk mengumpulkan sampel tanah dasar Laut Merah tersebut. Stapler pengeruk sampel tanah itu diangkat dalam batang air yang ketebalannya mencapai 3.000 m. Dan jika stapler sampai ke permukaan kapal, tidak ada seorang pun yang berani mendekat karena sangat panasnya. Begitu dibuka, maka keluarlah tanah dan uap air panas yang suhunya mencapai 3.000 derajat Celcius. Dengan demikian, sudah terbukti nyata di kalangan ilmuwan kontemporer, bahwa ledakan gunung vulkanik di atas dasar setiap samudera dan dasar sejumlah laut jauh melebihi ledakan vulkanik serupa yang terjadi di daratan.

Kemudian terbukti pula dengan beragam dalil dan bukti bahwa semua air yang ada di bumi dikeluarkan oleh Allah SWT dari dalam bumi melalui ledakan-ledakan vulkanik dari setiap moncong gunung berapi. Pecahan-pecahan lapisan berbatu bumi menembus lapisan ini hingga kedalaman tertentu mampu mencapai lapisan lunak bumi. Di dalam pisan lunak bumi dan lapisan bawahnya, magma vulkanik menyimpan air yang puluhan kali lipat lebih banyak dibanding debit air yang ada di permukaan bumi.

Dari sini tampaklah kehebatan hadits Nabi SAW ini yang menetapkan sejumlah fakta-fakta bumi yang mencengangkan dengan sabda: “Sesungguhnya di bawah lautan ada api dan di bawah api ada lautan.”

Sebab fakta-fakta ini baru terungkap dan baru bisa diketahui oleh umat manusia pada beberapa tahun terakhir.

Pelansiran fakta-fakta ini secara detail dan sangat ilmiah dalam hadits Rasulullah SAW menjadi bukti tersendiri akan kenabian dan kerasulan Muhammad SAW, sekaligus membuktikan bahwa ia selalu terhubung dengan wahyu langit dan diberitahui oleh Allah Sang maha Pencipta langit dan bumi. Maha benar Allah yang menyatakan:

Dan tiadalah yang diucapkannya itu (Al Qur’an) menurut kemauan hawa nafsunya. Ucapannya itu tiada lain hanyalah wahyu yang diwahyukan (kepadanya), yang diajarkan kepadanya oleh (Jibril) yang sangat kuat, Yang mempunyai akal yang cerdas; dan (Jibril itu) menampakkan diri dengan rupa yang asli, sedang dia berada di ufuk yang tinggi. Kemudian dia mendekat, lalu bertambah dekat lagi, maka jadilah dia dekat (pada Muhammad sejarak) dua ujung busur panah atau lebih dekat (lagi). Lalu dia menyampaikan kepada hamba-Nya (Muhammad) apa yang telah Allah wahyukan(QS. An-Najm 3-10)

Tidak seorang pun di muka bumi ini yang mengetahui fakta-fakta ini kecuali baru pada beberapa dekade terakhir. Sehingga lontaran fakta ini dalam hadis Rasulullah SAW benar-benar merupakan kemukjizatan dan saksi yang menegaskan kenabian Muhammad SAW dan kesempurnaan kerasulannya. [Keajaiban al-Quran-zilzaal]


Konversi Desimal Menjadi Angka Romawi Dengan Visual Basic 6.0

Konversi Desimal Menjadi Angka Romawi Dengan Visual Basic 6.0
Konversi Desimal Menjadi Angka Romawi Dengan Visual Basic 6.0 | Gho Blog's - Posting kali ini saya akan membahas bagaimana membuat program sederhana untuk konversi dari bilangan desimal kmenjadi angka romawi menggunakan Visual Basic 6.0.

Sobat bisa kembangkan program ini sesuai kebutuhan, dsini saya akan membahas koding sederhananya saja. Sebagai contoh dan latihan, silakan sobat tambahkan dua buah TextBox (Text1 dan Text2) di form.

Sekarang kita akan membuat fungsi Konversi dari desimal ke angka romawi terlebih dahulu, letakkan script berikut pada bagian General Form Code :


Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!



Kemudian kita akan membuat Text1.Text mengeksekusi fungsi Konversi diatas menjadi angka romawi yang akan ditampilkan pada Text2.Text. Disini saya menggunakan event/procedure KeyPress, jadi sobat masukkan script berikut ini dan letakkan tepat diantara Private Sub Text1_KeyPress(KeyAscii As Integer) dengan End Sub :



Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!

Sekarang coba running program tersebut, masukkan angka pada Text1 kemudian tekan enter dan lihat hasilnya pada Text2. Silakan sobat kembangkan sendiri program ini sesuai dengan kebutuhan sobat.

Sekian dulu posting dari saya yang berjudul Konversi Desimal Menjadi Angka Romawi Dengan Visual Basic 6.0. Selamat mencoba dan semoga bermanfaat.


Ka'bah : Tempat Ibadah Pertama Di Muka Bumi

Ka'bah : Tempat Ibadah Pertama Di Muka Bumi
Ka'bah : Tempat Ibadah Pertama Di Muka Bumi | Gho Blog's - Menurut beberapa riwayat, Ka’bah telah dibangun sejak zaman Nabi Adam AS, namun sebelumnya dibangun oleh para malaikat.

Umat Islam di seluruh dunia pasti mengenal Ka’bah, rumah Allah (Baitullah) yang menjadi kiblat umat Islam di seluruh jagat raya ini. Ka’bah atau Bayt Atiq dibangun oleh Nabi Ibrahim AS dan putranya, Nabi Ismail AS. dan Baitullah ini merupakan tempat ibadah yang pertama kali dibangun di atas dunia.

"Sesungguhnya, rumah yang mula-mula dibangun untuk (tempat beribadah) manusia ialah Baitullah di Bakkah (Makkah) yang diberkahi dan menjadi petunjuk bagi semua manusia. Padanya terdapat tanda-tanda yang nyata, (diantaranya) Maqam Ibrahim. Barangsiapa memasukinya menjadi amanlah dia. Mengerjakan haji adalah kewajiban manusia terhadap Allah. Yaitu, (bagi) orang yang sanggup mengadakan perjalanan ke Baitullah. Barangsiapa mengingkari (kewajiban haji), sesungguhnya Allah Maha Kaya dari semesta alam." (QS. Ali Imran : 96-97)

Dalam menafsirkan surah Ali Imran  ayat 96, Al-Qurthubi, seorang ahli tafsir, mengatakan bahwa orang yang pertama kali membangun Baitullah adalah Nabi Adam AS.

Ali bin Abi Thalib menyatakan, “Allah SWT memerintahkan para malaikat-Nya untuk membangun Baitullah di muka bumi dan melaksanakan Thawaf disana.

Peristiwa tersebut terjadi sebelum Adam diturunkan ke bumi. Setelah turun, Adam menyempurnakan bangunannya dan berthawaf disana dan juga para nabi setelahnya.

Kemudian, pembangunan Baitullah tersebut dilaksanakan kembali dan disempurnakan oleh Nabi Ibrahim AS bersama putranya, Ismail”

Penjelasan ini berdasarkan keterangan AlQuran surah Al-Baqarah ayat 127 dan surah Al-Hajj ayat 26. “Dan, ingatlah ketika Ibrahim meninggikan pondasi Baitullah bersama Ismail (seraya berdoa), ‘Ya Rabb kami, terimalah (amal) dari kami.Sesungguhnya, Engkaulah Yang Maha Mendengar lagi Maha Mengetahui.(QS. Al-Baqarah : 127).

"dan (ingatlah), ketika Kami memberikan tempat kepada Ibrahim di tempat Baitullah (dengan mengatakan): "Janganlah kamu memperserikatkan sesuatupun dengan aku dan sucikanlah rumahKu ini bagi orang-orang yang thawaf, dan orang-orang yang beribadat dan orang-orang yang ruku' dan sujud." (QS : Al-Hajj ayat 26)

Dari keterangan ini, jelaslah bahwa yang pertama kali membangun Ka’bah adalah Nabi Adam AS. Dan, yang menyempurnakan pembangunan Ka’bah dengan memasang atau meninggikan pondasinya adalah Nabi Ibrahim AS dan Nabi Ismail AS.

Para ulama salaf mengatakan bahwa disetiap tingkat langit terdapat sebuah rumah. Penduduk langit tersebut beribadah kepada Allah di rumah tersebut, oleh karena itulah, Allah memerintahkan Nabi Ibrahim AS membuat bangunan seperti itu di muka bumi.

Disebutkan dalam kitab Ara’is al-Majilis karya Al-Tsa’ibi, Allah mewahyukan kepada Adam: “Aku memiliki tanah haram (terhormat) dalam posisi sejajar dengan singgasana-Ku (Arasy). Karena itu, datanglah ke sana dan berkelilinglah (Thawaf) sebagaimana dikelilinginya singgasana-Ku.

Shalatlah di sana sebagaimana dilaksanakan shalat di sisi singgasana-Ku. Di sanalah Aku memperkenankan doamu.” Keterangan ini menunjukkan bahwa Adam adalah pembangun Ka’bah pertama, lalu disempurnakan pembangunannya oleh Nabi Ibrahim dan Ismail.

Posisinya sama seperti yang ada hingga saat ini. Mengenai pembangunan Ka’bah, ada pendapat yang menytakan bahwa Ibrahim AS diperintahkan untuk membangun kembali Ka’bah di posisi yang ada saat ini, sebab, sebelumnya lokasi tersebut sering terjadi banjir besar.

Karena itu, Ibrahim diperintahkan untuk meninggikan fondasinya. Sebagaimana dikatakan Al-Azraqi dalam Tarikh Makkah, “setelah peristiwa banjir besar, lokasi Ka’bah dulu telah hilang. Lokasi tersebut berbentuk bukit kecil berwarna merah yang tidak terjangkau aliran air. Saat itu, manusia hanya tahu bahwa di sana ada tempat yang sangat bernilai tanpa mengetahui lokasinya secara pasti.

Dari seluruh penjuru dunia, mereka yang dizhalimi, menderita, dan butuh perlindungan datang ke tempat ini untuk berdoa.

Doa merekapun dikabulkan. Manusia pun mengunjunginya hingga Allah memerintahkan Ibrahim untuk membangun kembali Ka’bah. Sejak Nabi Adam AS diturunkan ke bumi, Baitullah selalu menjadi tempat yang dimuliakan dan diperbaiki terus-menerus oleh setiap agama dan umat dari satu generasi ke generasi lainnya. Tempat ini juga senantiasa dikunjungi malaikta sebelum Adam turun ke bumi.” Pembangunan itu dilakukan oleh Ibrahim dan Ismail AS.

Ismail yang mengangkat batunya dan Ibrahim yang memasangnya. semakin lama makin tinggi hingga Nabi Ibrahim AS tidak mampu lagi menjangkau tempat tertinggi untuk memasang batu-batu tersebut. Kemudian Ismail membawakan sebuah batu untuk pijakan bagi Nabi Ibrahim. Batu inilah yang akhirnya disebut sebagai Maqam Ibrahim.

Mereka terus bekerja sembari berdoa: “Wahai, Rabb kami, terimalah dari kami (amalan kami), sesungguhnya, Engkaulah yang Maha Mendengar lagi Maha Mengetahui.” Setelah selesai, Allah kemudian memerintahkan Ibrahim untuk berseru kepada seluruh umat manusia agar mengerjakan haji ke Baitullah, sebagaimana yang terkandung dalam QS. Al-Hajj : 27-29.

"dan berserulah kepada manusia untuk mengerjakan haji, niscaya mereka akan datang kepadamu dengan berjalan kaki, dan mengendarai unta yang kurus yang datang dari segenap penjuru yang jauh, supaya mereka menyaksikan berbagai manfaat bagi mereka dan supaya mereka menyebut nama Allah pada hari yang telah ditentukan atas rezki yang Allah telah berikan kepada mereka berupa binatang ternak. Maka makanlah sebahagian daripadanya dan (sebahagian lagi) berikanlah untuk dimakan orang-orang yang sengsara dan fakir. Kemudian, hendaklah mereka menghilangkan kotoran yang ada pada badan mereka dan hendaklah mereka menyempurnakan nazar-nazar mereka dan hendaklah mereka melakukan melakukan thawaf sekeliling rumah yang tua itu (Baitullah)." (QS. Al-Hajj : 27-29)

Pada awalnya bangunan Ka'bah terdiri atas dua pintu serta letak pintu ka'bah terletak diatas tanah, tidak seperti sekarang yang pintunya terletak agak tinggi sebagaimana pondasi yang dibuat Nabi Ibrahim dan Nabi Ismail.

Namun renovasi dilakukan akibat bencana banjir pada saat Muhammad SAW berusia 30 tahun dan sebelum diangkat menjadi rasul, karena merenovasi Ka'bah sebagai bangunan suci harus menggunakan harta yang halal dan bersih, sehingga pada saat itu terjadi kekurangan biaya.

Maka bangunan ka'bah dibuat hanya satu pintu serta ada bagian ka'bah yang tidak dimasukkan ke dalam bangunan ka'bah yang dinamakan Hijir Ismail yang diberi tanda setengah lingkaran pada salah satu sisi ka'bah.

Saat itu pintunya dibuat tinggi letaknya agar hanya pemuka suku Quraisy yang bisa memasukinya. Karena suku Quraisy merupakan suku atau kabilah yang sangat dimuliakan oleh bangsa Arab.

Karena kaumnya baru saja masuk Islam, maka Nabi Muhammad SAW mengurungkan niatnya untuk merenovasi kembali ka'bah sehingga ditulis dalam sebuah hadits perkataan beliau: "Andaikata kaumku bukan baru saja meninggalkan kekafiran, akan Aku turunkan pintu ka'bah dan dibuat dua pintunya serta dimasukkan Hijir Ismail kedalam Ka'bah", sebagaimana pondasi yang dibangun oleh Nabi Ibrahim.

Ketika masa Abdurrahman bin Zubair memerintah daerah Hijaz, bangunan itu dibuat sebagaimana perkataan Nabi Muhammad SAW atas pondasi Nabi Ibrahim. Namun karena terjadi peperangan dengan Abdul Malik bin Marwan, penguasa daerah Syam (Suriah,Yordania dan Lebanon sekarang) dan Palestina, terjadi kebakaran pada Ka'bah akibat tembakan peluru pelontar (onager) yang dimiliki pasukan Syam.

Sehingga Abdul Malik bin Marwan yang kemudian menjadi khalifah, melakukan renovasi kembali Ka'bah berdasarkan bangunan hasil renovasi Nabi Muhammad SAW pada usia 30 tahun bukan berdasarkan pondasi yang dibangun Nabi Ibrahim. Dalam sejarahnya Ka'bah beberapa kali mengalami kerusakan sebagai akibat dari peperangan dan umur bangunan. Ketika masa pemerintahan khalifah Harun Al Rasyid pada masa kekhalifahan Abbasiyyah, khalifah berencana untuk merenovasi kembali ka'bah sesuai pondasi Nabi Ibrahim dan yang diinginkan Nabi Muhammad SAW.

namun segera dicegah oleh salah seorang ulama terkemuka yakni Imam Malik karena dikhawatirkan nanti bangunan suci itu dijadikan ajang bongkar pasang para penguasa sesudah beliau. Sehingga bangunan Ka'bah tetap sesuai masa renovasi khalifah Abdul Malik bin Marwan sampai sekarang.

Maqam Ibrahim – tempat berpijak Maqam Ibrahim bukanlah kuburan Nabi Ibrahim AS. Maqam Ibrahim adalah batu tempat berpijaknya Nabi Ibrahim sewaktu membangun Ka’bah. Ketika itu Ibrahim bermaksud meletakkan batu ke tempat teratas, namun tangannya tidak mampu menjangkau, lalu ia menyuruh Nabi Ismail untuk mencarikan sebuah batu sebagai tempat berpijaknya.

Posisi Maqam Ibrahim hingga kini sama persis pada saat pembangunan Ka’bah pada zaman Nabi Ibrahim, demikian pula pada masa Rasulullah SAW, Abu Bakar, hingga terjadinya banjir besar pada masa khalifah Umar. Pada mulanya, Maqam itu menempel pada dinding Ka’bah. Namun, pada masa khalifah Umar, digeser kearah timur agar di sisi Maqam Ibrahim bisa menjadi tempat shalat, sebagaimana keterangan Al-Quran surah Al-Baqarah ayat 125.

"dan (ingatlah), ketika Kami menjadikan rumah itu (Baitullah) tempat berkumpul bagi manusia dan tempat yang aman. dan Jadikanlah sebahagian maqam Ibrahim[89] tempat shalat. dan telah Kami perintahkan kepada Ibrahim dan Ismail: "Bersihkanlah rumah-Ku untuk orang-orang yang thawaf, yang i'tikaf, yang ruku' dan yang sujud". (QS : Al-Baqarah 125)

Menurut Sami bin Abdullah al-Maghluts dalam bukunya mengatakan, “Nabi Ibrahim berpijak di atas batu besar yang lembap, langsung dengan kedua telapak kakinya tanpa alas."



Menghitung Total Dengan Visual Basic 6.0 Tanpa Menggunakan Query(SUM)

Menghitung Total Dengan Visual Basic 6.0 Tanpa Menggunakan Query(SUM)
Menghitung Total Dengan Visual Basic 6.0 Tanpa Menggunakan Query(SUM) | Gho Blog's - Pada posting kali ini saya akan membagikan cara bagaimana membuat hitung total harga secara otomatis ketika record bertambah di tabel.

Disini saya menggunakan Datagrid sebagai komponen untuk menampilkan list dari tabel. Untuk lebih jelasnya, bagaimana cara memunculkan data di Datagrid, silakan sobat lihat kembali posting sebelumnya yang berjudul Cara Menampilkan Isi Data Tabel Di Datagrid Dengan Visual Basic 6.0. Karena pada psoting ini kita hanya fokus pada koding penghitungan nya saja.

Sebagai bahan latihan, buat dulu sebuah database dengan MS Access 2003 dan beri nama latihan.mdb. Sobat juga bisa menggunakan DBMS lainnya seperti MS Access 2007, tinggal disesuaikan saja nanti koding dari saya dengan database yang sobat gunakan. Untuk lebih jelasnya sobat bisa pelajari lagi melalui posting saya berikut ini :
Selanjutnya buat sebuah tabel dengan nama barang, berikut ini field-field nya :

Menghitung Total Dengan Visual Basic 6.0 Tanpa Menggunakan Query(SUM)

Jika sudah, coba sobat masukkan beberapa buah record ke dalam tabel tersebut, atau sobat bisa menambahkan proses Simpan/Save pada form di VB. Berikut ini contoh record yg di entrikan :

Menghitung Total Dengan Visual Basic 6.0 Tanpa Menggunakan Query(SUM)

Buka sebuah project kemudian tambahkan satu buah Datagrid, satu buah TextBox ke form dan satu buah ADODC.

Menghitung Total Dengan Visual Basic 6.0 Tanpa Menggunakan Query(SUM)

 Kemudian tambahkan sebuah Module untuk koneksi database dan masukkan script berikut ini :


Setelah itu kita buat coding penghitungan total dari field harga yang muncul di Datagrid. Untuk itu silakan sobat lihat lagi posting sebelumnya yang berjudul Cara Menampilkan Isi Data Tabel Di Datagrid Dengan Visual Basic 6.0. Berikut ini coding penjumlahan total harga tersebut, letakan script berikut di bagian general coding form sobat :


Terakhir, sobat tambahkan dulu pemanggilan koneksi dan sub totalnya di bagian Form_Load :


Catatan :
Jika sobat menambahkan fungsi Simpan/Save pada Form, pastikan menyisipkan kode Call total pada koding Simpan yang ditempatkan setelah rs.Update seperti contoh berikut ini :


Silakan download contoh programnya pada link berikut ini :

Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!






Contoh program ini bisa sobat terapkan pada project penjualan. Sekian dulu pembahasan dari saya yang berjudul Menghitung Total Dengan Visual Basic 6.0 Tanpa Menggunakan Query(SUM). Selamat mencoba dan semoga bermanfaat.


Inilah Pernyataan Lengkap MUI Menolak Ajang Pamer Aurat Miss World

Inilah Pernyataan Lengkap MUI  Menolak Ajang Pamer Aurat Miss World
Inilah Pernyataan Lengkap MUI Menolak Ajang Pamer Aurat Miss World | Gho Blog's - Majelis Ulama Indonesia (MUI) Pusat secara resmi akhirnya menegaskan penolakannya atas penyelenggaraan kontes kecantikan Miss World yang akan diselenggarakan di Indonesia.

Pernyataan sikap MUI tersebut disampaikan dalam konferensi pers yang digelar Gedung MUI Pusat, Jl. Proklamasi No. 51 Menteng Jakarta Pusat, pada Jum’at (23/8/2013). Berikut ini pernyataan lengkap MUI yang dibacakan oleh Wakil Sekretaris Jenderal (Wasekjen) Majelis Ulama Indonesia (MUI) Dr. Amirsyah Tambunan, MA.

---------------------------oo00oo---------------------------

PERNYATAAN SIKAP MAJELIS ULAMA INDONESIA
TENTANG
PENYELENGGARAAN PEMILIHAN MISS WORLD 2013 DI INDONESIA

BISMILLAHIRROHMANIRROHIEM

Setelah mencermati dan melakukan kajian secara seksama mengenai adanya pro-kontra tentang penyelenggaraan Pemilihan Miss World 2013 di Indonesia, maka dengan ini Majelis Ulama Indonesia (MUI) menyampaikan bahwa pemilihan Miss Wirld 2013 merupakan ajang kecantikan dunia yang melibatkan 140 negara dalam bentuk liberalisasi dan kapitalisasi ekonomi dunia terhadap Negara Kesatuan RI. Acara tersebut menghabiskan dana sangat besar dan karenanya merupakan perbuatan sia-sia (Mubazir).

Pertimbangan utamanya penolakan adalah sebagai berikut:
  1. Bahwa Al-Qur’an Surah Al-Ahzab 59: Hai Nabi, katakanlah kepada isteri-isterimu, anak-anak perempuanmu dan isteri-isteri orang mukmin: "Hendaklah mereka mengulurkan jilbabnyake seluruh tubuh mereka." Yang demikian itu supaya mereka lebih mudah untuk dikenal, karena itu mereka tidak di ganggu. Dan Allah adalah Maha Pengampun lagi Maha Penyayang.
  2. Berbagai hadits menyebutkan, aurat harus ditutup rapat, kecuali telapak tangan dan muka/wajah
  3. Pemilihan Miss World 2013 bertentangan dengan semangat konstitusi UUD 1945, terutama Pasal 32 (1) berbunyi: Negara memajukan kebudayaan nasional Indonesia di tengah peradaban dunia dengan menjamin kebebasan masyarakat dalam memelihara dan mengembangkan nilai-nilai budayanya.
  4. Pemilihan Miss World merupakan bentuk kontes kecantikan tidak sesuai dengan budaya Indonesia, karena lebih menampilkan budaya negara lain, sehingga di mata masyarakat Indonesia pemilihan Miss World terkesan merendahkan, melecehkan budaya bangsa seperti mempertontonkan aurat adalah merendahkan martabat perempuan.
  5. Dalam ajaran Islam ditegaskan bahwa memamerkan aurat wanita dan mempertontonkan kegenitan berjalan (tabarruj) di depan publik adalah perbuatan dosa yang bertentangan dengan ajaran agama.
  6. Pemilihan Miss World cenderung menampilkan dan mempertontonkan perilaku kemewahan dan glamour yang kontraproduktif di tengah masyarakat Indonesia dan dunia ketiga masih mengalami kesulitan ekonomi.

Untuk itu, MUI dengan tegas menolak pelaksanaan pemilihan Miss World 2013 di Negara Kesatuan Republik Indonesia.

MUI memberikan solusi dan dukungan sepenuhnya kepada semua pihak agar memajukan budaya bangsanya dengan berbagai upaya antara lain yakni:
  1. Mendukung Pemerintah Indonesia untuk mengedepankan upaya memajukan kebudayaan nasional di tengah peradaban dunia, dengan memfasilitasi masyarakat untuk melahirkan kreativitas, inovasi dalam memelihara dan mengembangkan nilai-nilai budaya bangsa Indonesia yang beretika, berakhlak mulia seperti pameran berbusana, tarian yang sesuai dengan nilai-nilai budaya dan agama yang dianut sebagia besar masyarakat Indonesia.
  2. Menjadikan budaya bangsa sebagai sarana dalam mensejahterakan ekonomi masyarakat Indonesia di tengah percaturan global dalam rangka mengantisipasi liberalisasi dan kapitalisasi ekonomi dunia terhadap Negara Kesatuan RI.
Demikianlah pernyataan sikap ini kami sampaikan semoga bermanfaat untuk kepentingan dan kemashlahatan umat dan bangsa Indonesia.

Jakarta, 23 Agustus 2013

Dewan pimpinan
Majelis ulama Indonesia

Ketua Wakil Sekjen

KH. MUYIDDIN JUNAIDI, MA DR. AMIRSYAH TAMBUNAN


Auto Resize Image Background Form Visual Basic 6.0

Auto Resize Image Background Form Visual Basic 6.0
Auto Resize Image Background Form Visual Basic 6.0 | Gho Blog's - Mungkin sobat pernah mengalami kendala saat menambahkan background image di form Visual Basic 6.0, dimana image tersebut berukuran kecil dan saat program di running image tersebut tidak menutupi seluruh form apalagi form tersebut dalam keadaan maximized.

Pada posting kali ini saya akan membagikan sedikit trik dalam bentuk coding untuk menanggulangi masalah tersebut. Untuk lebih jelasnya, sebagai contoh kasus bisa sobat lihat pada gambar berikut ini :


Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!



Auto Resize Image Background Form Visual Basic 6.0

Masalah tersebut akan semakin terlihat bila form dalam keadaan maximized. Untuk mengakali maslah tersebut, silakan sobat mengikuti langkah berikut ini :
  • Pertama, image tersebut ditambahkan langsung ke form melalui browse Picture di properties tanpa menggunakan component Image atau PictureBox.
Auto Resize Image Background Form Visual Basic 6.0
  • Jika sudah Image terpasang sebagai background di form, masukkan script berikut pada bagian general di coding form tersebut 
  • Kemudian double klik pada form dan letakkan script berikut pada bagian Form_Load() :
  • Setelah itu tempatkan script berikut pada event Form_Resize(), atau copy paste langsung script berikut tepat dibawah script Form_Load() sebelumnya :

Sekarang coba running, kemudian maximized kan form tersebut dan lihat perbedaannya.




Sekian dulu posting dari saya yang berjudul Auto Resize Image Background Form Visual Basic 6.0. Selamat mencoba dan semoga bermanfaat.


Erdogan: Akan Datang “Musa” Mengakhiri Tirani “Fir’aun Baru” Di Mesir

Erdogan: Akan Datang “Musa” Mengakhiri Tirani “Fir’aun Baru” Di Mesir
Erdogan: Akan Datang “Musa” Mengakhiri Tirani “Fir’aun Baru” Di Mesir | Gho Blog's - Perdana Menteri Turki, Recep Tayyip Erdogan kembali melontarkan pernyataan pedas terhadap pemerintahan Mesir yang baru, kali ini Erdogan menyatakan bahwa Mesir sedang menunggu “Musa” untuk melawan tirani “Fir’aun baru”, Katanya.

Erdogan juga menyerang negara-negara Barat dalam pernyataannya pada konferens Pers di bandara Ankara seelum ia melakukan perjalan ke Turkmenistan, ia mengatakan,”Demokrasi di dunia akan menjadi meragukan jika Barat tidak mengambil langkah serius, dan mereka yang diam tidak peduli terhadap tragedi di Mesir akan dianggap sebagai bagian dari para pembunuh.”

Erdogan menambahkan, “para pemberontak telah membantai mereka yang ingin mengambil suara mereka dalam sistem Demokrasi, tetapi Barat tidak menganggap apa yang terjadi sebagai Kudeta,meskpun ia mengakui dalam dialog bilateral.”

Kemudian Erdogan menambahkan,”rakyat Mesir akan menerima hak-hak mereka cepat atau lambat, dan suatau hari nanti akan datang “Musa” yang akan mengakhiri tirani “Fir’aun” yang baru.”

Kantor berita Turki “Jihan” mengatakan bahwa Erdogan juga telah meminta Dewan Keamanan PBB untuk mengadakan sidang darurat membahas peristiwa terkini dan perkembangan di Mesir.(eramuslim)




Orang-Orang Yang Disukai Dajjal

Orang-Orang Yang Disukai Dajjal
Orang-Orang Yang Disukai Dajjal | Gho Blog's - Diriwayatkan oleh An-Nawwas ibn Sam’an : “Dia, yang hidup dan melihatnya (Dajjal) harus membacakan di depannya ayat-ayat pembukaan Surat Al Kahfi,” (HR Muslim).

Diriwayatkan oleh Abu Umamah al-Bahili : “Barangsiapa memasuki nerakanya (Dajjal), mintalah pertolongan Allah dan bacakan ayat pembukaan Surat Al Kahfi, dan hal ini akan mendinginkan dan mendamaikannya, seperti api menjadi dingin terhadap Ibrahim,” (HR Ibnu Katsir).

Tanda-tanda dan rahasia Hari Akhir 
Satu alasan mengapa Rasulullah SAW menganjurkan orang-orang beriman membaca Surat Al Kahfi saat Dajjal Mencoba Membujuk Rayu adalah karena surat ini berisi isyarat penting mengenai Hari Akhir, seperti berbagai hal yang dibutuhkan untuk bertahan dan memerangi Dajjal, dan gerakan-gerakan anti-agama yang menimbulkan berbagai kejahatan atas kemanusiaan, yang ingin disebarkan oleh Dajjal ke seluruh dunia.

Surat Al Kahfi ini juga berisi berbagai pelajaran bagi kaum Muslimin. Anjuran Rasulullah SAW untuk menghapalkan dan membaca surat ini dengan penuh perhatian adalah suatu isyarat kuat tentang hal ini. Seperti kita akan lihat di seluruh bab ini, pengalaman Ashabul Kahfi yang tinggal di sebuah masyarakat yang kafir, pelajaran bahwa Musa AS belajar dari Khidr, dan pemerintahan di atas dunia yang didirikan oleh Dzulkarnain AS agar dapat menyebarkan nilai-nilai Islam, adalah perkara-perkara yang perlu direnungkan oleh orang-orang beriman.

Lalu orang seperti apa yang sangat disukai oleh Dajjal? Dan tanpa disadari ia sudah ditandai oleh Dajjal di hati-nya?
  1. Orang yang apabila kumandang adzan terdengar, ia mengacuhkannya. 
  2. Orang yang apabila dinasihati atau diberitahukan mengenai rencana-rencana Dajjal di dunia sebelum ia datang, dia tidak peduli. 
Dajjal tidak langsung tiba-tiba datang, Atas Izin Allah SWT ia mempersiapkan semuanya dengan bantuan para pengikutnya (Freemasonry – illuminati) agar semakin banyak manusia yang akan menjadi pengikutnya. Dan jika seseorang sudah tahu mengenai rencana Dajjal ini, Dajjal sudah melihat-nya dan menandai hatinya. Ini sesuai dengan doa Dajjal kepada allah swt yang kelak akan di kabulkan:

”Ya rabb berikanlah aku kemampuan untuk menurunkan hujan, menghidupkan orang yang sudah mati, menyembuhkan penyakit yang ada di dunia, menyuburkan tanaman dan memperlihatkan surga dan neraka kepada manusia kelak,,, yang sesungguhnya surga ku adalah neraka-mu dan nerakaku adalah surga-mu ya Rabb agar aku bisa menguji keimanan manusia kelak….”

Sekian posting kami yang berjudul Orang-Orang Yang Disukai Dajjal. Semoga kita senantiasa diberi perlindungan oleh Allah SWT dari segala macam bentuk fitnah Dajjal.


Setting TextBox Di Visual Basic 6.0 Agar Data Yang Dientrikan Hanya Barsifat Angka Atau Huruf Saja

Setting TextBox Di Visual Basic 6.0 Agar Data Yang Dientrikan Hanya Barsifat Angka Atau Huruf Saja
Setting TextBox Di Visual Basic 6.0 Agar Data Yang Dientrikan Hanya Barsifat Angka Atau Huruf Saja | Gho Blog's - Salah satu pertanyaan yang cukup familiar yang saya terima dari member forum VB adalah bagai mana caranya membatasi suatu proses input melaui TextBox agar data yang di inputkan hanya berupa angka atau huruf saja.

Artinya, pada saat proses input tidak terjadi kesalahan user terhadap record yang akan di entrikan. Sebagai contoh pembahasan, saya akan menerapkan procedure KeyPress dan menampilakan pesan pemberitahuan bila data yang di entrikan salah.

untuk lebih lanjut, silakan ikuti langkah-langkah berikut ini :

Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!
  • Gunakan Procedure Keypress, contohnya kita akan menyetting Text1.Text agar data yang diinputkan hanya berifat angka atau numerik
  • Double klik pada Text1.Text kemudian pilih Procedure Keypress dan masukkan script berikut diantara Private Sub Text1_KeyPress(KeyAscii As Integer) dengan End Sub
  • Sedangkan agar settingan hanya boleh membaca data yang bersifat huruf (Alphabeth) gunakan script dibawah ini pada Procedure Keypress.


Untuk lebih jelasnya, silakan sobat download contoh program nya dsini :

Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!






Sekian dulu posting kami yang berjudul Setting TextBox Di Visual Basic 6.0 Agar Data Yang Dientrikan Hanya Barsifat Angka Atau Huruf Saja. Semoga bermanfaat, selamat mencoba dan bisa menjawab pertanyaan dari visitor blog ini.


 
Copyright © 2014. Gho - Blog's - All Rights Reserved
Template Created by Creating Website Published by Mas Template