Tak Ada Jalan Pintas

04.09 |

Keberhasilan tak diperoleh begitu saja. Ia adalah buah dari pohon kerja keras yang berjuang untuk tumbuh. Jangan terlalu berharap pada kemujuran. Apakah kalian tahu apa itu kemujuran? Apakah kalian dapat mendatangkan kemujuran sesuai keinginan kalian? Padahal kita tahu, kita tak selalu mampu menjelaskan dari mana datangnya. Sadarilah bahwa segala sesuatu berjalan secara alami dan semestinya. Layaknya proses mendaki tangga, kalian melangkahkan kaki kalian melalui anak tangga satu per satu. Tak perlu repot-repot membuang waktu kalian untuk mencari jalan pintas, karena memang tak ada jalan pintas. Sesungguhnya kemudahan jalan pintas itu takkan pernah memberikan kepuasan sejati. Untuk apa kalian berhasil jika kalian tak merasa puas?
Hargailah setiap langkah kecil yang membawa anda maju. Janganlah melangkah dengan ketergesaan, karena ketergesaan adalah beban yang memberati langkah saja.
Amatilah jalan lurus kalian. Tak peduli bergelombang maupun berbatu, selama kalian yakin berada di jalan yang tepat, maka melangkahlah terus. Ketahuilah, jalan yang tepat itu adalah jalan yang menuntun kalian menjadi diri kalian sendiri.

sumber : www.uphincow.wordpress.com
Read More

Kasih Sayang Seorang Ibu

04.03 |

Saat kau berumur 15 tahun, dia pulang kerja ingin memelukmu.
Sebagai balasannya, kau kunci pintu kamarmu.

Saat kau berumur 16 tahun, dia ajari kau mengemudi mobilnya.
Sebagai balasannya, kau pakai mobilnya setiap ada kesempatan tanpa peduli kepentingannya.

Saat kau berumur 17 tahun, dia sedang menunggu telepon yang penting.
Sebagai balasannya, kau pakai telepon nonstop semalaman.

Saat kau berumur 18 tahun, dia menangis terharu ketika kau lulus SMA.
Sebagai balasannya, kau berpesta dengan temanmu hingga pagi.
 
Saat kau berumur 19 tahun, dia membayar biaya kuliahmu dan mengantarmu ke kampus pada hari pertama.
Sebagai balasannya, kau minta diturunkan jauh dari pintu gerbang agar kau tidak malu di depan teman-temanmu.
 
Saat kau berumur 20 tahun, dia bertanya, “Dari mana saja seharian ini?”
Sebagai balasannya, kau jawab, “Ah Ibu cerewet amat sih, ingin tahu urusan orang!”
 
Saat kau berumur 21 tahun, dia menyarankan satu pekerjaan yang bagus untuk karirmu di masa depan. 
Sebagai balasannya, kau katakan, “Aku tidak ingin seperti Ibu.”
 
Saat kau berumur 22 tahun, dia memelukmu dengan haru saat kau lulus perguruan tinggi.
Sebagai balasannya, kau tanya dia kapan kau bisa ke Bali.
 
Saat kau berumur 23 tahun, dia membelikanmu 1 set furniture untuk rumah barumu.
Sebagai balasannya, kau ceritakan pada temanmu betapa jeleknya furniture itu.
 
Saat kau berumur 24 tahun, dia bertemu dengan tunanganmu dan bertanya tentang rencananya di masa depan.
Sebagai balasannya, kau mengeluh, “Bagaimana Ibu ini, kok bertanya seperti itu?”
 
Saat kau berumur 25 tahun, dia mambantumu membiayai pernikahanmu.
Sebagai balasannya, kau pindah ke kota lain yang jaraknya lebih dari 500 km.
 
Saat kau berumur 30 tahun, dia memberikan beberapa nasehat bagaimana merawat bayimu. Sebagai balasannya, kau katakan padanya,”Bu, sekarang jamannya sudah berbeda!”
 
