Postingan

Membuat Loading Di Visual Basic 6.0

Gambar
Kali ini saya akan membahas tentang bagaimana cara membuat From loading pada VB: Siapkan komponen tambahan seprti gambar tersebut, caranya > tekan ctrl + T >ceklist/centang Microsoft Windows Common Controls 6.0 Sisipkan Loading dan 1 buat timer kedalam form, hingga seperti gambar tersebut Setelah itu masukan perintahnya dibawah Private Sub Timer1_Timer() If ProgressBar1.Value >= 100 Then Unload Me Form2.Show Else ProgressBar1.Value = ProgressBar1.Value + 10 End If End Sub Nah itu dia langkahnya simpel kan ? Kemudian silahkan di coba di run, semoga bisa di mengerti dengan bahasa yang sederhana ini dan bisa bermanfaat buat semuanya

Membuat form transparan pada VB 6.0

Gambar
  Di kesempatan kali ini saya akan memberitahu anda tutorial membuat form transparan pada vb 6.0, langsung saja caranya sebagai berikut: buka vb standar exe tambahkan 2 command, masing-masing beri caption “Transparan” dan yang satu lagi “Normal Tambahkan koding berikut di Option Explicit: ‘============ Option Explicit Private Const WS_EX_LAYERED = &H80000 Private Const GWL_EXSTYLE = (-20) Private Const LWA_COLORKEY = &H1 Private Const LWA_ALPHA = &H2 Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long Private Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hwnd As Long, ByVal crColor As Long, ByVal nAlpha As Byte, ByVal dwFlags As Long) As Long ‘----

Cerita lucu Di bulan Ramadlan

Gambar
Sore biru langit  tenggelamkan sang surya berganti abu tua Dua Remaja SMP Gadis belia Ngabuburit bersepeda lintasi kompleks perumahan Turangga Sebagian kendaraan laju cepat seakan mules kebelet ada di rasa kendaraan roda dua gangguin namun mereka tetap buang muka Dipinggiran trotoar pedagang es buah sajian tajil kolak seakan kamu mau aku ada Sekelompok Remaja laki laki berkerumun nyanyi iringi lagu Barat merdu kata mereka Lagu dihentikan saat dua Gadis lewati mereka malu merah muka Tiba dari arah lawan sana Becak roda tiga hampiri tak terkendali serang sepeda Gubraakkkk Sepeda satu membanting jatuh tepat depan Pemuda yang paling ireng diantara mereka Pemuda ingin kenalan namun Sang Gadis cuek habis bangkit segera Gengsi cepat si Gadis bangkit menggoseh Pemuda malah Terpingkal tawa Pulanglah sang Gadis berjanji jumpa bila Taraweh tiba Duduk depan meja berkumpul menunggu Bedug perut sudah nyanyikan keroncong Puasa Akhirnya kumandang Adzan langsung minum melahap semua di mej

Cinta Antara Aku Kau dan Dia

Aku Lisa , sekarang aku kuliah di sebuah perguruan tinggi. Dan aku mempunyai seorang pacar , namanya Ardi , Ardi sangat mencintaiku , akupun mencintainya tapi itu dulu , semenjak aku belum mengenal ihsan teman baik Ardi . Kebetulan aku, Ardi dan Ihsan memang satu kampus . Pagi itu Ardi seperti biasa menjemputku . "Say, lama ya nunggunya . " Ardi turun dari mobil'y dan membukakan pintu mobil untuk ku . "Ya, sudah biasa ." Jawab ku cuek, sambil segera duduk . Setibanya di kampus Ihsan sudah ada di parkiran , dia duduk di motor Ninja nya. "Wah Ihsan sungguh keren." Pikirku, akupun terkagum-kagum melihatnya. Aku dan Ardi pun turun dari mobil, dan mengampiri Ihsan . "Hey, sob lagi ngapain pagi-pagi bengong aja sendiri lo,, pasti lagi nyari mangsa Lo yaa, ." Tegur pacarku Ardi. "Gila aja lo, gue kan lagi nunggu lo. Kan gue blum ngerjain tugas dari Pak johar, jadi gue nunggu lo, buat nyontek, lama bener sih Lo." Jela

