Copyright © APKOM 4 3AD4
Design by Dzignine
Sabtu, 03 November 2012

Latihan_383940_46110002


Deskripsi Form Latihan 383940
Pada form latihan 383940 hanya ada satu object yaitu Data Grid View.

Object DataGridView
Terdapat 1 object datagridview yang berfungsi untuk menampilkan data tabel “Data Majemuk”.

Even
Load

Script Unique
Lebih lengkap dan jelasnya silahkan dilihat pada script di bawah.

Langkah-Langkah Penyelesaian Form Latihan_383940
·  Buka project yang telah dibuat sebelumnya.
·  Click project kemudian pilih add windows form, seperti pada gambar dibawah ini

·  Ketik nama form "Latihan_383940_46110007" pada name kemudian click add

·  Buat form seperti berikut 


·         Kemudian beri nama pada datagridview.
·         Setelah itu beri teks pada button.
  Setelah form selesai masukkan rumus seperti dibawah ini 

Public Class Latihan_383940_46110002
    Dim ILDA As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source =" & Application.StartupPath & "\Datamajemuk.ACCDB")
    Dim YANI As New DataTable
    Public Sub BATU()
        'mendeklarasikan kendaraan
        Dim YUYU As New OleDb.OleDbDataAdapter

        'Mengatur data yang akan di angkut
        YUYU = New OleDb.OleDbDataAdapter("SELECT* FROM BARANG", ILDA)
        YANI.Rows.Clear()

        'untuk memasukkan data yg telah di angkut ke dalam datatable
        YUYU.Fill(YANI)
        YUYU.Dispose()

    End Sub

    Private Sub Latihan_383940_46110002_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        BATU()
        DGV_46110002.DataSource = YANI
    End Sub
End Class

 

0 komentar:

Posting Komentar