Public Class Form1
    Dim Gambar As Bitmap
    Private Sub BinerToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BinerToolStripMenuItem.Click
        Dim Pb, Pc As Integer
        Dim rata, vM, vH, vB As Double
        With gambar
            For Pb = 0 To .Height - 1
                For Pc = 0 To .Width - 1
                    vM = .GetPixel(Pc, Pb).R
                    vH = .GetPixel(Pc, Pb).G
                    vB = .GetPixel(Pc, Pb).B
                    rata = (vM + vH + vB) / 3
                    If (rata < 128) Then
                        vH = 0
                        vM = 0
                        vB = 0
                    Else
                        vM = 255
                        vH = 255
                        vB = 255
                    End If
                    .SetPixel(Pc, Pb, Color.FromArgb(vM, vH, vB))
                Next
                Pic1.Image = gambar
                Pic2.Refresh()
            Next
        End With
    End Sub

    Private Sub MenuStrip1_ItemClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolStripItemClickedEventArgs) Handles MenuStrip1.ItemClicked
        Gambar = New Bitmap(Pic1.Image)
    End Sub

    Private Sub NegativeImageToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NegativeImageToolStripMenuItem.Click
        Dim Pb, Pc As Integer

CURhat Q Kadang hidup ini terlalu sulit untuk dijalani, Apalagi banyak yang harus di hadapi.. maslah keuangan la, keluarga lah, percintaan,, yng ini-itu. Puyeng mikirin nya, lama2 jadi sterzz juga. masih muda uda jadi Profesor. Aduhhhhhhh Tapi Q berterima kasih ya allh, enggkaw sudah melahirkan Q di keluarga yng sederhana. Walau pun itu dalam kekurangn mau pun kelebihan. Terima kasih juga ya raBBi,Q telah dilahirkan seorang ibu Yang cantik, yang mengajari Q untuk hidup yng begitu sederhana tanpa harus mengeluh meminta yang lebih. Walaupun Ibu Q mengajari q dengan kekerasan, tapi Q tau itu demi kebaikan Q dan untuk kehidupan nanti nya... Terimakasih juga ya Allah karna Q telah memliki Ayah yang Begitu ganteng tiada dua nya.. Wlau pun sekrang tubuh nya mulai melemah,dia lah Ayah yng paling paling Q Sayangi di seluruh dunia. Ayah yang beri Q semangat begitu juga ibu yang sellu beri Q nasehat. Hanya satu pinta Q, Jagalah Kedua Orang Tua ya Robbi, Karn hany mereka lah tempat Q mengad nasib. Terimakasih ya Allah

                 Kebiasaan Pacaran yang Dulu serius Banget Sekarang Jadi Biasa Aja Hubungan antara dua orang itu nggak terjadi gitu-gitu aja.Bangun tidur, tau-tau kamupunya pacar. Nggak, bro. Hidupnggak seenak itu. Segalasesuatu itu harus ada prosesdan langkah-langkahnya. Begitujuga pacaran. Ada step-stepnya.Kenalan, pdkt, nembak, jadian,lamaran, nikah dst. Kalo kebiasaan-kebiasaan orangpacaran gimana? Jaman dulusama jaman sekarang beda standar. Apa aja kira-kira? Monggo dibaca!
1. Ngajak ke RumahJaman sekarang,
 ngajak pacar kerumah itu bukan suatu hal yangluar biasa. Tetep deg-degan sih.Gimana ntar kalo ketemu ibusama bapaknya. Harus bersikapgimana? Cium tangan apa ciumjidat? Panik sendiri. Itu wajar.Tapi nggak lantas bikinparno,“Waduh, abis ini pasti guadiajak kawin, nih! Gawat!”.Nggak gitu juga kali. Biasa aja.Tapi, lain cerita kalo kita tinggaldi jaman dulu. Jaman alattransportasi masih andong. Kaloudah diajak ke rumah, itutandanya pacar kamu seriusbanget. Saking seriusnya, bisaaja dia ngelamar kamu besokanharinya, kalo emangkeluarganya setuju. Nah, lho!