Enaknya jadi Jomblo

Enaknya jadi Jomblo Yang jomblo jangan bersedih hati karena jomblo itu enak banget, seperti yang saya katakan tadi saya akan bercerita tentang pengalamanku saat jomblo. kalau aku dengar kata pacaran saya itu jadi sangat malas , kenapa.......?, karena menurut saya pacaran itu buang - buang waktu, buang - buang duit , dan buang- buang segalanya, pada saat kamu jomblo kamu akan mendapat anyak keuntung slah satunya kamu bisa bergaul bebas kepada cewek - cewek yang lain tanpa ada yang melarang mu, kamu tidak akan di bingungkan dengan kemauan cewek kamu , dan kamu tidak akan bingung bingung memberi hadiah kepada cewek pada saat ulangtahunnya, pokoknya enak deh jadi jomblo itu , g' akan ada waktu yang tersia siakan untuk seorang cewek. seperti kata kiyai saya , "JOMBLO ITU PENAKUT" - takut dosa - takut maksiat - takut masuk neraka - takut gk dapat pahala

Apa itu cinta?

Gambar
Apa anda pernah bertanya APA ITU CINTA ? anda tepat pergi ke situs ini karena saya akan membaha sbeberapa hal mengenai cinta. menurut saya cinta itu sebuah coba'an yang diberikan (maksudnya coba'an kesenangan). cinta terus membuat kita merasa bingung , "aqw aja biasanya bingung hehehe.... :D biasa anak muda" . semakin kita encintai seseorang semakin kita di coba oleh tuhan, contonya kamu punya teman, teman mu itu sangat kamu cintai , maka tuhan akan mencoba mu lewat teman yang kamu cintai tadi, seperti dia selalu ceritain orang lain (yang pasti lawan jenisnya) dan pastinya kamu merasa sangat cemburu ataupun merasa sakit hati, atau bahkan dia pacaran sama orang lain "kalau gtu sih bete banget hehehehe......." , dan aku akan memberi saran kepada kalian , jika teman mu yang  tadi itu kamu rasa baik untuk kamu maka kejarlah jangan biarkan dia di miliki orang lain, tapi ingat meskipun kamu merasa dia baik umtuk mu dan tuhan berkata dia tidak baik untu

Cerita Yang Paling Menyayat Hati

           Abang ni, pakai tu elok-elok la sikit,” kata Julia lembut sambil membetulkan pakaian Ahmad. Ahmad tersenyum memandang isterinya. “Cantik isteri abang hari ni,” Ahmad mencubit pipi Julia lembut. “Ayah, ayah, cepat la yah,” Liz dan Lin meluru masuk ke bilik kerana dah tak sabar-sabar nak bertolak pulang ke kampung. “Yelah, yelah, ayah dah siap ni.” Julia hanya tersenyum melihat suaminya itu melayan karenah anak-anak mereka yang comel dan manja. “Abang, dah lama kita tak balik kampung macam ni, ye?” “Iyelah, maklumlah abang ni sibuk dengan urusan perniagaan. Baru kali ni abang ada peluang untuk cuti panjang.” Ahmad berkata kepada isterinya tercinta. Perjalanan daripada KL ke Teluk Intan mengambil masa lebih kurang empat jam. Liz dan Lin dah pun terlelap kat kerusi belakang. Begitu juga dengan isterinya, Julia. “Tak sabar rasanya nak tiba kat kampung,” Ahmad berkata dalam hati. Sedikit demi sedikit Ahmad menekan minyak keretanya. Semakin lama keretanya semak

Puisi Menyenangkan

