Sabtu, 06 Oktober 2012

latihan_23b_46110023



Deskripsi Form Latihan 23A

Dalam form Latihan 23B hanya terdapat 4object yaitu: Object Label, Object TextBox, Object DataGridView, dan Object DateTimePicker.

Object Label
Terdapat
4 label yaitu "Detail Transaksi", "No. Transaksi", "Tanggal Transaksi", dan "Jenis Transaksi".

Object TextBox
Terdapat 2 obejct textbox yang digunakan untuk menampilkan nomor dan jenis transaksi dari master transaksi yang dipilih pada form Latihan_23A_461100
23.

Object DataGridView
Terdapat 1 object datagridview yang digunakan untuk menampilkan detail transaksi dari form Latihan_23A_46110023.

Object DateTimePicker

Terdapat satu object datetimepicker yang digunakan untuk menampilkan tanggal transaksi dari master transaksi yang dipilih pada form Latihan_23A_461100
23.

Langkah-langkah membuat dan menjalankan form latihan 23b
 Langkah-langkah atau cara membuat form pada latihan 23A ini sama saja dengan langkah-langkah membuat  form pada latihan-latihan sebelumnya,. Yang membedakan hanyalah desaign formnya dan scriptnya. Pada form ini bentuk formnya seperti berikut:
 
Setelah desaignnya jadi, klik kanan pada desaidn kemudian pilih view code maka akan muncul halaman baru lalu masukkan script seperti dibawah ini:
Public Class LATIHAN_23B_46110023
Dim koneksi As New OleDb.OleDbConnection("provider=microsoft.ACE.oledb.12.0;data source=" & Application.StartupPath & "\datatransaksijualbeli.accdb")
      Dim tabel As New DataTable

      Public Sub uly(ByVal A As String)
      Dim adapter As New OleDb.OleDbDataAdapter
adapter = New OleDb.OleDbDataAdapter("select*from detailtransaksi where notrans='" & A & "'", koneksi)
        tabel.Rows.Clear()
        adapter.Fill(tabel)

        DGV_46110023.DataSource = tabel

    End Sub

Private Sub latihan_23B_46110023_Load(ByVal sender As System.Object,   ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

Private Sub DGV_46110023_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DGV_46110023.CellContentClick

       End Sub
End Class   
   
Setelah selesai jalankan latihan 23B dengan mengklik start debugging. Latihan ini kan bersamaan dengan latihan 23A.
Script Unique

Tidak ada script unik pada latihan ini, karena perintah scriptnya sudah ada pada latihan sebelumnya.

Even
Load

Tidak ada komentar:

Posting Komentar