Public Class Form1
    Private SubForm1_Load(ByVal sender AsSystem.Object, ByVal e AsSystem.EventArgs) HandlesMyBase.Load
        buatTabel()
        nik.Items.Add("001")
        nik.Items.Add("002")
        nik.Items.Add("003")
       jabatan.Items.Add("Mandor")

       jabatan.Items.Add("Kepala Bagian")
       jabatan.Items.Add("Staf")
       status.Items.Add("Menikah")
       status.Items.Add("Tidak Menikah")
    End Sub

    Private Subjabatan_SelectedIndexChanged(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles jabatan.SelectedIndexChanged
        Select Case jabatan.Text
            Case "Mandor" : gaji.Text = 1750000
            Case "Kepala Bagian" : gaji.Text = 2500000
            Case "Staf" : gaji.Text = 1250000
        End Select
        pajak.Text = 0.15 * gaji.Text
    End Sub

TANDA-TANDA KEMATIAN


     Sesungguhnya tanda-tanda kematian menurut Ulama’ adalah benar dan wujud. Cuma amalan dan ketakwaaan kita saja yang akan membezakan kepekaan kita kepada tanda-tanda ini. Rasullullah saw diriwayatkan masih mampu memperlihat dan menceritakan kepada keluarga dan sahabat secara langsung kesukaran menghadapi sakaratul maut dari awal hinggalah akhir hayat baginda.


     Imam Al-Ghazali diriwayatkan memperolehi tanda-tanda ini sehinggakan beliau mampu menyediakan dirinya untuk menghadapi sakaratul maut secara bersendirian. Beliau menyediakan dirinya dengan segala persiapan termasuk mandinya, wuduknya serta kafannya sekali. Cuma sampai bahagian tubuh dan kepalanya sahaja, beliau telah memanggil abangnya iaitu Imam Ahmad Ibnu Hambal untuk menyambung tugas tersebut. Beliau wafat ketika Imam Ahmad bersedia untuk mengkafankan bahagian mukanya.


     Adapun riwayat-riwayat ini memperlihatkan kepada kita sesungguhnya Allah swt tidak pernah berlaku zalim kepada hambanya. Tanda-tanda yang diberikan adalah untuk menjadi kita supaya bertaubat dan bersedia dalam perjalanan menghadap Allah swt. Walau bagaimanapun, semua tanda-tanda ini akan berlaku kepada orang Islam sahaja manakala orang kafir iaitu orang yang menyekutukan Allah, nyawa mereka akan terus direntap tanda sebarang peringatan sesuai dengan kekufuran mereka kepada Allah swt.


Antara tanda-tanda ini terbahagi kepada beberapa bahagian;


     Tanda 100 hari sebelum hari mati
Ini adalah tanda pertama dari Allah swt kepada hambanya dan hanya akan disedari oleh mereka yang dikehendakiNya. Walaubagaimanapun semua orang Islam akan mendapat tanda ini. Cuma sama ada mereka sedar atau tidak sahaja. Tanda ini berlaku lazimnya selepas waktu Asar.



      Seluruh tubuh iaitu dari hujung rambut ke hujung kaki akan mengalami getaran seakan-akan menggigil. Contohnya seperti daging lembu yang baru disembelih di mana jika perhatikan dengan teliti kita akan mendapati daging tersebut seakan-akan bergetar. Tanda ini rasanya lazat dan bagi mereka yang sedar, akan bertindak di hati bahawa mungkin ini adalah tanda mati, maka getaran ini akan hilang setelah kita sedar akan kehadiran tanda ini. Bagi mereka yang tidak diberi kesedaran atau hanyut dengan kenikmatan dunia tanpa memikirkan soal kematian, tanda ini akan lenyap begitu sahaja tanpa sebarang manfaat. Bagi yang sedar akan kehadiran tanda ini maka ini adalah peluang terbaik untuk memanfaatkan masa yang ada mempersiapkan diri dengan amalan dan urusan yang akan dibawa atau ditinggalkan sesudah mati.


Tanda 40 hari sebelum hari mati
   
     Tanda ini juga akan berlaku sesudah Asar. Bahkan pusat kita akan berdenyut-denyut. Pada ketika ini daun yang tertulis nama kita akan gugur dari pokok yang letaknya di atas Arasy Allah swt. Maka malaikat maut akan mengambil daun tersebut dan mula membuat persediaannya ke atas kita ,antaranya ia akan mula mengikuti kita sepanjang masa. Akan tetapi malaikat maut ini akan memperlihatkan wajahnya sekilas lalu dan jika ini terjadi, mereka yang terpilih akan merasakan seakan-akan bingung seketika. Adapun malaikat maut ini wujudnya cuma seorang tetapi kuasanya untuk mencabut nyawa adalah bersamaan dengan jumlah nyawa yang akan dicabutnya.


Tanda 7 hari

     Tanda ini akan diberikan hanya kepada mereka yang diuji dengan musibah kesakitan di mana orang sakit yang tidak makan secara tiba-tiba ianya berselera utnuk makan.

MAMFAAT BUAH PISANG

 Manfaat buah pisang untuk kesehatan tubuh :
: Setelah sebelumnya telah diulas sedikit tentang kandungan gizi buah pisang, artikel kali ini akan mengulas sedikit tentang manfaat apa saja yang akan kita dapatkan dengan mengkonsumsi buah pisang secara rutin dan teratur.

1. Dapat meningkatkan konsentrasi.
Kandungan kalsium yang terdapat dalam buah pisang dapat membantu meningkatkan konsentrasi, sehingga buah pisang sangat baik untuk dikonsumsi oleh anda yg sedang bermasalah dengan konsentrasi.

2.Baik dikonsumsi oleh ibu hamil
Asam folat yang terkandung dalam buah pisang, bersifat mudah diserap oleh janin melalui rahim. Oleh karena itu mengkonsumsi buah pisang dianjurkan untuk ibu hamil, Tapi tentunya sesuai dengan kebutuhan tubuh dan janin.