Latihan_23B_46110020

Deskripsi Form Latihan 23B

Form latihan 23B terdapat 3 Object yaitu Label, TextBox, dan DataGriedView .

Object DataGridView

Dalam 23B terdapat 1 Datagriedview yang berfungsi menampilkan hasil analisa secara Deatail dari transaksi SQL yang berada pada form 23A.

Object Label :

Dalam Form 23B terdapat Empat item Label yang bertuliskan (Detail Transaksi, Nomor, Tanggal, dan Jenis).

Object TextBox :

Dalam form 23B ini terdapat Tiga item yang berguna untuk menampilkan data dari SQL yang berada pada form 23A.

Cara Untuk Membuat Form Latihan 23B:

1.        Pertama Bukalah Project yang telah anda buat sebelumnya.

2.      Pilih dan  Buka Project dalam visual basic.

 

3.        Kemudian pilih Add Windows form

 

4.        Lalu add new item dan rename file “form.vb menjadi Latihan_23B_46110020”

 

5.        Setelah namenya di rename pilih add lalu muncullah form seperti ini :

 

6.        Kemudian mulailah membuat form 23B dengan mengunakan Label, DataGriedView, dan TextBox.

 

4.        Lalu buatlah sesuai contoh latihan 23B dengan menggunakan Label, DataGrieView, dan TextBox  maka akan menjadi seperti ini :

 

8.        Setelah form di atas telah jadi maka klik kanan lalu pilih View Code,kemudian masukkan rumus seperti berikut :

Public Class Latihan_23B_46110020

    Dim koneksi As New OleDb.OleDbConnection("provider=microsoft.ACE.oledb.12.0;data source=D:\Tugas\Semester 5\Aplikasi Kom 4\apkom 4\LATIHAN 15-26 MENGAKSES DATA\datatransaksijualbeli.accdb")

    Dim tabel As New DataTable

    Public Sub YUNI(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)

        DGV1_46110020.DataSource = tabel

    End Sub

    Private Sub Latihan_23B_46110020_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

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

    End Sub

End Class

Langkah – Langkah Menjalankan Latihan 23B:

1.        Bukalah atau jalankanlah terlebih dahulu latihan 23A arahkan kursor anda pada Notrans yang anda inginkan seperti “ TR001” dan anda menekan tombol Klik, Maka akan muncul Deteail Transaksi Dari Notrans TR001.Hasilnya Seperti Berikut :

1.        Selamat Mencoba J

Script unik

Untuk membuat Connection  :

Dim koneksi As New OleDb.OleDbConnection("provider=microsoft.ACE.oledb.12.0;data source=D:\Tugas\Semester 5\Aplikasi Kom 4\apkom 4\LATIHAN 15-26 MENGAKSES DATA\datatransaksijualbeli.accdb")

Untuk membuat datatable :

Dim tabel As New DataTable

Untuk membersikan datatable  :

tabel.Rows.Clear()

Untuk membuat DataAdapter :

Dim adapter As New OleDb.OleDbDataAdapter

Untuk mengisi data base kedalam datatable :

adapter.Fill(tabel)

adapter.Dispose()

Even

Load

CellContentClick