Pemrograman Dekstop : Cara Membuat DataGridView Popup and DropDown pada VB Net - TutorialZR
Trending
Kamis, 23 Maret 2017

Pemrograman Dekstop : Cara Membuat DataGridView Popup and DropDown pada VB Net

Hallo gays, kali ini saya akan memberikan tutorial bagaimana Cara Membuat DataGridView Popup and DropDown pada VB Net, langsung saja yah gays kita simak di bawah ini!

Berikut langkah-langkah :

1. Membuat database dahulu, disini saya menggunakan database ms. access, Klik Disini Cara Membuat Database Menggunakan MS. Access pada VB Net

2. Jangan lupa taruh file database seperti gambar dibawah ini
Cara Membuat DataGridView Popup and DropDown pada VB Net

3. Setelah membuat database, buka software VB Net, disini saya menggunakan VB Net 2010 Express

4. lalu buat form seperti ini
Cara Membuat DataGridView Popup and DropDown pada VB Net

5. Setelah itu kita buat koneksi database, Klik Disini Cara Koneksi Database Menggunakan MS. Access pada VB Net

6. Setelah membuat koneksi database, klik 2x pada Form
Masukkan Source Code, seperti di bawah ini:

Imports System.Data
Imports System.Data.OleDb
Public Class Form1
    Sub Data_Record()
        Try
            Call koneksi()
            Tabel = New Data.OleDb.OleDbDataAdapter("Select * from Table1", Database)
            Data = New DataSet
            Tabel.Fill(Data)
            Record.DataSource = Data
            Record.DataMember = Data.Tables(0).ToString()
            DataGridView1.DataSource = Record
            DataGridView1.Columns(0).Width = 100
            DataGridView1.Columns(1).Width = 100
            DataGridView1.Columns(2).Width = 100
            DataGridView1.Columns(3).Width = 100
        Catch ex As Exception
            MsgBox(ex.ToString())
        End Try
    End Sub
    Private Sub btnShow_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnShow.Click
        pnPopup.Location = New Point(txtitem.Right, txtitem.Top + txtitem.Height)
        If pnPopup.Visible Then
            pnPopup.Visible = False
            btnShow.Text = "Show"
        Else
            pnPopup.Visible = True
            btnShow.Text = "Hide"
        End If
    End Sub
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        pnPopup.Visible = False
        Call koneksi()
        Call Data_Record()
    End Sub
    Private Sub DataGridView1_CellClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellClick
        If DataGridView1.RowCount > 0 Then
            Dim baris As Integer
            With DataGridView1
                baris = .CurrentRow.Index
                txtitem.Text = .Item(0, baris).Value
                txtitem.Enabled = True
                txtitem.Focus()
            End With
        End If
    End Sub
    Private Sub DataGridView1_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellContentClick
    End Sub
End Class

Penjelasan :
Call koneksi() = Untuk memanggil koneksi.
Table1 =  Nama tabel yang ada di dalam database.
DataGridView1 = Tabel menampilkan data.
txtitem = Nama Textbox.
btnshow = Nama CommanButton.
pnPopup = Nama panel.

7. Lalu  jalankan programnya, sehingga seperti gambar di bawah ini
Cara Membuat DataGridView Popup and DropDown pada VB Net

*Jika ada pertanyaan silahkan sampaikan melalui form komentar, dan jika suka dengan artikel ini silahkan dengan klik like, share, atau join fans page untuk mengetahui artikel lainnya. 

Demikianlah "Cara Membuat DataGridView Popup and DropDown pada VB Net". Selamat mencoba dan salam sukses. [TutorialZR] 

Pemrograman Dekstop : Cara Membuat DataGridView Popup and DropDown pada VB Net Reviewed by Unknown on Maret 23, 2017 Rating: 5 Hallo gays,  kali ini saya akan memberikan tutorial bagaimana  Cara Membuat DataGridView Popup and DropDown pada VB Net , langsung saja yah...

4 komentar:

  1. wah mantap. cukup muddah dipraktekan..

    visit back

    BalasHapus
    Balasan
    1. salam sukses gan :D thanks sudah berkunjung :)

      Hapus
  2. tutornya lengkap dan komplit serta mudah dipahami sukses selalu mas buat webnya

    BalasHapus