Membuat Aplikasi Pencarian Multiple Key Dengan MSFlexgrid Di Visual Basic 6.0

Membuat Aplikasi Pencarian Multiple Key Dengan MSFlexgrid Di Visual Basic 6.0 | Gho Blog's - Kenapa MSFlexGrid…?, Jujur saja saya tidak punya alasan  khusus kenapa mengangkat topik ini. Sederhananya, disemua artikel yang pernah saya tulis baik itu di blog maupun di Ebook saya menggunakan Datagrid sebagai bahan pembahasan karena sangat mudah dari segi pengkodean programnya.

Singkatnya, saya dimintai tolong oleh teman kantor untuk membuat aplikasi penjualan dan stok barang yang akan digunakan di toko yang Dia punya. Jadi saya berfikir untuk sedikit keluar dari kebiasaan saya menggunakan DataGrid untuk management table dan mencoba hal yang lain. Disini saya pun baru pertama kali fokus dan mencoba MSFlexgrid yang lumayan jauh berbeda dan sedikit ribet disbanding DataGrid

Sekarang tidak ada salah nya kita sedikit mengembangkan pengetahuan dasar pemrograman Visual Basic 6.0 kita dengan menggunakan Component yang sedikit berbeda dari biasanya. Tujuan yang paling utama pembuatan Ebook ini adalah sebatas sharing buat sobat yang mungkin juga tertarik untuk menggunakan komponen yang satu ini.

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

Maksud dari pencarian multiple key akan saya jelaskan melaui gambar dibawah ini, silakan sobat perhatikan dan coba pahami.

Sudah paham kan...?

Sekarang kita buat sebuah database terlebih dahulu untuk bahan latihan kita, disini saya menggunakan Microsoft Access sebagai DBMS nya. Saya tidak lagi menjelaskan step-step membuat database dan tabelnya, saya anggap sobat sudah mampu, saya hanya akan memberikan disainnya saja dan silakan sobat buat seperti berikut ini :

• Nama Database : latihan.mdb (simpan dalam format Access 2003)
• Nama Tabel : barang (lihat disain tabel dibawah ini)

Isikan beberapa buah record kedalam tabel barang yang telah dibuat tadi.

Selanjutnya, buka sebuah project baru di Visual basic 6.0, sobat boleh memilih Standard EXE ataupun VB Enterprise Edition Control. Jika sobat memilih VB Enterprise Edition Control maka component MSFlexgrid akan otomatis include ke dalam Tools Box, tapi jika sobat memilih Standard EXE, sobat harus menambah secara manual component MSFlexgrid ke Tools Box Project.

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

Jika sobat terlanjur memilih Standard EXE, silakan sobat buka menu Project ? pilih Components, atau dengan menekan tobol CTRL + T dari keyboard. Kemudian cari dan beri check list pada pilihan Microsoft MSFlexgrid Control 6.0 dan jangan lupa sekalian menambahkan component Microsoft ADO Data Control 6.0 (OLEDB) lalu klik tombol OK. 

Jika suda, buat disan form seperti gambar berikut ini :

Sekarang kita buat koneksi ke database terlebih dahulu, masukkan script berikut pada bagian General Declaration

Public conn As ADODB.Connection Public rs As ADODB.Recordset

Kemudian double klik form dan masukkan coding berikut diantara Private Sub_Form Load() dan End Sub :

Set conn = New ADODB.Connection conn.CursorLocation = adUseClient conn.Provider = "microsoft.jet.oledb.4.0" conn.Open App.Path & "\latihan.mdb"

Sebelum kita lanjutkan, simpan project ini dan letakkan satu folder dengan database yang telah dibuat sebelumnya.

Kembali ke form yang telah dibuat sebelumnya, Di MSFlexgrid, kita akan membentuk tabel menggunakan script alias coding. Disini saya membuat sebuah fungsi pembentuk tabel dan pemanggilan data dalam satu procedure yang saya beri nama “tampilgrid”.

Berikut ini coding untuk membentuk tabel di MSFlexgrid tersebut :

Private Sub tampilgrid() Dim baris As Integer Set rs = New ADODB.Recordset rs.Open "select * from barang", conn, adOpenDynamic, adLockOptimistic With MSFlexGrid1 .Cols = 7 .ColWidth(0) = 400 .ColWidth(1) = 1100 .ColWidth(2) = 4000 .ColWidth(3) = 1000 .ColWidth(4) = 1000 .ColWidth(5) = 700 .ColWidth(6) = 1000 .ColAlignment(0) = flexAlignCenterCenter .TextMatrix(0, 0) = "No" .TextMatrix(0, 1) = "Kode Barang" .TextMatrix(0, 2) = "Nama Barang" .TextMatrix(0, 3) = "Satuan" .TextMatrix(0, 4) = "Harga" .TextMatrix(0, 5) = "Diskon" .TextMatrix(0, 6) = "Stok" For baris = 1 To rs.RecordCount DoEvents .Rows = baris + 1 .TextMatrix(baris, 0) = baris .TextMatrix(baris, 1) = _ rs.Fields(0) .TextMatrix(baris, 2) = _ rs.Fields(1) .TextMatrix(baris, 3) = _ rs.Fields(2) .TextMatrix(baris, 4) = _ rs.Fields(3) .TextMatrix(baris, 5) = _ rs.Fields(4) .TextMatrix(baris, 6) = _ rs.Fields(5) rs.MoveNext Next baris End With End Sub

Lalu kita panggil fungsi “tampilgrid” di bagian Form Load, dengan cara menyisipkan coding pemanggilan yang ditempatkan setelah coding koneksi seperti berikut ini :