Saat kau berumur 40 tahun, dia menelepon untuk memberitahukan pesta ulang tahun salah seorang kerabat. 
Sebagai balasannya, kau jawab, “Bu, saya sibuk sekali, nggak ada waktu.”
 
Saat kau berumur 50 tahun, dia sakit-sakitan sehingga memerlukan perawatanmu.
Sebagai balasannya, kau baca tentang pengaruh negatif orang tua yang menumpang tinggal di rumah anak-anaknya.
 
Dan hingga suatu hari, dia meninggal dengan tenang. Dan tiba-tiba kau teringat semua yang belum pernah kau lakukan, karena mereka datang menghantam HATI mu bagaikan palu godam.
 
JIKA BELIAU MASIH ADA, JANGAN LUPA MEMBERIKAN KASIH SAYANGMU LEBIH DARI YANG PERNAH KAU BERIKAN SELAMA INI DAN JIKA BELIAU SUDAH TIADA, INGATLAH KASIH SAYANG DAN CINTANYA YANG TULUS TANPA SYARAT KEPADAMU.
Sumber : www.uphincow.wordpress.com
Read More

Berhentilah Mengeluh

03.53 |

Pantaskah anda mengeluh? Padahal anda telah dikaruniai sepasang lengan yang kuat untuk mengubah dunia. Layakkah anda berkeluh kesah? Padahal anda telah dianugerahi kecerdasan yang memungkinkan anda untuk membenahi segala sesuatunya.
Apakah anda bermaksud untuk menyia-nyiakan semuanya itu? lantas menyingkirkan beban dan tanggung jawab anda? Janganlah kekuatan yang ada pada diri anda, terjungkal karena anda berkeluh kesah. Ayo tegarkan hati anda. Tegakkan bahu. Jangan biarkan semangat hilang hanya karena anda tidak tahu jawaban dari masalah anda tersebut.
Jangan biarkan kelelahan menghujamkan keunggulan kamu. Ambillah sebuah nafas dalam-dalam. Tenangkan semua alam raya yang ada dalam benak anda. Lalu temukan lagi secercah cahaya dibalik awan mendung. Dan mulailah ambil langkah baru.
Sesungguhnya, ada orang yang lebih berhak mengeluh dibanding anda. Sayangnya suara mereka parau tak terdengar, karena mereka tak sempat lagi untuk mengeluh. Beban kehidupan yang berat lebih suka mereka jalani daripada mereka sesali. Jika demikian masihkan anda lebih suka mengeluh daripada menjalani tantangan hidup ini?
sumber : uphincow.wordpress.com
Read More

Membuat Login sederhana di VB

07.20 |

Dalam pembuatan suatu aplikasi, hak akses merupakan sesuatu yang penting untuk mengamankan data dari pihak-pihak yang tidak berkepentingan. Oleh sebab itu, pada program aplikasi dibuat suatu form untuk melakukan login masuk pihak yang berhak masuk. Dalam pembuatan form login, diperlukan database pengguna yang bisa mengakses program tersebut. Akan tetapi dalam hal ini penulis akan membuat aplikasi login sederhana, tanpa database untuk bisa masuk ke form utama. Berikut langkah-langkahnya :


• Siapkan 2 buah form, yang pertama beri nama form3 untuk login, dan form4 untuk form utama
• design form3 seperti berikut :

• atur PasswordChar pada properties text2 menjadi tanda bintang

• ketikkan listing pada command login
Private Sub clogin_Click()
1. If Text1.Text = "maruloh28" And Text2.Text = "1234" Then
2. MsgBox "Silakan masuk", vbInformation + vbOKOnly, "Success"
3. Form4.Show
    Else
4. MsgBox "Maaf password user name dan password anda salah, silakan coba lagi", vbCritical,"Error"
5. Text1.Text = ""
    Text2.Text = ""
6. Text1.SetFocus
    End If
    End Sub
