Latihan_37_46110041

Latihan_37_46110041

A.- Deskripsi

Pada latihan ini terdapat 5 object, yaitu :

11.    Object Label

Pada latihan ini terdapat 9 object label yang berisi teks “No.Transaksi, Tanggal, Jenis Transaksi, Kode Barang, Nama Barang, Unit, Harga, Jumlah, dan Total.”

22.    Object Textbox

Pada latihan ini terdapat 7 textbox yang berstatus input dan 1 textbox yang berstatus Readonly “True”.

33.    Object Button

Pada latihan ini terdapat 2 object Button, yaitu Button 1 yang berisi teks “Simpan” berfungsi untuk menyimpan data setelah menginput data yang diinginkan di dalam textbox dan Button 2 yang berisi teks “Tambah” berfungsi untuk menambahkan data.

44.    Object Datetimepicker

Pada Latihan ini terdapat 1 object Datetimepicker.

55.    Object DataGridview

Pada latihan ini terdapat 1 object datagridview yang digunakan untuk menyimpan dan menampilkan hasil data yang telah diinput dalam textbox yang berstatus input.

-       Script Uniqe

·         *   Mencari data yang ada di tabel

      Dim Pencari As New ByIskandar.CariKeDataBaseByIskandar

      Pencari.AturPencarianDataBase("barang", "kodebarang", KB46110041.Text, 1,Jalan)

      If Pencari.JumlanBaris > 0 Then

      NB46110041.Text = Pencari.DataTablenya.Rows(0).Item(1)

                        Else

        MsgBox("the data is not exist")

        KB46110041.Text = ""

        NB46110041.Text = ""

                        Exit Sub

                        End

-    -Even

     Click

      Load

    - Property

     Property TextBoxèReadOnlyèTrue

B.  Prosedur Latihan_37_46110041

 1. Buka project yang telah dipilih.

 2. Pilih Add New Item pada Microsoft Visual Studio 2005/ 2008

 3. Setelah add new item terbuka, pilih windows form, lalu ketik nama form   yang telah ditentukan dan add.

 4. Kemudian isi form sesuai yang telah diinginkan/diperintahkan

 5. Setelah selesai membuat form, selanjutnya klik kanan, pilih View  Code

 6. View Code akan muncul, lalu buatlah rumus sesuai permintaan soal

          7. Selanjutnya kita menjalankan rumus yang telah dibuat dengan mengklik Start  Debug

          8. Setelah itu akan muncul Navigator pilih Latihan_37_46110041

          9. Isi textbox yang akan diinput

10.Setelah menginput pilih button yang berisi teks “Tambah”, maka data hasil input akan muncul di datagridview. Setelah itu pilih button yang berisi teks “Simpan” maka secara otomatis data yang sudah diinput akan tersimpan.