Private Sub Form_Load() Set conn = New ADODB.Connection conn.CursorLocation = adUseClient conn.Provider = "microsoft.jet.oledb.4.0" conn.Open App.Path & "\latihan.mdb" tampilgrid '<<--- Sisipkan Disini End Sub

Selanjutnya kita buat aplikasi pencarian data multy keyword, kita gunakan Event Change di Text1 yang nantinya akan melakukan filter berdasarkan character yang kita inputkan. Caranya, double klik di Text1 dan masukkan script berikut diantara Private Sub Text1_Change() dengan End Sub :

MSFlexGrid1.Clear MSFlexGrid1.Rows = 2 baris = 0 Set rs = New ADODB.Recordset rs.Open "SELECT * FROM barang " _ & "WHERE kode_brg LIKE '%" & Text1.Text & "%' " _ & "OR nm_brg LIKE '%" & Text1.Text & "%' " _ & "OR harga LIKE '%" & Text1.Text & "%' " _ & "OR stok LIKE '%" & Text1.Text & "%'", _ conn, adOpenDynamic, adLockOptimistic If rs.BOF Then Exit Sub Else With MSFlexGrid1 .Cols = 7 .ColWidth(0) = 400 .ColWidth(1) = 1100 .ColWidth(2) = 4000 .ColWidth(3) = 1000 .ColWidth(4) = 1000 .ColWidth(5) = 700 .ColWidth(6) = 1000 .ColAlignment(0) = flexAlignCenterCenter .TextMatrix(0, 0) = "No" .TextMatrix(0, 1) = "Kode Barang" .TextMatrix(0, 2) = "Nama Barang" .TextMatrix(0, 3) = "Satuan" .TextMatrix(0, 4) = "Harga" .TextMatrix(0, 5) = "Diskon" .TextMatrix(0, 6) = "Stok" With rs .MoveFirst Do While Not .EOF baris = baris + 1 MSFlexGrid1.Rows = baris + 1 MSFlexGrid1.TextMatrix(baris, 0) = baris MSFlexGrid1.TextMatrix(baris, 1) = !kode_brg MSFlexGrid1.TextMatrix(baris, 2) = !nm_brg MSFlexGrid1.TextMatrix(baris, 3) = !satuan MSFlexGrid1.TextMatrix(baris, 4) = !harga MSFlexGrid1.TextMatrix(baris, 5) = !disc MSFlexGrid1.TextMatrix(baris, 6) = !stok .MoveNext Loop End With End With End If rs.Close

Sekarang silakan sobat test program yang barusan kita buat. untuk lebih jelasnya silakan sobat download contoh program diatas melalui link berikut ini :

Sekian dulu posting saya yang berjudul Membuat Aplikasi Pencarian Multiple Key Dengan MSFlexgrid Di Visual Basic 6.0. Ulasan yang sedikit lebih lengkap mengenai MSFlexGrid ini akan saya bahas pada Ebook yang sedang saya susun. Selamat mencoba dan semoga bermanfaat.

Cara Mendapatkan Dollar Dari Clixsense

Cara Mendapatkan Dollar Dari Clixsense | Gho Blog's - Mungkin untuk sebagian dari sobat akan menganggap basi pembahasan seputar PTC (Paid To Click) seperti ini, tapi gak ada salahnya kalau saya bahas sedikit untuk sobat yang mungkin belum tahu. Sebenarnya posting ini saya buat untuk project blog saya yang baru, karena tu blog masih dalam tahap rancangan jadi saya posting disini terlebih dahulu.

Hampir 10 tahun saya berkecimpung di dunia blogger, saya sudah sangat sering mendengar istilah PTC, namun baru sekarang ini tertarik untuk bergabung guna menambah pasive income saya. Singkatnya PTC adalah sebuah sistem penyedia iklan dimana kita bertugas untuk menjadi viewer dengan cara mengklik iklan yang disediakan dan kita akan dibayar oleh si penyedia iklan. Jadi intinya kita cuma klik iklan trus view selama rentang waktu yang disediakan dan kemudian kita akan mendapat bayaran

Saya sendiri sempat mencoba beberapa beberapa program PTC namun hanya Clixsense yang memberikan progres income yg lebih baik, itulah yang menjadi alasan saya membuat posting ini supaya sobat juga bisa ikut berpartisipasi dalam meraup dollar secara online. Ini hasil yang saya dapat setelah sekitar 1 bulan bergabung dengan Clixsense, mungkin nominalnya masih kecil, tapi terbilang cukup lumayan untuk member standard yang baru daftar belum satu bulan dan tidak memiliki satupun member dari link referal saya.

Nah sobat hanya cukup menyisihkan waktu luang sekitar 30-45 menit sehari untuk mendapatkan pasive income dari clixsense. Untuk tahap awal memang tidak banyak nominal yang bisa kita dapatkan, jadi buat sobat yang tidak sabaran saya sarankan untuk tidak mengikuti progaram PTC, karena untuk mendapatkan income dari internet butuh waktu, kerja keras, dan tingkat kesabaran yang tinggi.

Apa itu Clixsense...?

Clixsense adalah program PTC yang telah ada sejak tahun 2007 dan benar membayar membernya dengan cara mengklik dan melihat iklan yang disedikan dengan minimal nominal withdraw untuk member standard $8.00 dan member premium $6.00. Untuk pembayaran, sobat bisa menggunakan Paypal, Neteller, Paytoo dan Payza.

Cara Daftar

• Untuk pendaftaran silakan sobat klik Disini
• Isi Form yang tersedia, Kemudian klik tombol Signup Now

• Kemudian buka email yang sobat gunakan untuk menadaftar tadi, kemudian klik link conformasi yang dikirim pihak Clixsens.

Cara Mendapatkan Dollar Dari Clixsense

Berikut ini saya akan menjelaskan apa saja yang saya lakukan untuk mendapatkan dollar dari Clixsense, selebihnya bisa sobat cari tau dan pelajari sendir.

