• Dibandara Kuala Namu Air Port,,,Hu ida manis ni senyum mu,,,mambahen au targoda,,,
  • Hidup ini di ibaratkan hanya ada dua warna yaitu Hitam dan Putih, Anda memilih warna yang mana?
  • Natal Medicom 2014 di Pardede Hall,,, Damai Sejahtera Untuk Kita Semuanya...Amen...
  • On ma akka anak muda naso marhepeng,,,naeng senyum pe marmaol ateh dongan,,,alai asal ma horas-horas ateh
  • Belajar manjepret na ma au bah, atik boha boi mambukka usaha shooting video dohot photograper sogot ni haduan,,,hahahahaha

Sunday, 19 July 2015

Cara Membuat Program Loading Visual Basic

Langsung saja,,,

Silahkan buka aplikasi Visual Basic 6.0 nya dan pilih Standart Exe aja,,,












Maka akan tampil sebuah Form1 :











Tambahkan Komponen
Caranya : Menu > Project > Component ( Ctrl + T )
Beri tanda ceklist pada Microsoft Windows Common Controls 6.0 ( SP6 )












Maka Komponen nya sudah bertambah seperti gambar














Selanjutnya silahkan Masukkan sebuat Timer, Progressbar, 3 buah Label
label1 pada properties, captionya ganti menjadi angka 0, dan label2 captionnya menjadi % serta pada label3 pada caption ganti menjadi Loading...
pada properties timer1 ganti interval nya menjadi 100
kira-kira seperti gbr berikutlah :











Tambahkan satu lagi, yaitu Form2 yang akan tampil setelah loading selesai
klik kanan pada
Project explorer > Add > Form



















Selanjutnya ketikkanlah code program berikut ini :

Private Sub Timer1_Timer()
Label1.Caption = Label1.Caption + 10
If ProgressBar1.Value >= 100 Then
Unload Me
Form2.Show
Else
ProgressBar1.Value = ProgressBar1.Value + 10
End If
End Sub

Silahkan deh dieksekusi ( F5 ),,,





















Selesai sudah,,,

Tuesday, 9 June 2015

Kisah Cinta Sang Bunda pada Zaman Sitinurbaya

Setiap orang yang lahir kedunia ini adalah buah dari cinta, dan juga terlahir untuk dicintai. Cinta dari seorang pria dan wanita yang memadu kasih dengan mesra. Begitu juga denganku, aku terlahir dari buah rahim ibuku puluhan tahun yang lalu juga buah dari cinta. Setelah kita lahir, menghirup udara karya Sang pencipta, mulai dari situlah kita merasakan kasih sayang, terkhusus dari orang tua kita yang telah membesarkan kita, maka tidak salah kalau kita harus menghormati orang tua kita, seperti Perintah Tuhan kita.

Beriring waktu aku juga akhirnya dipertemukan dengan cinta dan kasih sayang. Cinta kepada diri sendiri, kepada orang tua, kepada sanak saudara, sahabat dan terkhusus kepada Tuhan. Aku mulai merasakan betapa indah hidup bila dengan cinta. Aku mencoba belajar tentang arti cinta dari pengalamanku sendiri dan juga dari pengalaman sahabatku yang mau berbagi cerita denganku. Tak pelak aku juga berbagi cerita cinta dengan ibuku. Aku ingin mendengar bagaimana kisah cinta ibuku sendiri yang sudah membesarkan aku  juga dengan cinta dan kasih sayang yang tulus. Dari cerita mereka banyak ku temukan kesedihan karena cinta. Dan aku berpikir bahwa tak juga selamanya cinta bisa memberikan kebahagian, malah ada kalanya kita harus meneteskan air mata karena cinta.

Suatu ketika aku pernah bercerita dengan saudara-saudaraku yang sudah pengalaman dengan cinta. Bahkan ada dari antara mereka yang telah ditinggalkan oleh kekasih hatinya, kini mereka hidup sendiri,bukan berarti tanpa cinta, mereka tetap punya cinta kepada anak-anaknya. Mereka dengan setia membesarkannya dan menyekolahkannya setinggi-tingginya. Salah satunya adalah Nenekku. Dialah yang pertama kali menceritakan kisah cinta ibu dan bapakku. Mungkin dia telah melihat saya telah tumbuh menjadi lelaki dewasa yang perlu di bekali dengan nasehat-nasehat dari pengalaman beliau. Dan saya cukup tertarik mendengar setiap celotehan kata demi kata yang terlontar dari mulutnya sambil sesekali ia bergurau untuk mencairkan suasana.

