Suatu hari sang guru bertanya kepada murid-muridnya, "Mengapa ketika seseorang sedang dalam keadaan marah, ia akan berbicara dengan suara kuat atau berteriak?"

Seorang murid setelah berpikir cukup lama mengangkat tangan dan menjawab, "Karena saat seperti itu ia telah kehilangan kesabaran, karena itu ia lalu berteriak."

"Tapi..." sang guru balik bertanya, "lawan bicaranya justru berada disampingnya. Mengapa harus berteriak? Apakah ia tak dapat berbicara secara halus?"

Hampir semua murid memberikan sejumlah alasan yang dikira benar menurut pertimbangan mereka. Namun tak satupun jawaban yang memuaskan.
Sang guru lalu berkata, "Ketika dua orang sedang berada dalam situasi kemarahan, jarak antara kedua hati mereka menjadi amat jauh walau secara fisik mereka begitu dekat. Karena itu, untuk mencapai jarak yang demikian, mereka harus berteriak. Namun anehnya, semakin keras mereka berteriak, semakin pula mereka menjadi marah dan dengan sendirinya jarak hati yang ada di antara keduanya pun menjadi lebih jauh lagi. Karena itu mereka terpaksa berteriak lebih keras lagi."

Sang guru masih melanjutkan, "Sebaliknya, apa yang terjadi ketika dua orang saling jatuh cinta? Mereka tak hanya tidak berteriak, namun ketika mereka berbicara suara yang keluar dari mulut mereka begitu halus dan kecil. Sehalus apapun, keduanya bisa mendengarkannya dengan begitu jelas. Mengapa demikian?" Sang guru bertanya sambil memperhatikan para muridnya.

Mereka nampak berpikir amat dalam namun tak satupun berani memberikan jawaban."Karena hati mereka begitu dekat, hati mereka tak berjarak. Pada akhirnya sepatah katapun tak perlu diucapkan. Sebuah pandangan mata saja amatlah cukup membuat mereka memahami apa yang ingin mereka sampaikan."

Sang guru masih melanjutkan, "Ketika kita sedang dilanda kemarahan, janganlah hati kita menciptakan jarak. Lebih lagi hendaknya kita tidak mengucapkan kata yang mendatangkan jarak di antara kita. Mungkin di saat seperti itu, tak mengucapkan kata-kata mungkin merupakan cara yang bijaksana. Karena waktu akan membantu kita."

Cara Menghitung Gaji Karyawan dengan List View

Gbr: Tampilan Desain Awal

Public Class Form1
    Sub buattabel()
        LV.GridLines = True
        LV.View = View.Details
        LV.FullRowSelect = True
        LV.Columns.Add("NIK", 50, HorizontalAlignment.Center)
        LV.Columns.Add("Nama", 150, HorizontalAlignment.Left)
        LV.Columns.Add("Jabatan", 85, HorizontalAlignment.Center)
        LV.Columns.Add("Gaji", 85, HorizontalAlignment.Center)
        LV.Columns.Add("Status", 85, HorizontalAlignment.Center)
        LV.Columns.Add("Tunj.Keluarga", 85, HorizontalAlignment.Left)
        LV.Columns.Add("Pajak", 85, HorizontalAlignment.Center)
        LV.Columns.Add("Total Gaji", 85, HorizontalAlignment.Center)
    End Sub

    Private Sub cmdSimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdSimpan.Click
        Dim lst As New ListViewItem
        lst.Text = NIK.Text
        lst.SubItems.Add(nama.Text)
        lst.SubItems.Add(jabatan.Text)
        lst.SubItems.Add(gaji.Text)
        lst.SubItems.Add(status.Text)
        lst.SubItems.Add(tunj_Kel.Text)
        lst.SubItems.Add(pajak.Text)
        lst.SubItems.Add(total.Text)
        LV.Items.Add(lst)
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Call buattabel()
        Call items()
    End Sub
    Sub items()
        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 Sub NIK_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NIK.SelectedIndexChanged
        Select Case NIK.Text
            Case "001" : nama.Text = "Oncom"
            Case "002" : nama.Text = "Udin"
            Case "003" : nama.Text = "Ujang"
        End Select
    End Sub

    Private Sub status_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles status.SelectedIndexChanged
        Select Case status.Text
            Case "Menikah" : tunj_Kel.Text = 0.15 * gaji.Text
            Case "Tidak Menikah" : tunj_Kel.Text = 0
        End Select
    End Sub

    Private Sub jabatan_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.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

    Private Sub cmdProses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdProses.Click
        total.Text = Val(gaji.Text) + Val(tunj_Kel.Text) - Val(pajak.Text)
    End Sub

    Private Sub cmdHapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdHapus.Click
        LV.Items.Remove(LV.SelectedItems(0))
    End Sub

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

    Private Sub cmdBaru_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdBaru.Click
        Call bersih()
    End Sub
    Sub bersih()
        NIK.Text = ""
        nama.Text = ""
        jabatan.Text = ""
        gaji.Text = ""
        status.Text = ""
        tunj_Kel.Text = ""
        pajak.Text = ""
        total.Text = ""
    End Sub