A. Klik Iklan

• Klik menu View Ads, kemudian klik iklan yang tersedia seperti gambar dibawah ini.

• Iklan yang di klik akan terbuka di tab baru browser, tunggu hingga muncul pilihan gambar, kemudian sobat klik gambar "Kucing"

• Tunggu beberapa detik hingga klik sobat dianggap valid, kemudian tutup tab iklan tersebut. Lakukan hal yang sama untu semua iklan yang tersedia dan pastikan saat iklan telah terbuka, sobat jangan meminimize apalagi menutup tab browser, karena klik yang sobat lakukakn tidak akan berjalan timernya. Jadi view samapi selesai dan klik sobat sudah dianggap valid.
• Coba scroll browser sobat kearah bawah halaman add Clixsense, karena disana ada 1 atau 2 iklan yang memiliki nominal cukup tinggi per view nya.

B. Survey

Untuk yang satu ini nominalnya cukup tinggi, antara $0.80 s/d $1.50 persurvey. Untuk sobat ketahui, survey ini tidak setiap hari tersedia, jadi sering-sering aja pantau halaman survey Clixsense.

Yang harus sobat pahami adalah, tidak semua survey yang tersedia bisa sobat ikuti, apabila dipertanyaan awal atau di pertengahan survey dianggap tidak sesuai dengan apa yang diminta oleh sistem, maka bisa saja survey dianggap gagal kemudian berhenti otomatis dan sobat tidak mendpatakn income sama sekali, jadi harus benar-benar sabar dan teliti.

C. Game Clixgrid

Disini sobat diberi 30x kesempatan perhari untuk memilih/menebak ratusan grid yang desediakan. Hadiah yang ditawarkan berkisar antara $0.10 s/d $10.00

Nah, smapai saat ini saya belum menemukan trik agar bisa memenangkan permainan ini, jadi saya cuma bisa bilang "Selamat Berjuang"... Hehehehe..

Cara Meningkatkan Income

1. Cari Referal sebanyak-banyaknya

Ajak teman atau orang lain untuk bergabung ke Clixsense melalui link referal sobat, caranya bisa menggunakan sosial media atau membuat artikel tentang Clixsense di blog atau web yang sobat miliki.

2. Upgrade Memebership

Sobat bisa melakukan upgarade membership sobat di Clixsense, tentu saja sobat harus membayar sejumlah uang ke Clixsense, untuk saat ini nominal yang harus sobat bayar adalah 17$ pertahun. Tapi peluang yang sobat untuk mendapatkan dollar juaga akan semangkin meningkat dari Clixsense.

Ekstra
Berikut ini beberapa PTC lain yang mungkin bisa  juga sobat manfaatkan buat nambah income dollarnya.

• Buxvertise
• Neobux
• Buxept

Bagaimana, berminat untuk bergabung...?

Sekian dulu posting saya yang berjudul Cara Mendapatkan Dollar Dari Clixsense. Semoga boermanfaat aja dan selamat mengumpulkan dollar dari Clixsense.

Yang Pernah Mainin Game Ini, Berarti Masa Kecilnya Bahagia

Yang Pernah Mainin Game Ini, Berarti Masa Kecilnya Bahagia  | Gho Blog's - Era tahun 90an mungkin memiliki kesan tersendiri bagi yang melewati masa kecilnya pada jaman tersebut. Ada banyak permainan yang menjadi pilihan anak-anak pada jaman itu dalam mengisi waktu, bukan cuma permainan tradisional saja, ada banyak pilihan games yang pada waktu itu udah berasa keren banget bila bisa memainkannya.

Untuk sobat yang ingin bernostalgia dengan mengingat games yang dulu pernah kita mainkan pada masa anak-anak dulu silakan simakposting dibawah ini dan coba ingat kembali apa nama games-games tersebut karena saya juga udah lupa apa namanya namun yang pasti 8 games dibawah ini udah pernah saya mainkan waktu anak-anak dulu.

Berikut ini 8 game legend era tahun 90an yang mungkin udah sangat langka saat ini :

Sudah ingat dengan 8 games diatas....?

Sekian posting saya yang berjudul Yang Pernah Mainin Game Ini, Berarti Masa Kecilnya Bahagia. Selamat bernostalgia sambil mengingat indahnya masa anak-anak kita dulu.

Cara Mengatasi Run Time Error -2147217887 Multiple-Step Operation Generated Errors Pada Visual Basic 6.0

Cara Mengatasi Run Time Error -2147217887 Multiple-Step Operation Generated Errors Pada Visual Basic 6.0 | Gho Blog's - Buat sobat yang mungkin baru belajar pemrograman Visual Basic 6.0, terkadang bingung saat terjadi error pada program yang sedang dikerjakan.

Setelah beberapa kali saya mendapatkan pertanyaan dari rekan-rekan yang berdiskusi dengan saya tentang masalah yang sama, maka saya angkat pertanyaan tersebut menjadi sebuah posting jika ada sobat lain yang sedang menghadapi masalah ini, mudah-mudahan apa yang saya tulis bisa membantu mengatasi masalah error yang satu.

Biasanya runtime error seperti ini terjadi pada saat kita melakukan entri data melalui form, kemudian compiler akan menunjukkan baris error pada coding. Mungkin sebagian dari sobat akan mengira bahwa ada kesalahan pada coding yang digunakan dan terfokus pada coding tersebut.

Sebenarnya, tidak mutlak kesalah coding yang harus diperhatikan, karena runtime error -2147217887 adalah kesalahan dari setting field size sebuah dari sebuah field pada tabel di database.

Untuk lebih jelasnya, perhatikan gambar berikut ini :