Ia menceritakan kisah ibuku sewaktu masih remaja. Kala itu ibuku termasuk yang tidak beruntung secara ekonomi, tidak punya pendidikan, bahkan SD saja beliau tidak tamat. Tetapi aku salut dengan ibuku, ia masih bisa membaca dan menulis. Ia memang
sempat mengecap pendidikan selama setahun di sekolah dasar, walau tak sampai mendapat selembar ijazah sebagai tanda lulus. Ketika ibuku beranjak dewasa, Ibuku katanya berulangkali di pinang oleh leleki mapan, tetapi berulang kali pula ia menolak. Mungkin karena ia tidak suka atau mungkin itu bukanlah jodohnya. Salah satunya pinangan dari pariban ibuku kandung. Pariban ibuku itu sebenarnya sudah menikah dengan kekasih hatinya tapi belum mempunyai anak laki-laki. Pada hal dalam adat/tradisi batak anak laki-lakilah yang menjadi generasi penerus marga. Sehingga ia ingin menikah lagi biar punya keturunan laki-laki.

Hingga suatu malam pariban ibuku itu berencana datang melamar. Hanya dengan membawa daging  saja sudah cukup. Bahkan mereka bisa membawa ibuku selaku paribannya secara paksa. Karena menurut tradisi orang batak dulu itu sah dan laki-laki itu berhak atas paribannya. Dan sebelum mereka datang kabar itu sudah terdengar oleh  ibuku. Ia sudah mulai kwuatir akan dirinya tapi ia tak bisa berbuat apa-apa karena begitulah dulu masa-masanya sitinurbaya. Ia juga tak tau lari kemana, ia hanya bersembunyi di dalam kamar sambil mencari jalan keluar. Nenekku juga sebenarnya tidak setuju bila putri tunggalnya harus berjodoh dengan laki-laki tua yang sudah beristri. Ibu mana yang merestuinya pastilah tidak ada ibu yang menginginkan hal itu. Tapi ia juga tak bisa berbuat apa-apa, lagi pula saat itu ia sudah ditinggal pergi oleh kekasih hatinya yang telah pergi merantau kenegeri orang tanpa pesan, bertahun-tahun lamanya. Ia menghadapinya sebatang kara tanpa ada teman yang bisa membelanya. Ia hanya pasrah saja. Jika itu sudah menjadi takdir dari putrinya.

Tetapi untunglah ibuku punya akal. Ia tak pasrah begitu saja menghadapi nasibnya. Ia bilang ke nenekku jangan memberi tahu kemana ia pergi. Setelah malam tiba Keluarga pariban ibu datang dengan membawa daging (lomok-lomok) dengan nasinya di dalam panci besar. Nenekku sudah siap menerima mereka dirumah tanpa kehadiran ibuku. Ibuku sudah bersembunyi dikamar saudara sekampung. Katanya mereka dulu mau menyembunyikan ibuku karena merasa iba dengan ibuku dan juga karena tidak kebagian daging yang dibawa oleh keluarga lelaki itu. 

Lanjut cerita mereka bertanya-tanya kemana ibuku pergi kok tidak ada dirumah. Dan nenekku hanya menjawab "aku tidak tahu, setelah dia tahu kalian mau kesini, dia pergi tanpa pamit" kata nenekku sambil menangis. Mereka memeriksa seisi rumah. Ditengah keheningan malam dan sewaktu keluarga beracara dirumah, ibuku sudah pergi meninggalkan kampung halamannya dengan ditemani oleh sahabat-sahabatnya yang baik hati. Ditengah malam itu, ia menyusuri jalan setapak berbatu, dan hanya diterangi oleh cahaya bulan dan bintang. Setengah jam perjalan, akhirnya ia sampai di tepi pantai danau toba. Saat itu, alat transportasi masih sulit, hanya ada perahu kecil untuk penyebrangan. Malam itu pula ia harus berlayar dengan perahu ke tigaras, untungnya ia masih memiliki uang simpanan untuk membayar ongkos perahu. Ditengah derunya ombak malam, untunglah masih ada orang baik yang mau menyebrangkan perahu kecil  untuk mengantarkan ibuku jauh dari kampung itu.

