Jumat, 28 Juni 2013

:: Bahaya Tidur Selepas Subuh...


Kita telah ketahui bersama bahawa waktu pagi adalah waktu yang penuh barakah dan di antara waktu yang kita diperintahkan untuk memanfaatkannya. Akan tetapi, pada kenyataannya kita banyak melihat orang-orang melalaikan waktu yang mulia ini. Waktu yang seharusnya dipergunakan untuk bekerja, melakukan ketaatan dan beribadah, ternyata dipergunakaan untuk tidur dan bermalas-malasan.

Saudaraku, ingatlah bahawa orang-orang soleh terdahulu sangat membenci tidur pagi. Kita dapat melihat ini dari penuturan Ibnul Qayyim ketika menjelaskan masalah banyak tidur bahawa banyak tidur dapat mematikan hati dan membuat badan merasa malas serta membuang-buang waktu. Beliau rahimahullah mengatakan,

“Banyak tidur dapat mengakibatkan lalai dan malas-malasan. Banyak tidur ada yang termasuk dilarang dan ada pula yang dapat menimbulkan bahaya bagi badan."

Waktu tidur yang paling bermanfaat yaitu :

1. Tidur ketika perlu tidur.
2. Tidur di awal malam – ini lebih manfaat daripada tidur lewat malam.
3. Tidur di pertengahan siang –ini lebih bermanfaat daripada tidur di waktu pagi dan petang. Apatah lagi pada waktu pagi dan petang sangat kurang manfaatnya bahkan lebih banyak bahaya yang ditimbulkan, lebih-lebih lagi tidur di waktu Asar dan awal pagi kecuali jika memang tidak tidur semalaman.

Menurut para salaf, tidur yang terlarang adalah tidur ketika selesai solat subuh hingga matahari terbit. Kerena pada waktu tersebut adalah waktu untuk menuai ghonimah (pahala yang berlimpah). Mengisi waktu tersebut adalah keutamaan yang sangat besar, menurut orang-orang soleh. Sehingga apabila mereka melakukan perjalanan semalam suntuk, mereka tidak mahu tidur di waktu tersebut hingga terbit matahari. Mereka melakukan demikian kerana waktu pagi adalah waktu terbukanya pintu rezeki dan datangnya barokah (banyak kebaikan).” (Madarijus Salikin, 1/459, Maktabah Syamilah)

BAHAYA TIDUR PAGI


[Pertama]
Tidak sesuai dengan petunjuk Al Qur'an dan As Sunnah.

[Kedua]
Bukan termasuk akhlak dan kebiasaan para salafush soleh (generasi terbaik umat ini), bahkan merupakan perbuatan yang dibenci.

[Ketiga]
Tidak mendapatkan barokah di dalam waktu dan amalannya.

[Keempat]
Menyebabkan malas dan tidak bersemangat di sisa harinya.

Maksud dari hal ini dapat dilihat dari perkataan Ibnul Qayyim. Beliau rahimahullah berkata,
"Pagi hari bagi seseorang itu seperti waktu muda dan akhir harinya seperti waktu tuanya."
(Miftah Daris Sa'adah, 2/216).
Amalan seseorang di waktu muda berpengaruh terhadap amalannya di waktu tua. Jadi jika seseorang di awal pagi sudah malas-malasan dengan sering tidur, maka di petang harinya dia juga akan malas-malasan pula.

[Kelima]
Menghambat datangnya rezeki.

Ibnul Qayyim berkata,
"Empat hal yang menghambat datangnya rezeki adalah:-
[1] tidur di waktu pagi,
[2] sedikit solat,
[3] malas-malasan dan
[4] berkhianat."
(Zaadul Ma’ad, 4/378)

[Keenam]
Menyebabkan berbagai penyakit badan, di antaranya adalah melemahkan syahwat.
Zaadul Ma’ad, 4/222)


"Sampaikanlah pesanku biarpun satu ayat..."
Sebaik-baik manusia itu adalah mereka yang memberi manafa'at kepada manusia lain.

***Sumber Dari : uniqueummah.blog

Kamis, 27 Juni 2013

Masakan Nusantara - Bubur Ketan Hitam


 

Bahan:

  1. 100 gr ketan hitam
  2. 1.5 liter air
  3. 200 ml santan encer
  4. 1/2 sdt garam
  5. 1 lembar daun pandan, potong2 sepanjang 5 cm
  6. 75 gr gula kelapa, sisir
  7. 2 sdm tepung maizena, larutkan dalam 4 sdm air

Saus Santan:

  1. 200 ml santan sangat kental
  2. 1/2 sdt garam atau 50 g gula pasir
  3. 1-2 potongan daun pandan

