Senin, 20 Mei 2013

Nanas merupakan tumbuhan semak yang memiliki sifat alamiah yang menarik (Ananas Comosus). Buah yang berasal dari negara Brazil ini, ternyatadapat tumbuh di daerah tropis, terutama di daerah khatulistiwa. Maka tak heran jika Indonesia, tercetak menjadi urutan pengekspor nanas ketiga setelah Filipina dan Thailand. Selain mempunyai potensi yang sangat besar secara ekonomi, nanas juga ternyata mempunyai banyak manfaat di dalam tubuh manusia, walaupun efek sampingnya juga ada. Telah banyak dibuktikan bahwa sebuah nanas banyak mengandung vitamin A dan C sebagai antioksidan. Selain itu, buah ini juga mengandung Kalsium, Fosfor, Magnesium, Besi, Natrium, Kalium, Dekstrosa, Sukrosa dan enzim Bromelain. Enzim Bromelain sendiri berkhasiat sebagai zat anti radang dan dapat membantu melunakkan makanan di lambung, serta menghambat pertumbuhan sel kanker. Kandungan seratnya juga mempunyai fungsi untuk dapat mempermudah buang air besar pada penderita sembelit. Beberapa khasiat buah nanas yang telah masak : Anti radang. Dapat mengurangi keluarnya asam lambung yang berlebihan. Mengganggu pertumbuhan sel kanker.Ber sifat dingin. Peluruh air seni. Membersihkan jaringan kulit yang mati. Membantu pencernaan makanan di lambung. Menghambat penggumpalan trombosit. Ramuan yang dibuat dari buah nanas dan beberapa bagian lainnya pun mempunyai kemampuan untuk menyembuhkan beberapa penyakit. Beberapa di antaranya adalah: Air perasan (jus) nanas dipercaya dapat menyembuhkan cacingan , radang tenggorokan, beri-beri, menurunkan berat badan, masalah pencernaan. Daun nanas yang telah dicuci bersih dan ditumbuk, dapat menyembuhkan bisul, luka bakar dan gata-gatal. Anda tinggal membalurkan ramuan tersebut pada bagian tubuh yang sakit. Nanas juga bisa digunakan untuk menghilangkan ketombe. Caranya adalah dengan mengambil sari dari satu perempat buah nanas masak yang telah dikupas kulitnya, lalu bisa Anda parut, lalu diperas dan disaring. Tambahkan perasan 1 jeruk nipis, dan aduk sampai rata. Anda bisa mengoleskan ramuan ini ke kulit kepala, sewaktu malam hari sebelum tidur, lakukan ini berturut-turut, 2-3 kali dalam seminggu. Bila Anda mendambakan wajah yang halus dan cerah, Anda bisa mencampurkan jus nanas dan santan ke dalam mangkuk kecil, lalu aduk rata dan buat masker di wajah menggunakan kapas, biarkan selama 20 menit sampai mongering sendiri, dan bilas dengan air bersih dan keringkan. Lakukan ini sebanyak dua kali dalam seminggu Bila Anda memiliki kulit yang bersisik dan mudah mengelupas, maka Anda bisa membuat ramuan dari buah nanas yang sudah masak. Buah tersebut bisa Anda parut dan digosokkan ke kulit wajah secara perlahan. Lakukan setiap hari setiap malam sebelum tidur. Untuk mengatasi sembelit, Anda harus meminum air perasan 3 nanas yang belum terlalu matang dan berasa sedikit asam, diparut dan diperas untuk Anda konsumsi sarinya nanti. Namun seperti yang telah disebutkan sebelumnya, buah nanas pun juga memiliki efek samping yang bisa cukup mengganggu. Beberapa di antaranya adalah, Nanas muda sebagai abortivum, bisa menggugurkan kandungan. Buah nanas memang dapat digunakan untuk memperlancar haid, namun sebaiknya tidak diminum oleh ibu-ibu yang tengah hamil muda Memicu rematik. Di dalam saluran cerna buah nanas terfermentasi menjadi alkohol. Maka itu, untuk yang mempunyai penyakit rematik dan radang sendi dilarang mengonsumsi nanas. Mengandung kadar gula yang cukup tinggi. Untuk itu penderita diabetes harus membatasi konsumsi buah nanas ini secara berlebihan. Terasa gatal sehabis makan nanas. Ini bisa diatasi dengan merendam nanas segar ke dalam larutan air garam. Selamat mengolah nanas dan mendapatkan manfaatnya!

 http://warungshinobi.blogspot.com/manfaat nenas bagi kesehatan.html

