Artikel ini masih berkaitan dengan DataGridView, kenapa banyak sekali artikel/tips penulis seputar DatGridView??? Karena Component ini sangat sering digunakan oleh para developer, jadi harus terus di gali fungsi-fungsi nya. Langsung masuk aja ke pembahasan, sesuai dengan judul nya menambahkan control DropDownList pada DataGridView. Untuk .Net Framework 2.0 keatas, cara ini tidak sesulit atau serumit pada versi di bawah nya..
Di asumsikan kita sudah memiliki Database dengan nama Table "T_Titles", dan salah satu field nya adalah "Authors".�
Note : Untuk cara koneksi ke Database di asumsikan sudah bisa, jika belum silahkan liat artikel penulis yang pertama.
Berikut sintaks nya.. (ketik sintaks ini pada��Private Sub F_DataGrid_Load)
�� � � 'Start Menampilkan data pada Datagrid View
�� � � �Dim cmd As OleDbCommand = New OleDbCommand("Select * from T_Titles", � � � � � myconnection.open)
�� � � �cmd.CommandType = CommandType.Text
�� � � �Dim adapter As OleDbDataAdapter = New OleDbDataAdapter(cmd)
�� � � �Dim datatbl As DataTable = New DataTable
�� � � �Dim ds As DataSet = New DataSet()
�� � � �' Mengambil info column (Read-only).
�� � � �adapter.FillSchema(ds, SchemaType.Mapped, "Titles")
�� � � �' Isi table
�� � � �adapter.Fill(ds, "Titles")
�� � � �datatbl = ds.Tables("Titles")
�� � � �myconnection.close()
�� � � �DataGridView1.DataSource = datatbl
�� � � �'Finish Menampilkan data pada Datagrid View
�� � � �'Menghapus auto generate Authors Colomn
�� � � �DataGridView1.Columns.Remove("Authors")
�� � � 'Membuat List columns untuk Authors field
�� � � �Dim listCol As DataGridViewComboBoxColumn = New DataGridViewComboBoxColumn()
�� � � �'Posisi column nomor 2
�� � � �listCol.DisplayIndex = 1
�� � � �'Nama Header= "Authors"
�� � � �listCol.HeaderText = "Authors"
�� � � �'Masukkan nama field pada table yang akan di buat listcolom
�� � � �listCol.DataPropertyName = "Authors"
�� � � 'Mengisi list dari T_Titles table
�� � � �listCol.DataSource = ds.Tables("Titles")
�� � � �listCol.DisplayMember = "Authors"
�� � � �listCol.ValueMember = "Authors"
�� � � 'Tambahkan column
�� � � �DataGridView1.Columns.Add(listCol)
Selamat mencoba...
Wassalam..
Update Contact :
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email : Fajarudinsidik@gmail.com
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email: Fajarudinsidik@gmail.com
atau Kirimkan Private messanger melalui email dengan klik tombol order dibawah ini :