Jika sobat perhatikan gambar diatas, maka terlihat penyebab runtime error -2147217887 disebabkan karena jumlah karakter yang diinputkan melalui form lebih besar dari field size yang ada di tabel.

Penyebab Error :

- Data yang diinputkan = 8 karakter

- Field size = 5 karakter

Cara Mengatasi :

• Perbesar lagi field size yang ada di tabel atau dengan mengganti tipe data yang mampu menampung data lebih besar.
• Jika memang harus 5 karakter (tidak boleh lebih) data yang diinputkan, sisipkan pesan pemberitahuan untuk mengingatkan user bahwa data yang dietriakan terlalu panjang dengan cara menambah coding seperti berikut ini pada tombol Simpan/Save :

Private Sub Command1_Click() '<--- Tombol Save On Error GoTo pesan: [ Letakkan Coding Simpan Disini ] pesan: If (Err.Number = -2147217887) Then MsgBox "Karakter Terlalu Panjang", VbInformation Text1.Text= "" '<-- Kosongkan Textbox yang bermasalah Text1.Setfocus '<-- Tempatkan cursor pada textbox yang bermasalah End If End Sub

Semoga posting ini bisa membantu sobat dalam mengatasi error yang sama. Sekian posting saya yang berjudul Cara Mengatasi Run Time Error -2147217887 Multiple-Step Operation Generated Errors Pada Visual Basic 6.0. Semoga bermanfaat.

Legalisasi LGBT Sebagai Tanda Kebangkitan Kaum Sodom dan Keberhasilan Agenda Zionis

Legalisasi LGBT Sebagai Tanda Kebangkitan Kaum Sodom dan Keberhasilan Agenda Zionis | Gho Blogs - Pada akhir Juni 2015, atas nama HAM dan kesetaraan, Amerika resmi melegalkan pernikahan sejenis mengikuti beberapa negara lain. Kemenangan besar-besaran yang ditandai dengan berkibarnya bendera pelangi dirayakan oleh para Pejuang LGBT (Lesbi, Gay, Bisexual, Transgender) di dunia.

Agenda LGBT bukan hanya propaganda diskriminasi hak hidup. Ada agenda besar yang melatarbelakangi kemunculan mereka. Agenda ini tak lain adalah agenda zionist yang berusaha merusak norma agama dan sosial dengan melemahkan bahkan menghancurkan lembaga-lembaga pernikahan di seluruh di dunia.

Dukungan Dari Tokoh dan Selebriti Dunia.

Mark Zuckerberg memasng bendera pelangi di profile Facebook dan menyediakan fitur baru bernama ‘Let’s Celebrate Pride’ (Mari Rayakan Kebanggaan), yang menempatkan filter pelangi di foto profil pengguna facebook.

Bukan hanya selebriti dunia yang memberikan dukungan kepada LGBT, beberapa artis di Indonesia pun terang-terangan menyatakan dukungan terhadap Kaum Sodom era modern ini atau sekarang lebih dikenal dengan istilah LGBT. Sebut saja Joko Anwar dan artis Sherina Munaf yang membuat posting di akun twitter nya yang secara terang-terangan mendukung LGBT dan berharap seluruh dunia pun ikut melegalkan pernikahan sejenis seperti Amerika.

Bukan cuma datang dari kalangan selebriti, stantement mengejutkanpun datang dari seorang yang berlatarbelakang sebagai dosen Paramadina,  ia mengajak umat Islam untuk meninjau kembali sikap dan cara pandang terkait perilaku LGBT karena Allah tidak mengharamkan hal tersebut.

Agenda Besar Zionist Dibalik LGTB

Sebelum bendera kemenangan dan sorak sorai kaum Somom dirayakan di Amerika Serikat, sejumlah gerakan propaganda dan penyusupan ajaran LGBT telah berjalan sangat rapi, terstruktur dan massif di seluruh dunia dengan Amerika sebagai pusat dan hampir semua negara Eropa menjadi pendukung legal organisasi pejuang LGBT ini.

Kevin Boyle, seorang sejarawan, professor, penganut Kristen dan juga seorang penulis pernah mempublish artikel di tahun 2013 menguraikan agenda besar LGBT di seluruh dunia bahkan sejarahnya telah dimulai dari tahun 1930-an. Jelas ini bukan gerakan atau agenda main-main. Karena LGBT adalah sebuah penyakit sosial dan LGBT bukan lahir secara alami dari penyakit genetika kecuali beberapa orang di dunia yang dilahirkan dengan kasus kelamin ganda.

Just about everybody, it seems to me, is content to accept that homosexuality is natural in the sense that it exists in nature and that the people involved cannot help how they feel. Most will also accept that the condition can be considered to be ‘pre-destined’ inasmuch as the person cannot be blamed for feeling same-sex attraction, given their (un-chosen) experience.

However, the idea that the homosexual tendency is created by nature itself, rather than the human agencies involved, is quite a different matter. Except in the very rarest cases of sexual genetic ambiguity, there is no evidence that any person is ‘born gay’.*

It is this objective moral order that is the enemy of our masters and their political, judicial and media representatives. It threatens their mission to draw all power to themselves.

Let humanity understand, it is the mission of the Judeo-Masonic elite to DISPLACE GOD.

We can see that people are already being punished for merely, referring to ‘God’. We can see that Christ has been displaced on Calvary by ‘The Jewish People’ (Talmudic Judaism’s one and only God). The Protocols and the Masonic supremacists forge ahead with their Satanic plans.

Peringatan Rasulullah

Rasulullah SAW bersabda :

"Pasti akan datang kepada ummatku, sesuatu yang telah datang pada bani Israil seperti sejajarnya sandal dengan sandal, sehingga apabila di antara mereka (bani Israil) ada orang yang menggauli ibu kandungnya sendiri secara terang terangan maka pasti di antara ummatku ada yang melakukan demikian". (at-Tirmidzi: 2565)

