PROGRAM SEDERHANA RENTAL P

            Langkah – langkah pembuatannya:

a.       Setelah computer ternyalakan lalu klik Start, all program, Microsot Visual Studio 2010

 

b.      Setelah muncul kotak dialog seperti di atas lalu klik file, New Project

c.       Setelah muncul kotak dialog New Project, kemudian klik visual basic, pilih Windows Froms Application, lalu klik OK

 

d.      Setelah itu muncul kotak From

e.       Kemudian pilih Tool Boxes, Label 3x untuk membuat tiga label

f.       Ganti nama Pada label 1 konsumen, label 2 waktu, label 3 bayar

g.      Kemudian pilih Tool Boxes, text boxs 3x untuk membuat tiga text boxes.

Lalu ganti nama text boxes 1 dengan txtNama, text boxes 2 dengan txtJam, text boxes 3 dengan txtBiaya.

h.      Kemudian pilih Tool Boxes, button 3x untuk membuat tiga text boxes.

Lalu ganti text button 1 dengan hitung dan nama bthitung, text button 2 dengan brsihkan dan nama btbersihkan, text button 3 dengan keluar dan nama btkeluar pada properties

i.        Untuk  button hitung, bersihkan, dan keluar ketikan codingnya sebagai berikut

Public Class Form1

    Private Sub btHitung_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btHitung.Click

        Me.txtBiaya.Text = Val(txtJam.Text) * 3000

    End Sub

    Private Sub btClear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btClear.Click

        Me.txtNama.Clear()

        Me.txtJam.Clear()

        Me.txtBiaya.Clear()

    End Sub

    Private Sub btClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btClose.Click

        Dispose()

    End Sub

    Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click

    End Sub

End Class

j.        Hasil akhir

Contoh pengisian:

1.      Konsumen isikan dengan nama budi

2.      Waktu penggunaan tiga jam

3.      Bayar di peroleh dari hitung, hitung merupakan proses penghitungan

4.      Untuk menghapus data, klik Bersihkan

5.      Sedangkan jika penggunaan program selesai maka klik keluar  untuk mengakhiri program.