Sabtu, 06 Oktober 2012

Latihan_24B_36110056

Deskripsi Latihan 24B:
Form Latihan 24B terdapat tiga object yaitu Data Grid View, Label, dan TextBox

Object  Data Grid View
Terdapat satu object DataGridView digunakan untuk menampilkan semua field atau kolom yang terdapat dalam data D:\Apkom 4\LATIHAN 15-26 MENGAKSES DATA\datatransaksijualbeli

 Object  Label
Tedapat lima object label yang di beri nama Detail Transaksi, kode barang, nama barang, harga barang, dan jumlah barang


Object  TextBox

Terdapat empat textbox status input digunakan untuk memasukkan nilai
Atau text Nomor dan Jenis.
 
Script Unique
 Dapat dilihat pada langkah -langkah penyelesaian latihan 24B

Even
FromLoad
Property
Default


                             Form Latihan 24B


Langkah-langkah penyelesaian latihan 24B :
  • Buka project yang dibuat sebelumnya
  • Pilih Add new item

  • Setelah terbuka jendela Add new item, pilih windows form  serta anda dapat mengganti nama form, dan setelah itu pilih add


  • Buat form sesuai soal di atas dengan menggunakan Data Grid View,Label, dan Textbox  yang terdapat dalam toolsbox
  • Setelah form selesai, ubah nama DataGridView dan Textbox yang terdapat dalam properties window  
  • Selanjutnya masukkan formula atau rumus untuk menjalan form  :
 Public Class latihan24b_36110056
    Dim ras As New DataTable
    Dim jembatan As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= D:\Apkom 4\LATIHAN 15-26 MENGAKSES DATA\datatransaksijualbeli.accdb")

    Public Sub dut(ByVal A As String)
        Dim con As New OleDb.OleDbDataAdapter
        con = New OleDb.OleDbDataAdapter("select id, notrans, unit, harga from DETAILTRANSAKSI where KODEBARANG ='" & A & "'", jembatan)
        ras.Rows.Clear()
        con.Fill(ras)
        con.Dispose()
        dgvb_36110056.DataSource = ras


    End Sub

 
End Class



  • Selanjutnya jika ingin menjalankannya pilih Start de bungging 
 




Tidak ada komentar:

Posting Komentar