Tetaplah memohon perlindungan Allah SWT dari fitnah Dajjal :

“Jika salah seorang di antara kalian melakukan tasyahud, mintalah perlindungan pada Allah dari empat perkara: Ya Allah, aku meminta perlindungan pada-Mu dari siksa Jahannam, dari siksa kubur, dari fitnah hidup dan mati, dan dari kejelekan fitnah Al Masih Ad Dajjal” (HR. Muslim no. 588).

Referensi :

• http://www.pkspiyungan.org/
• https://en.wikipedia.org
• http://www.thetruthseeker.co.uk/

Sekian posting kami yang berjudul Legalisasi LGBT Sebagai Tanda Kebangkitan Kaum Sodom dan Keberhasilan Agenda Zionis. Semoga kita selalu dilindungi dari bahaya fitnah akhir zaman.

10 Universitas Terbaik Di Indonesia Tahun 2015

10 Universitas Terbaik Di Indonesia Tahun 2015 | Gho Blog's - Posting kali ini adalah posting rutin yang saya share sejak 3 tahun lalu. Sekedar informasi tentang 10 Universitas Terbaik Di Indonesia Tahun 2015 yang mudah mudahan bermanfaat bagi sobat yang akan melanjutkkan pendidikan ke jenjang universitas di tahun ini.

Di tahun 2015 ini, untuk posisi puncak yaitu urutan 1 s/d 5 tiidak mengalami perubahan dari tahun lalu. Ada pergeseran peringkat pada posisii ke 6 ke atas yang pada tahun ini mengalami penurunan dan ada pula yang mengalami peningkatan.

Berikut 10 universitas terbaik di Indonesia tahun 2015 versi 4ICU, berserta info fakultas, alamat dan website resminya :

1. ITB (Institut Teknologi Bandung)
Fakultas :

• Sekolah Bisnis dan Manajemen (SBM)
• Sekolah Ilmu dan Teknologi Hayati (SITH)
• Fakultas Teknologi Industri (FTI) 
• Fakultas Teknik Mesin dan Dirgantara (FTMD)
• Sekolah Teknik Elektro dan Informatika (STEI)
• Sekolah Pasca Sarjana (SPS)
• Fakultas Teknik Pertambangan dan Perminyakan (FTTM)
• Sekolah Farmasi (SF)
• Fakultas Seni Rupa dan Desain (FSRD)
• Fakultas Ilmu dan Teknologi Kebumian (FITB)
• Fakultas Matematika dan Ilmu Pengetahuan Alam (FMIPA)
• Fakultas Teknik Sipil dan Lingkungan (FTSL)
• Sekolah Arsitektur, Perencanaan dan Pengembangan Kebijakan (SAPPK) 

Alamat :
Kantor:
Jl. Tamansari 64 Bandung, 40116
Kampus:
Jl. Ganesha 10 Bandung, 40132
Website : www.itb.ac.id


2. UGM (Universitas Gadjah Mada)
Fakultas :

• Biologi
• Ekonomika & Bisnis
• Farmasi
• Filsafat
• Geografi
• Hukum
• Ilmu Budaya
• Isipol
• Kedokteran
• Sekolah Pascasarjana 
• Kedokteran Gigi
• Kedokteran Hewan
• Kehutanan
• MIPA
• Pertanian
• Peternakan
• Psikologi
• Teknik
• Teknologi Pertanian 
• Sekolah Vokasi

Alamat :
Universitas Gadjah Mada
Bulaksumur, Yogyakarta 55281
Website : www.ugm.ac.id


3. UI (Universitas Indonesia)
Fakultas :
Terbagi dalam tiga rumpun keilmuan yaitu sains teknologi (Fakultas Matematika & Ilmu Pengetahuan Alam, Teknik dan Ilmu Komputer), ilmu sosial - humaniora (Fakultas Ekonomi, Hukum, Ilmu Sosial Ilmu Politik, Psikologi dan Ilmu Budaya) dan ilmu kesehatan (Fakultas Kedokteran, Fakultas Kedokteran Gigi, Fakultas Ilmu Keperawatan, Fakultas Kesehatan Masyarakat).

Alamat :
Universitas Indonesia
Kampus UI Depok 16424 Indonesia
Website : www.ui.ac.id


4. Universitas Brawijaya
Fakultas :

• Fakultas Hukum
• Fakultas Ekonomi dan Bisnis
• Fakultas Ilmu Administrasi
• Fakultas Pertanian
• Fakultas Peternakan
• Fakultas Teknik
• Fakultas Kedokteran
• Fakultas Perikanan dan Ilmu Kelautan
• Fakultas Matematika dan Ilmu Pengetahuan Alam
• Fakultas Teknologi Pertanian
• Fakultas Ilmu Sosial dan Ilmu Politik
• Fakultas Ilmu Budaya
• Program Kedokteran Hewan
• Program Teknologi Informasi dan Ilmu Komputer
• Program Vokasi
• Program Pasca Sarjana

Alamat :
- Jl. Mayjen Haryono 169, Lowokwaru, Malang 65145, Jawa Timur
- Jl. Veteran, Malang 65145, Jawa Timur
Website : http://www.ub.ac.id


5. UNS (Universitas Sebelas Maret)
Fakultas :

• Fakultas Sastra dan Seni Rupa
• Fakultas Keguruan dan Ilmu Pendidikan
• Fakultas Hukum 
• Fakultas Ekonomi
• Fakultas Ilmu Sosisal dan Ilmu Politik
• Fakultas Kedokteran
• Fakultas Teknik
• Fakultas Pertanian
• Fakultas Matematika dan Ilmu Pengetahuan Alam