End Class

Gbr: Tampilan Desain Akhir

Orang muda harus jatuh cinta 
sejatuh-jatuhnya, 
patah hati sepatah-patahnya,
tertawa, marah, sedih, rajin, 
dan malas se-crazy-crazy-nya,

tetapi,

engkau harus segera bangkit, 
mendewasa, berdiri gagah,
dengan bekas-bekas luka yang indah 
di wajah dan dadamu,
dan dengan anggun dan berwibawa, 
katakanlah

Dengan kewenangan 
yang diberikan oleh Tuhan kepadaku,
dengarlah ini ...

AKULAH PENENTU KEBESARAN HIDUPKU SENDIRI

pemograman web

1. Bahasa Pemrograman HTML
HyperText Markup Language (HTML) adalah sebuah bahasa markup yang digunakan untuk membuat sebuah halaman web dan menampilkan berbagai informasi di dalam sebuah browser Internet.
HTML saat ini merupakan standar Internet yang didefinisikan dan dikendalikan penggunaannya oleh World Wide Web Consortium (W3C).
HTML berupa kode-kode tag yang menginstruksikan browser untuk menghasilkan tampilan sesuai dengan yang diinginkan.
Sebuah file yang merupakan file HTML dapat dibuka dengan menggunakan browser web seperti Mozilla Firefox atau Microsoft Internet Explorer.

2. Bahasa Pemrograman PHP
PHP adalah bahasa pemrograman script yang paling banyak dipakai saat ini.
PHP pertama kali dibuat oleh Rasmus Lerdorf pada tahun 1995. Pada waktu itu PHP masih bernama FI (Form Interpreted), yang wujudnya berupa sekumpulan script yang digunakan untuk mengolah data form dari web.
PHP banyak dipakai untuk membuat situs web yang dinamis, walaupun tidak tertutup kemungkinan digunakan untuk pemakaian lain.
PHP biasanya berjalan pada sistem operasi linux (PHP juga bisa dijalankan dengan hosting windows).

3. Bahasa Pemrograman ASP
ASP adalah singkatan dari Active Server Pages yang merupakan salah satu bahasa pemograman web untuk menciptakan halaman web yang dinamis.
ASP merupakan salah satu produk teknologi yang disediakan oleh Microsoft.
ASP bekerja pada web server dan merupakan server side scripting.

4. Bahasa Pemrograman XML
Extensible Markup Language (XML) adalah bahasa markup serbaguna yang direkomendasikan W3C untuk mendeskripsikan berbagai macam data.
XML menggunakan markup tags seperti halnya HTML namun penggunaannya tidak terbatas pada tampilan halaman web saja.
XML merupakan suatu metode dalam membuat penanda/markup pada sebuah dokumen.

5. Bahasa Pemrograman WML
WML adalah kepanjangan dari Wireless Markup Language, yaitu bahasa pemrograman yang digunakan dalam aplikasi berbasis XML (eXtensible Markup Langauge).
WML ini adalah bahasa pemrograman yang digunakan dalam aplikasi wireless.
WML merupakan analogi dari HTML yang berjalan pada protocol nirkabel.

6. Bahasa Pemrograman PERL
Perl adalah bahasa pemrograman untuk mesin dengan sistem operasi Unix (SunOS, Linux, BSD, HP-UX), juga tersedia untuk sistem operasi seperti DOS, Windows, PowerPC, BeOS, VMS, EBCDIC, dan PocketPC.
PERL merupakan bahasa pemograman yang mirip bahasa pemograman C.

7. Bahasa Pemrograman CFM
Cfm dibuat menggunakan tag ColdFusion dengan software Adobe ColdFusion / BlueDragon / Coldfusion Studio.
Syntax coldfusion berbasis html.

8. Bahasa Pemrograman Javascript
Javascript adalah bahasa scripting yang handal yang berjalan pada sisi client.
JavaScript merupakan sebuah bahasa scripting yang dikembangkan oleh Netscape.
Untuk menjalankan script yang ditulis dengan JavaScript kita membutuhkan JavaScript-enabled browser yaitu browser yang mampu menjalankan JavaScript.

9. Bahasa Pemrograman CSS
Cascading Style Sheets (CSS) adalah suatu bahasa stylesheet yang digunakan untuk mengatur tampilan suatu dokumen yang ditulis dalam bahasa markup.
Penggunaan yang paling umum dari CSS adalah untuk memformat halaman web yang ditulis dengan HTML dan XHTML.
Walaupun demikian, bahasanya sendiri dapat dipergunakan untuk semua jenis dokumen XML termasuk SVG dan XUL

Goresan Kehidupan: WELCOME TO MY BLOGGER

https://www.facebook.com/farick.lase?ref=tn_tnmn      

welcom https://www.facebook.com/farick.lase?ref=tn_tnmn

Welcome To http://faozibmw.blogspot.com/