Cara Membuat:

  1. Rendam ketan hitam semalaman atau minimum 12 jam sebelum dimasak.
  2. Buang air rendaman ketan, cuci bersih, masukkan ke dalam panci ukuran sedang.
  3. Tambahkan 1.5 liter air dan 200 ml santan, garam dan daun pandan.
  4. Masak dengan api besar sampai mendidih, panci dalam keadaan terbuka.
  5. Teruskan masak selama 1 jam sambil diaduk sekali-kali.
  6. Kecilkan api ke posisi sedang, tambahkan gula.
  7. Teruskan memasak selama 15 menit sambil sering diaduk biar tidak gosong.
  8. Hati-hati dengan tangan anda karena pada saat ini air sudah menyusut dan bubur mulai meletup-letup.
  9. Terakhir tambahkan larutan tepung maizena. Aduk sebentar sampai bubur benar-benar mengental.
  10. Bila perlu tambahkan garam dan gula sesuai selera. Angkat dari api.
  11. Saus Santan: Masak santan sangat kental dengan api sedang, aduk2 supaya santan tidak pecah.
  12. Tambahkan garam atau gula putih jika anda ingin saus manis.
  13. Masak sebentar saja tidak perlu sampai mendidih.
  14. Sajikan bubur ketan hitam dengan sausnya.

Sumber : Resep Bubur Ketan Hitam

Selasa, 11 Juni 2013

Masakan Nusantara - Pisang Goreng

Siang sobat...
untuk kali ini ada resep sederhana :)


Bahan:

  1. 5 buah pisang yang cukup matang ( pisang raja atau kepok jika ada)
  2. 100 gr tepung beras
  3. 30 gr atau 2 sdm tepung terigu
  4. 150 ml santan atau air dingin
  5. 1 butir telur
  6. 2 sdt gula bubuk
  7. 1/4 sdt soda kue (optional)
  8. 1/4 sdt garam atau sesuai selera
  9. Minyak goreng secukupnya

Cara Membuat:

  1. Campur tepung beras, tepung terigu, soda kue, garam dan gula dalam mangkok yang agak besar dan aduk hingga rata.
  2. Tambahkan telur kocok, tuang air sedikit demi sedikit sambil diaduk hingga membentuk adonan yang lembut.
  3. Cicipi, jika perlu tambahkan garam atau gula sesuai selera.
  4. Kupas pisang, belah memanjang dan biarkan salah satu ujungnya tetap menyatu ( jangan sampai putus).
  5. Masukkan pisang ke dalam adonan tepung. Jika perlu gunakan sendok untuk menuang adonan ke dalam pisang hingga tepung menyelimuti permukaan pisang dengan sempurna.
  6. Goreng dalam minyak panas yang banyak hingga berwarna kekuningan. Sajikan panas.

Catatan:

  1. Untuk menghasilkan pisang goreng yang sehat, gurih dan dan nikmat, gunakan minyak goreng yang baru, bukan minyak bekas menggoreng.
  2. Pilih pisang yang matangnya sempurna alias tidak terlalu matang dan tidak terlalu muda atau masih mengkal.
  3. Tambahkan soda kue pada adonan tepung / kremesan supaya hasil gorengan bertambah renyah.

Sumber : Pisang Goreng

Senin, 03 Juni 2013

Masakan Nusantara - Bakso


Bahan Dasar Bakso:

  1. 500 gr daging sapi yang bagus atau tidak berlemak, giling
  2. 100 gr tepung tapioka atau bisa diganti dengan tepung maizena
  3. 1 butir telur
  4. 3 sdm bawang merah goreng
  5. 2 butir bawang putih
  6. 1/2 sdt merica bubuk
  7. 1 sdt garam atau sesuai selera
  8. 1 sdt gula putih atau sesuai selera
  9. 150 ml air es

Bahan Kuah:

  1. 2 liter kaldu ( ganti dengan air jika tak ada)
  2. 3 buah bawang putih, geprak
  3. 1/2 sdt lada bubuk
  4. 1 buah bawang bombay, cincang halus
  5. 1 batang daun bawang, iris menyerong
  6. 1 sdt kaldu bubuk rasa daging
  7. garam secukupnya

Pangsit:

  1. 10 lembar kulit pangsit goreng / wantan

Bahan Pelengkap:

  1. Bawang merah goreng
  2. 2 buah dauh bawang, iris halus
  3. Mie kuning / Bihun atau Suun, rebus, tiriskan
  4. Sawi hijau atau caisin ( jika suka), rebus, tiriskan
  5. Kecap Manis
  6. Saos Tomat
  7. Sambal Bakso

Cara Membuat:

  1. Bakso : Haluskan bawang putih, bawang merah goreng, garam dan gula dengan cobek.
  2. (Jika anda menggunakan blender, masukkan bahan di atas ke dalam blender, tambahkan 50 ml dari air es, blender sampai halus).
  3. Pindahkan bumbu halus ke dalam mangkok yang agak besar, tambahkan tepung tapioka, aduk sampai rata. Sisihkan.
  4. Haluskan daging bersama telur dengan food processor atau blender. ( Iris daging kecil2 sebelumnya untuk mempermudah proses penghancuran).
  5. Tambahkan adonan tepung tapioka berbumbu ke dalam food processor, tambahkan sisa air dan proses kembali sampai adonan tercampur sempurna.
  6. Sebelumnya didihkan 3 lt air di dalam panci yang besar, tambahkan sedikit garam.
  7. Bulatkan 1 buah bakso, rebus dan cicipi. Tambahkan garam dan gula jika perlu.( Silahkan ikuti tipp yang sudah saya jelaskan di atas).
  8. Jika rasa udah pas, sisihkan sedikit adonan untuk pangsit jika anda suka. Bulat2kan sisanya dan rebus sampai matang. (Kurang lebih untuk 50 biji)