Alamat :
Jalan Ir Sutami No 36-AKentingan
Surakarta.
Website : www.uns.ac.id


6. (UNAIR)  Universitas Airlangga
Fakultas :

• Fakultas Kedokteran (FK)
• Fakultas Hukum (FH)
• Fakultas Ekonomi dan Bisnis (FEB)
• Fakultas Farmasi (FF)
• Fakultas Kedokteran Hewan (FKH)
• Fakultas Ilmu Sosial dan Ilmu Politik
• Fakultas Sains dan Teknologi (FSAINTEK)
• Fakultas Kesehatan Masyarakat (FKM)
• Fakultas Psikologi (FAPSI)
• Fakultas Ilmu Budaya (FIB)
• Fakultas Ilmu Budaya
• Fakultas Keperawatan
• Fakultas Perikanan dan Kelautan

Alamat :
Jl. Airlangga 4-6, Surabaya 60286, Jawa Timur
Kampus A: Jl. Mayjen.Prof. Dr. Moestopo 47, Surabaya, Jawa Timur
Kampus B: Jl. Darmawangsa Dalam Selatan, Surabaya 60286, Jawa Timur (FK)
Kampus C: Mulyorejo, Surabaya 60115, Jawa Timur;
Website : http://www.unair.ac.id - http://unair.ac.id/unair_v1/


7. UPI (Universitas Pendidikan Indonesia)
Fakultas :

• Fakultas Ilmu Pendidikan
• Fakultas Pendidikan Ilmu Pengetahuan Sosial 
• Fakultas Pendidikan Bahasa dan Seni 
• Fakultas Pendidikan Matematika dan Ilmu Pengetahuan Alam
• Fakultas Pendidikan Teknologi dan Kejuruan
• Fakultas Pendidikan Olahraga dan Kesehatan 
• Fakultas Pendidikan Ekonomi dan Bisnis

Alamat :
Jl. Dr. Setiabudhi No. 229 Bandung 40154 Jawa Barat - Indonesia
Website : www.upi.edu


8. Universitas Gunadarma
Fakultas :

• Ilmu Komputer
• Ekonomi
• Teknologi Industri
• Teknik Sipil dan Perencanaan
• Psikologi
• Sastra

Alamat :
Jl. Margonda Raya 100, Depok
Jawa Barat, Indonesia
Website : www.gunadarma.ac.id


9. UNDIP (Universitas Diponegoro)
Fakultas :

• Kedokteran  
• Teknik 
• Perikanan dan Ilmu Kelautan 
• Matematika dan Ilmu Pengetahuan Alam
• Ekonomika dan Bisnis  
• Hukum 
• Peternakan 
• Ilmu Budaya 
• Ilmu Sosial dan Ilmu Politik 
• Psikologi  
• Kesehatan Masyarakat 
• Pasca Sarjana

Alamat :
Jl. H. Prof. Sudarto, SH, Tembalang
Website : www.undip.ac.id


10. IPB (Institut Pertanian Bogor)
Fakultas :

• Fakultas Pertanian
• Fakultas Kedokteran Hewan
• Fakultas Perikanan dan Ilmu Kelautan
• Fakultas Peternakan
• Fakultas Kehutanan
• Fakultas Teknologi Pertanian
• Fakultas Matematika dan Ilmu Pengetahuan Alam
• Fakultas Ekonomi Manajemen
• Fakultas Ekologi Manusia
• Fakultas Pascasarjana
• Program Diploma

Alamat :
Jl. Raya Darmaga Kampus IPB Darmaga Bogor
Jawa Barat, Indonesia
Website : www.ipb.ac.id

======||======

UPDATE...!!

Berhubung posting ini dibuat diawal tahun dan seiring berjalan waktu maka perubahan rangking pun mengalami perubahan, berikut ini urutan rangking universitas terbaik di Indonesia tahun 2015 yang saya update pada tanggal 08 Januari 2016 :

1. Institut Teknologi Bandung
2. Universitas Gadjah Mada
3. Universitas Indonesia
4. Universitas Airlangga
5. Universitas Diponegoro
6. Universitas Sebelas Maret
7. Universitas Brawijaya
8. Universitas Padjadjaran
9. Universitas Pendidikan Indonesia
10. Universitas Negeri Yogyakarta
11. Institut Pertanian Bogor
12. Universitas Gunadarma
13. Universitas Lampung
14. Universitas Sumatera Utara
15. Universitas Bina Nusantara
16. Universitas Mercu Buana
17. Institut Teknologi Sepuluh Nopember
18. Universitas Negeri Semarang
19. Universitas Udayana
20. Universitas Muhammadiyah Yogyakarta

Sekian dulu info 10 Universitas Terbaik Di Indonesia Tahun 2015. Semoga bermanfaat buat sobat yang sedang mencari referensi kampus tahun ini.

Tentang Perbedaan Penentuan ‘Ied Adha Dan Puasa ‘Arafah

Tentang Perbedaan Penentuan ‘Ied Adha Dan Puasa ‘Arafah | Gho Blog's - Pemerintah Arab Saudi sudah menetapkan, bahwa hari ini Kamis 25 September 2014 sudah masuk tanggal 1 Dzulhijjah, artinya 10 Dzulhijjah 1435 H bertepatan dengan Hari Sabtu, 04 Oktober 2014. Artinya Ied ‘Adha 1435 (10 Dzulhijjah) bertepatan Hari Sabtu 04 Oktober 2014 dan hari wuquf di ‘Arafah atau hari ‘Arafah (9 Dzulhijjah) bertepatan dengan hari Jum’at 03 Oktober 2014