Minggu, 19 Mei 2013

hari ni saya akan berbagi listing program penggajian karyawan dgn menggunakan listview pada vsiual basic 2008...
sebelum meracik listing program nya mari kita mendisain tampilan nya dulu :




Setelah  kita mndisain nya mari kita racik listing program nya :

Public Class Form1

    Sub BuatTabel()
        LV.Columns.Add("nik", 50, HorizontalAlignment.Left)
        lv.Columns.Add("nama", 55, HorizontalAlignment.Center)
        lv.Columns.Add("jabatan", 60, HorizontalAlignment.Left)
        lv.Columns.Add("status", 80, HorizontalAlignment.Center)
        lv.Columns.Add("pajak", 50, HorizontalAlignment.Center)
        lv.Columns.Add("tunj.keluarga", 75, HorizontalAlignment.Center)
        lv.Columns.Add("gaji", 55, HorizontalAlignment.Left)
        lv.Columns.Add("total gaji", 60, HorizontalAlignment.Left)
        LV.View = View.Details
        LV.GridLines = True
        LV.FullRowSelect = True


    End Sub

    Sub IsiTabel()
        Dim Lst As New ListViewItem
        Lst.Text = nik.Text
        Lst.SubItems.Add(na.Text)
        Lst.SubItems.Add(ja.Text)
        Lst.SubItems.Add(st.Text)
        Lst.SubItems.Add(tk.Text)
        Lst.SubItems.Add(pa.Text)
        Lst.SubItems.Add(ga.Text)
        Lst.SubItems.Add(tg.Text)
        LV.Items.Add(Lst)
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        BuatTabel()
        nik.Items.Add("1111590")
        nik.Items.Add("1111591")
        nik.Items.Add("1111589")

        ja.Items.Add("manager")
        ja.Items.Add("keuangan")
        ja.Items.Add("staf")

        st.Items.Add("menikah")
        st.Items.Add("tidak menikah")
    End Sub

    Private Sub nik_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles nik.SelectedIndexChanged
        Select Case nik.Text
            Case "1111590" : na.Text = "fikri"
            Case "1111591" : na.Text = "hakim"
            Case "1111589" : na.Text = "shinobi"
        End Select

    End Sub

    Private Sub ja_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ja.SelectedIndexChanged
        Select Case ja.Text
            Case "manager" : ga.Text = 1750000
            Case "keuangan" : ga.Text = 2500000
            Case "staf" : ga.Text = 1250000
        End Select

        pa.Text = 0.15 * ga.Text

    End Sub

    Private Sub st_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles st.SelectedIndexChanged
        Select Case st.Text
            Case "menikah" : tk.Text = 0.15 * ga.Text
            Case "tidak menikah :tunj.keluarga = 0"

        End Select

    End Sub

    Private Sub btnproses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnproses.Click
        tg.Text = Val(ga.Text) + Val(tk.Text) - Val(pa.Text)
    End Sub

    Private Sub skl_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles skl.Click
        IsiTabel()
        nik.Text = ""
        na.Text = ""
        ja.Text = ""
        st.Text = ""
        tk.Text = ""
        pa.Text = ""
        ga.Text = ""
        tg.Text = ""

    End Sub

    Private Sub btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkeluar.Click
        Me.Close()
    End Sub

    Private Sub btnhapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnhapus.Click
        nik.Text = ""
        na.Text = ""
        ja.Text = ""
        st.Text = ""
        tk.Text = ""
        pa.Text = ""
        ga.Text = ""
        tg.Text = ""

    End Sub