Pangsit Goreng:

  1. Pangsit Goreng: Isi tiap lembar dengan 1 sdt adonan dasar, lipat segitiga, lalu rekatkan kedua ujung dengan sedikit air.
  2. Goreng pangsit dalam minyak panas sampai kekuningan.

Kuah:

  1. Kuah : Didihkan kaldu atau air.
  2. Tumis bawang bombay dan bawang putih sampai matang dan berbau harum.
  3. Masukkan tumisan ke dalam kuah.
  4. Tambahkan irisan daun bawang, garam, merica dan kaldu bubuk.
  5. Tambahkan gula jika suka.
  6. Masukkan bakso rebus ke dalam kuah.

Cara Penyajian:

  1. Tata mie rebus dan sayur di dalam mangkok saji.
  2. Tambahkan bakso dan pangsit goreng. Siram dengan kuah.
  3. Taburi daun bawang dan bawang goreng.
  4. Terakhir tambahkan kecap manis dan sambal sesuai selera.

Sumber : Resep Membuat Bakso

Minggu, 02 Juni 2013

Yuk! Belajar Pemrograman Visual Basic dot Net Di Mesran.Net

Latihan Listview Perhitungan Penjualan Barang

Berikut Jawaban Program :

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        BuatTabel()
        Kode.Items.Add("TS001")
        Kode.Items.Add("TS002")
        Kode.Items.Add("VG001")
        Kode.Items.Add("VG002")
    End Sub
    Sub BuatTabel()
        lv.Columns.Add("No. Pembelian", 100, HorizontalAlignment.Center)
        lv.Columns.Add("Kode Barang", 100, HorizontalAlignment.Center)
        lv.Columns.Add("Nama Barang", 100, HorizontalAlignment.Center)
        lv.Columns.Add("Merk", 80, HorizontalAlignment.Center)
        lv.Columns.Add("Harga", 80, HorizontalAlignment.Center)
        lv.Columns.Add("Jumlah Beli", 80, HorizontalAlignment.Center)
        lv.Columns.Add("Total Harga", 90, HorizontalAlignment.Center)
        lv.View = View.Details
        lv.GridLines = True
        lv.FullRowSelect = True
    End Sub
    Sub IsiTable()
        Dim Lst As New ListViewItem
        Lst.Text = No.Text
        Lst.SubItems.Add(Kode.Text)
        Lst.SubItems.Add(Nama.Text)
        Lst.SubItems.Add(Merk.Text)
        Lst.SubItems.Add(Harga.Text)
        Lst.SubItems.Add(Jumlah.Text)
        Lst.SubItems.Add(Total.Text)
        lv.Items.Add(Lst)
    End Sub

    Private Sub Jumlah_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Jumlah.KeyPress
        Dim tombol As Integer = Asc(e.KeyChar)
        If tombol = 13 Then
            Jumlah_TextChanged(sender, e)
            Total.Text = Jumlah.Text * Harga.Text
        End If
    End Sub

    Private Sub Jumlah_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Jumlah.TextChanged
      
    End Sub

    Private Sub Kode_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Kode.SelectedIndexChanged
        Dim x As String
        x = Microsoft.VisualBasic.Left(Kode.Text, 2)
        If x = "TS" Then
            Merk.Text = "Thosiba"
        ElseIf x = "VG" Then
            Merk.Text = "V-Gen"
        End If

        x = Microsoft.VisualBasic.Right(Kode.Text, 3)
        If x = "001" Then
            Nama.Text = "Flashdisk 4GB"
        ElseIf x = "002" Then
            Nama.Text = "Flashdisk 2GB"
        End If
        If Kode.Text = "TS001" Then
            Harga.Text = "105000"
        ElseIf Kode.Text = "TS002" Then
            Harga.Text = "75000"
        ElseIf Kode.Text = "VG001" Then
            Harga.Text = "90000"
        ElseIf Kode.Text = "VG002" Then
            Harga.Text = "60000"
        End If
    End Sub

    Private Sub BtnKeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnKeluar.Click
        End
    End Sub

    Private Sub Bersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Bersih.Click
        No.Text = ""
        Kode.Text = ""
        Nama.Text = ""
        Merk.Text = ""
        Harga.Text = ""
        Jumlah.Text = ""
        Total.Text = ""
    End Sub

    Private Sub HapusSemua_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles HapusSemua.Click
        lv.Items.Clear()
    End Sub

    Private Sub Hapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Hapus.Click
        lv.Items.Remove(lv.SelectedItems(0))
    End Sub

    Private Sub BtnSimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSimpan.Click
        IsiTable()
    End Sub
End Class

Hasil Program :

Demikilahlah postingan saya  
Nama : Weni Pidia
NPM : 1111218
Selamat Pemrograman VB NET