SILAHKAN MENIKMATI   ------------------------------------------------------------------------ AKU   Aku Pria Jalang Dari Kumpulannya Yang Terbuang Aku Kecantol Wanita Jalang Demi Tubuhnya Kuhambur Uang Gejolak Hasrat Nafsu Berpetualang Membuat Masakan Di Rumah Terasa Kurang Aku Anak Manusia, Aku Anak Malang Affairku Akhirnya Tercium Orang Karir Suksesku di DPR Akhirnya Hilang Karena Ada Kelemahanku Yang Bisa diserang Semuanya Hancur Gara-gara Selembar kutang Kepada Siapa Aku Pantas Berang? Semua Kesalahan Kulimpahkan Kepada Si Jalang Tetapi Sebenarnya Godaan Si Wanita Jalang Takkan Mempan Kalau Akunya Sendiri Tidak Jalang! Kesadaran Selalu Datang Menjelang Petang Kini Yang Ku-punya Tinggal Tulang Tapi Sebelum Aku Berpulang Aku Ingin Berpesan Kepada Sesama Hidung Belang ! Kiamat segera datang...... .!!!! Tobatlah mulai sekarang......r ang..rang. rang.. ------------------------------------------------------------------------ AKU   Akulah karyawan pali

Cerita - Cerita Konyol

Gambar
Cerita anak Maho Pada suatu hari Bapak dan Anak sedang bercakap2... A : Huuuuu~ (nangis ) B : Kenapa nak? Kamu kok nangis? A : Tadi sya di pukul pak karena saya di kira HOMO (maho) B : Haah? Kok gak melawan? Lawan aja.. A : Soalnya yang mukul itu GANTENG sih... (maho) B : -_-" kampreet...? Bapak melarang anaknya berJILBAB Di suatu desa, ada seorang Ustadz yang di yakini taat beragama dan jadi pedoman warga sekitar... Namun suatu hari, terdengar isu bahwa Ustadz tersebut melarang anaknya menggunakan JILBAB, padahal telah dianjurkan agama bahwa wajib menutup aurat, sehingga warga pun bingung A : Huuuuu~ (nangis ) Knp aku dilarang berjilbab.. B : Kenapa lg nak? Aku sudah melarang mu berkali-kali.. A : Tapi ini kan perintah agama pak... I : Iya pak, kenapa larang anak kita berJILBAB, baguslah dia mau jadi anak baik.. B : Berjilbab emang diwajibkan, tapi bagi PEREMPUAN.. Anak kita COWOK! I : *&^!($)@^($)...?

Kisah Cinta Segitiga Yang Mengharukan

Malam ini aku sebenarnya masih ingin bersama Kak Renosa terus. Tapi, ternyata mama menjemputku. Padahal tadinya Kak Renosa berniat mengajak aku pegi nonton konser setelah pulang dari pentas Pramuka. Terpaksa gagal acara nonton konser bersama Kak Renosa. Tapi kenapa aku jadi kesal ya gara-gara acaraku dan Kak Renosa gagal? Nggak mungkin kan aku ada rasa sama Pembina Pramukaku itu. Apa mungkin karena tadi siang aku habis putus sama Putra, jadi aku ngrasa kesepian. Sehingga acara pergi bersama Kak Renosa aku anggap sebagai obat sakit hati. Ah biarlah. Besok perasaan ini pasti juga sudah hilang. Oh Tuhan! Pagi ini Kak Renosa mengirimi aku sms untuk membangunkanku dari mimpi. Kenapa aku merasa keGRan begini? Apa mungkin gara-gara kejadian semalam, telah menumbuhkan benih-benih cinta? Jangan sampai terjadi deh! Gak umum banget kalau sampai terjadi. Sejak sore, Kak Renosa sudah ngajak aku smsan. Biasa, isinya cuma sekedar basa-basi. Aku pun juga tidak terlalu peduli. Karena