Perlahan denyut jantung ibuku mulai pelan, semakin jauh ia meninggalkan kampung itu semakin tenang hatinya, tapi ia bingung harus pergi kemana. Ia hanya membawa alamat saudara di secarik kertas dengan uang beberapa rupiah saja. Keberaniannya mengalahkan segalanya. Hingga akhirnya ia bisa menemukan alamat itu. Ia kemudian menceritakan semuanya kepada saudara kami itu dan ia diperbolehkan tinggal disana sampai suasana di kampung sedikit tenang.

Dari mulut ke mulut akhirnya cerita ini sampai ke telinga ayahku. Mungkin mereka sudah ditakdirkan untuk berjodoh. Saat itu pula, ayahku berencana untuk menemui ibuku. Mereka memang sebelumnya sudah kenal. Kala itu ayahku  sering bermain ke kampung ibuku. Dan dari situlah ayah dan ibuku mulai saling kenal.

Singkat cerita ayahku langsung bergegas mencari tahu dimana keberadaan ibuku. Sampai akhirnya ia menemukannya. Dan ayahku langsung berangkat bersama sahabatnya ke tebing. Akhirnya mereka bertemu dan Ayahku mengungkapkan perasaannya kepada ibuku dan berencana untuk menikahinya. Saat itu ibu masih bingung,,,
Kemudian ayahku kembali kekampung sambil melihat situasi. Setelah beberapa minggu kemudiaan, Ayahku kembali mendatangi ibuku, melihat keseriusan ayahku, akhirnya ia memutuskan untuk menerima cinta ayahku daripada cinta dari situa bangka itu. Mengingat kondisi kampung yang belum aman, dan mendengar niat pariban ibuku yang berencan ingin mendatangi ibuku, akhirnya mereka memutuskan untuk segera menikah di tempat saudara ibu.

Setelah beberapa bulan menikah, akhirnya mereka kembali ke kampung, dengan harapan tidak akan di ganggu lagi. Tapi walaupun mereka sudah menikah tetap juga di ganggu oleh pariban ibuku itu. Tetapi dengan segala kekuatan cinta, ayahku menjaga ibu hingga saat ini,,,


 






Cara Membuat Logo Carefour

Oke langsung aja ke topik :
  1. Pertama-tama silahkan anda buka Aplikasi Coreldraw X4
    maka tampilannya sebagai berikut :
  2. Aktif pada Polygonal Tool (Y) dan pada number of point = 4rancanglah seperti tampilan berikut :
  3. Kemudian Aktif pada Text Tool (F8), silahkan buat huruf C cetak tebal dan jenis hurufnya Franklin Gothic Demi, sehingga tampilannya akan seperti gambar berikut :
  4. Selanjutnya aktif pada Ellipse Tool (F7) dan buatlah 2 buah lingkaran kecil dan letakkan diujung huruf C, kemudian aktif di Pick Tool tanda objek huruf C dan kedua lingkaran lalu pilih weld maka akan seperti gambar berikut :
  5. Selanjutnya tandailah semua objek atau tekan saja Ctrl + A, kemudian pada properti bar pilih Trim
    Tandailah huruf Cnya lalu delete, maka hasilnya seperti gambar berikut :
  6. Selanjutnya kita akan memisahkan objek sehingga menjadi dua bagian, caranya
    Tandai objek ( Ctrl + A ), kemudian tekan Ctrl + K pada keyboard atau dari menu Arrange > Pilih Break Apart, maka hasilnya seperti gbr. berikut :
  7. Selanjut kita tinggal memberikan warna pada objek yang telah terbagi menjadi 2 bagian tersebut. Maka hasilnya akan seperti gbr berikut :
  8. Sekarang kita tinggal membuat tulisan carrefournya deh
    *Klik kanan ---> untuk memberi warna garis tepi objek
    **Klik kiri ---> untuk memberi warna pada isi objek
    Aktif pada Text tool dan ketikkanlah Carrefour dan buat semenarik mungkin
    untuk jenis fontnya sesuaikan aja dengan selara anda masing-masing dan berikan warnanya

    Sekian,,,