Program Paket Bisnis (PAB) 7 oktober 2014
program menampilkan data ke DataGridView
import MySql.Data.MySqlClient
public class form1
dim mda As New MySqlDataAdapter
dim ds As New DataSet
private sub form1_load(----) handles mybase.load
kon.open()
perintah.connection= kon
perintah.commandtype=commandtype.text
perintah.commmandtext="select from peminjaman"
mda.selectcommand = perintah
ds.table.clear()
mda.fill(ds,"pinjam")
dg.datasource =ds.tables("pinjam")
kon.close()
end sub
import MySql.Data.MySqlClient
public class form1
dim mda As New MySqlDataAdapter
dim ds As New DataSet
private sub form1_load(----) handles mybase.load
kon.open()
perintah.connection= kon
perintah.commandtype=commandtype.text
perintah.commmandtext="select from peminjaman"
mda.selectcommand = perintah
ds.table.clear()
mda.fill(ds,"pinjam")
dg.datasource =ds.tables("pinjam")
kon.close()
end sub
Komentar
Posting Komentar