• keterangan Listing program:
  1-3 : melakukan penyeleksian, jika username (text1) nilainya ”maruloh28”
          dan passwordnya (text2) nilainya ”1234” maka akan muncul 
          pesan silakan masuk dan form utama (form4) akan ditampilkan.
  4-6 : jika username dan password tidak sesuai maka muncul pesan
          kesalahan, text1 dan text2 akan kosong dan kursor terfokus di text1
• Jalankan program

Read More

Hidup adalah Pilihan

06.39 |

Dalam hidup tidak seharusnya kita hanya berpasrah pada takdir, memang ada hal yang Allah SWT telah tetapkan kepada kita seperti Mati atau jodoh, namun ada beberapa hal yang memang bisa kita rubah jika kita mau merubahnya. Allah berfirman dalam surat Ar Ra'du ayat 11 yang artinya :

"sesungguhnya Allah tidak akan merubah sesuatu dari suatu kaum sehingga mereka merubah apa yang ada pada mereka sendiri".



dari ayat di atas jelas Allah mengatakan bahwa Allah tidak akan merubah keadaan seseorang jika orang tersebut tidak mau berusaha untuk merubah keadaan mereka sendiri. Ayat ini juga mengisyaratkan kepada kita agar selalu berusaha dan tidak mempasrahkan diri pada keadaan andai kehidupan kita dalam kekurangan.

Ingat kawan, Sukses-gagal, kaya-miskin, pintar-bodoh merupakan suatu pilihan dalam kehidupan kita. Apa yang kita pilih itulah yang akan kita rasakan. Kita akan sukses dengan bekerja keras atau kita akan menjadi manusia gagal yang hanya berpangku tangan tanpa melakukan apa-apa. itulah pilihan yang harus kita pilih. Jika kita mau kaya, maka berusahalah dengan bekerja, jika tidak maka pilihan hanya 1, hidup miskin tanpa melakukan apa-apa.


Begitupun dalam berbuat, berbuat baik atau berbuat buruk, semua adalah pilihan. Namun harus diingat, konsekuensi yang akan didapat dari perbuatan kita. Jika berbuat baik, tentu pahala yang kita dapat yang bermuara pada kebaikan akhirat, namun sebaliknya jika keburukan yang kita lakukan tentu murka dan siksaNya lah yang akan kita terima. Semua terserah kita sebagai manusia. Allah memberikan kita akal dan hati tentu ada tujuan dan fungsinya, gunakanlah akal dan hati kita untuk memilih mana yang terbaik untuk kita. semoga Allah senantiasa memberikan petunjuk dalam menjalani kehidupan yang penuh dengan godaan ini, Amin.
Read More

Membuat teks berkedip pada VB

23.15 |

kali ini saya akan membagikan pengetahuan kepada teman-teman semua bagaimana cara membuat teks pada visual basic berkedip atau blink secara sederhana, mengapa saya bilang sederhana? karena memang listingnya tidak terlalu panjang, hanya kurang lebih 4 baris kita sudah bisa membuat teks tersebut berkedip sesuai dengan warna yang kita inginkan.

Ok, tanpa berlama-lama kita langsung saja mulai.
Langkah pertama tentu kita buka program vb terlebih dahulu, setelah itu masukkan satu buah objek label dan time, jangan lupa rubah captionnya sesuai dengan keinginan anda.



langkah berikutnya kita ubah propertis dari time, yaitu pada bagian interval, ganti menjadi 500, ingat semakin kecil nilai interval semakin cepat dia berkedip atau blink


setelah itu kita tulis listing pada timernya
Private Sub Timer1_Timer()
If Label1.ForeColor = vbRed Then
   Label1.ForeColor = vbBlue
   Else
   Label1.ForeColor = vbRed
   End If
End Sub

langkah terakhir, jalankan program, lihat hasilnya
cukup mudah kan
Read More

Artikel Pilihan

03.18 |

Read More