Mengenai penetapan Ied ‘Adha ini berbeda dengan Penentuan Awal Ramadhan yang memang penetapannya berbeda-beda tergantung madzhab yang digunakan. Dalil Penentuan Awal Dzulhijjah ini berbeda karena kewenangan menentukannya khusus diberikan pada penguasa Makkah yang mengurusi Haji.

Nabi bersabda, ”Haji itu ‘Arafah” (HR Tirmidzi, Nasa’i dan Ibnu Majah)

Dan ‘Arafah itu berlokasi di Makkah, karenanya hari ‘Arafah adalah hari dimana kita melihat jamaah haji berwuquf, maka di hari itulah disunnahkan berpuasa ‘Arafah. Karena wuquf yang berhaji itu hanya di ‘Arafah, maka puasa ‘Arafah itu terkait tempat dan waktu, yaitu saat wuquf, bukan selainnya.

Adapun sepuluh hari pertama di bulan Dzulhijjah ini (25/09/14 – 04/10/14), maka beramal baik di dalamnya sangat disunnahkan.

Nabi saw bersabda, ”Tidak ada hari dimana amal shalih pada saat itu lebih dicintai oleh Allah daripada hari-hari ini (yaitu sepuluh hari dari bulan Dzulhijjah). Mereka bertanya, “Ya Rasulullah, tidak juga jihad fi sabilillah?”. Beliau menjawab “Tidak juga jihad fi sabilillah, kecuali orang yang keluar (berjihad) dengan jiwa dan hartanya, kemudian tidak kembali dengan sesuatu apapun”. (HR Bukhari)

Tentang puasa ‘Arafah, banyak pula dalil yang menyatakan keutamannya, yaitu berpuasa saat jama’ah haji wuquf di padang ‘Arafah.

Saat Rasulullah ditanya tentang puasa ‘Arafah, beliau menjawab, ”ia menghapus dosa tahun lalu dan tahun yang akan datang” (HR Muslim)

Doa-doa juga sangat maqbul di hari ‘Arafah.

Nabi bersabda, ”sebaik-baik doa adalah doa hari ‘Arafah..” (HR Tirmidzi)

‘Arafah juga hari dimana Allah memberikan ampunan yang meluas bagi hamba-hamba-Nya

Nabi saw menyampaikan, “tiada hari yang Allah lebih banyak membebaskan hamba-Nya dari neraka melebihi hari ‘Arafah” (HR Muslim)

Bagaimana bila penetapan hari ‘Arafah dan hari ‘Ied berbeda antara ketetapan pemeintah Indonesia dan pemerintah Arab Saudi yang menyelenggarakan haji? Jawabannya sebagaimana yang sudah saya sampaikan diatas, karena haji itu di ‘Arafah, maka mestilah mengikuti ketetapan pemerintah Arab sebagai penyelenggara haji.

Mengapa?

1. Bila rakyat Indonesia semuanya mesti mengikuti ketetapan pemerintah Indonesia, lalu bagaimana dengan jama’ah haji Indonesia di Arab Saudi? apakah mereka wuquf dan ‘Ied mereka mengikuti keputusan pemerintah RI lau berbeda dengan jama’ah haji di Makkah? tentu tidak sah.
2. Berpuasa pada dua hari raya (‘Ied Fitri dan ‘Ied Adha) adalah haram, maka saat jamaah haji sudah shalat ‘Ied (sudah 10 Dzulhijjah), sementara kita di Indonesia masih berpuasa ‘Arafah (masih 9 Dzulhijjah), bukankah ini aneh? Padahal secara zona waktu, kita lebih dulu 4 jam daripada Arab Saudi. Lagipula, namanya juga puasa ‘Arafah, artinya puasa saat jama’ah haji berwuquf di ‘Arafah, bila jama’ah haji sudah shalat ‘Ied, lantas puasa kita bukan lagi puasa ‘Arafah, namun puasa ‘Ied

Jadi, penetapan awal Dzulhijjah yang mengikuti keputusan pemerintah Arab Saudi bukan perkara apapun, selain perkara dalil. Karena hak penentuan itu sudah terlisan oleh Rasulullah, “Haji itu ‘Arafah”

Namun, adapun bila ada perbedaan dalam menyikapi perihal ini, misal “Mestikah Puasa ‘Arafah Ikut Hari Wukuf di ‘Arafah? Bolehkah Berbeda Dengan Pemerintah Arab Saudi Selaku Penyelenggara Hajji Dalam Menetapkan Hari ‘Arafah”?

Tentu kita kembali dalam penyikapan terhadap hukum ikhtilaf (perbedaan pendapat). Bila ada dalilnya (hujjah/argumen), maka disilakan. Bila sudah berhujjah, tak lagi perlu berhujat.

Yang harus benar-benar disadari dan dipahami, bahwa perbedaan ini dimungkinkan terjadi justru karena tidak adanya halangan politis, tidak adanya persatuan dan kesatuan di negeri-negeri Muslim, bukan disebabkan oleh perkara-perkara yang bersifat teknis. Karena banyaknya negeri-negeri Muslim, maka semua berdalil mengikuti ulil amri (pemerintah) masing-masing.

Hal ini tidak akan terjadi bila kaum Muslim berada dalam kepemimpinan Islam yang satu, di bawah kepemimpinan Khilafah Islam. Bila hanya satu Khalifahnya, tentu tidak ada perbedaan lagi diantara kaum Muslim dalam menetapkan apapun, termasuk penetapan Awal Ramadhan dan Awal Dzulhijjah.

InsyaAllah, dalam waktu dekat Khilafah Islam yang berjalan diatas manhaj kenabian akan bangkit kembali, dan mengatur seluruh kaum Muslim berdasarkan Kitabullah dan Sunnah, menyatukan perbedaan dan merekatkan ukhuwah diantara kaum Muslim.