End Class

Untuk  mnjalankan atau mlihat apakah program kita jalan takan F5 yang ada di kybord klo sudah maka hasil nya seperti di bawah ini :








Kamis, 09 Mei 2013


Jogging  apa yang timbul di benak anda saat mendengar kata ini? Bagi banyak orang, jogging sering dikaitkan dengan olahraga santai di pagi hari yang lazimnya dilakukan oleh para atlet, tentara, ataupun orang dewasa. Di jaman modern ini, cukup jarang anak muda yang tertarik dengan olahraga ini.
Sepintas, jogging memang terlihat ringan dan sederhana. Bila dibandingkan dengan olahraga lain semacam sepak bola ataupun bola basket, jogging seakan terkesan tidak mungkin membakar kalori sebanyak cabang-cabang olahraga tersebut. Tapi tahukah anda bahwa jogging membawa manfaat yang luar biasa bagi tubuh kita?
Sebagai awal, jogging merupakan contoh latihan kardio yang baik. Jogging dapat merangsang, melatih, dan meningkatkan performa jantung dan pembuluh darah secara maksimal. Karena kemampuan jantung kita dalam memompa darah meningkat, maka secara otomatis tiap organ tubuh kita akan berfungsi dengan lebih baik dan kondisi kesehatan kita secara keseluruhan pun akan meningkat.
Manfaat lain dari jogging adalah meningkatnya kapasitas paru-paru. Tanpa disadari atau tidak, saat kita berlatih secara rutin, daya tahan fisik kita pun meningkat. Bila pada awal-awal jogging, kita hanya bisa bertahan selama 15 menit sebelum berhenti, maka sesudah jogging tiap hari selama seminggu, mungkin kita bisa bertahan 20-25 menit. Semakin lama kita bisa bertahan selama kita jogging, semakin banyak pula kalori dan lemak yang akan dibakar oleh tubuh kita.
Keuntungan lain dari olahraga ini adalah meningkatnya proses metabolisme tubuh kita. Pada suatu titik, jogging akan membuat kita kehabisan nafas dan jantung kita berdetak cepat. Hal ini berarti bahwa tubuh kita sedang mempercepat proses pembakaran lemak. Dari titik ini, anda hanya tinggal meneruskan latihan selama beberapa menit lagi untuk dapat melihat efek dari latihan yang anda lakukan terhadap berat tubuh anda.
Selain ketiga manfaat diatas, jogging juga berfungsi untuk membentuk otot kaki. Orang yang rutin fitness atau binaraga kadang terlalu terfokus pada bagian atas tubuh dan melupakan bagian bawah, termasuk kaki. Padahal, kaki adalah penopang berat tubuh kita saat kita berdiri, berjalan, ataupun berlari. Salah satu manfaat dari jogging adalah merangsang otot kaki dengan stabil, sehingga kita tidak hanya memiliki otot tangan atau tubuh yang kuat, tetapi juga otot kaki.
Selain manfaat yang disebut diatas, jogging juga memiliki sebuah fungsi unik, yaitu memperbaiki postur tubuh. Salah satu teknik utama dari jogging adalah berdiri tegap, sehingga bila kita rajin jogging, secara tidak sadar cara berjalan kita pun menjadi tegap. Hal ini tentu membawa dampak yang baik bagi penampilan anda sehari-hari.
Kesimpulannya, jogging sangatlah baik untuk kesehatan dan juga penampilan kita. Namun demikian, sebaiknya anda tidak melakukan olahraga ini saat udara dingin karena cuaca yang dingin dapat membawa pengaruh buruk bagi organ tubuh kita.