Selamat menambah ibadah di 10 hari Dzulhijjah ini, juga siapkan untuk berpuasa di hari ‘Arafah 9 Dzulhijjah, saat jama’ah haji wuquf. [Sumber : Akun Facebook Ustadz Felix Siauw]

Free Download 7 Skin Visual Basic 6.0 [Part V]

Free Download 7 Skin Visual Basic 6.0 [Part V] | Gho Blog's - Berikut ini 7 koleksi terakhir skin visual basic 6.0 yang saya punya. jika nanti saya menemukan tampilan skin yang lainnya, InsyaAllah akan saya share kembali buat sobat semua.

Sebelumnya, pastikan sobat sudah punya file OCX untuk menjalankan skin ini. Sobat bisa menggunakan Active Skin 4.0 ataupun Active Skin 4.3.

Jika sobat belum punya file OCX nya, silakan sobat download melalui link berikut ini :

Download Active Skin 4.0 (OCX)

atau

Download Active Skin 4.3

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

Cara menggunakan Active Skin 4.0 :

• Copy paste file OCX Active Skin 4.0 yang sobat download ke dalam folder : C:\WINDOWS\system32
• Register OCX tersebut menggunakan Command Prompth (Lihat Cara Register OCX Disini)
• Jika sudah diregister, letakkan file skin (*.skn) satu folder dengan project.
• Letakkan komponent Active Skin 4.0 Ke form, Jika belum ada di tools box, tekan CTRL + T, kemudian pilih dan checklist Active Skin 4.0.
• Masukkan coding berikit ini di event Form Load() :

skn.LoadSkin App.Path & "\winaqua.skn" '<-- nama Skin yang digunakan skn.ApplySkin Me.hWnd

Cara Menggunakan Active Skin 4.3 (Lihat Caranya Disni)

Berikut ini 7 Skin Visual Basic 6.0 bagian ke-5 dari saya yang bisa sobat download dan gunakan :

1. Triton (10 Kb)

(Download)

2. VistaBlueNew (21 Kb)

(Download)

3. Web-II (13 Kb)

(Download)

4. winaqua (16 Kb)

(Download)

5. Winter (12 Kb)

(Download)

6. XFactor3 (15 Kb)

(Download)

7. Zhelezo (96 Kb)

(Download)

Lihat juga :

• Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!
• Free Download 10 Skin Visual Basic 6.0 [Part I]
• Free Download 10 Skin Visual Basic 6.0 [Part II]
• Free Download 10 Skin Visual Basic 6.0 [Part III] 
• Free Download 10 Skin Visual Basic 6.0 [Part IV]

Sekian posting saya yang berjudul Free Download 7 Skin Visual Basic 6.0 [Part V]. Semoga bermanfaat untuk sobat semua.

Cara Membuat Pembulatan Bilangan Angka Dengan Visual Basic 6.0

Cara Membuat Pembulatan Bilangan Angka Dengan Visual Basic 6.0 | Gho Blog's - Pada sebuah program aplikasi yang memiliki fungsi untuk menghitung bilangan angka, sering kita temui hasil dari penghitungan tersebut merupakan bilangan berkoma yang digit dibelakang koma berjumlah cukup banyak, sedangkan yang kita inginkan hanyalah 2 atau 3 digit saja yang muncul dibelakang koma.

Untuk itu, kita bisa menggunakan fungsi Round untuk memperpendek digit sesuai keinginan kita.

Sebagai contoh, saya membuat sebuah aplikasi sederhana untuk pembagian dua buah bilangan dan hasil dari penghitungan tersebut saya hanya munculkan 2 digit saja angka dibelakang koma, adapun disain form tersebut adalah seperti berikut ini :

Pada tombol Hitung (Command1), saya masukkan coding berikut ini :

Text3.Text = Round(Int(Text1.Text) / Int(Text2.Text), 2)

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

Perhatikan angka 2 yang berada diujung coding, angka tersebut yang menentukan jumlah digit yang ingin kita munculkan dibelakang koma.

Silakan sobat ganti angka tersebut sesuai keingin sobat. Untuk lebih jelasnya, contoh progam ini bisa sobat download melalui link berikut ini :

Sekian dulu posting kami yang berjudul Cara Membuat Pembulatan Bilangan Angka Dengan Visual Basic 6.0. Selamat mencoba dan semoga bermanfaat.

Cara Membuat Format Mata Uang Dengan Visual Basic 6.0

Cara Membuat Format Mata Uang Dengan Visual Basic 6.0 | Gho Blog's - Posting kali ini kita akan membahas pemrograman sederhana namun cukup sering menjadi pertanyaan di forum programmer VB. Yang akan kita jadikan topik bahasan kali ini adalah tentang bagaimana caranya membuat format mata uang dengan visual basic 6.0.

Pembuatan format mata uang ini hanya membutuhkan sebaris coding sederhana saja. Biasanya perintah semacam ini digunakan untuk pembuatan aplikasi transaksi penjualan.

Untuk lebih jelasnya, silakan sobat ikuti project latihan berikut ini :

• Buatlah sebuah form dengan 1 buah Textbox (Text1.Text)
• Kita akan menerapkan event keypress, jadi double klik pada Text1 kemudian pilih event/procedure Keypress dan masukkan coding berikut ini tepat diantara Private Sub Text1_KeyPress(KeyAscii As Integer) dengan End Sub 

If KeyAscii = 13 Then Text1.Text = "Rp." & Format(Text1.Text, "#,##0") End If

• Sekarang, coba jalankan program ini, masukkan nominal yang sobat inginkan kemudian tekan Enter dan lihat hasilnya.

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


Contoh program ini bisa sobat download melalui link berikut ini :

Sekian dulu posting saya yang berjudul Cara Membuat Format Mata Uang Dengan Visual Basic 6.0. Selamat mencoba dan semoga bermanfaat.