| 发表于:2007-05-13 08:44:196楼 得分:0 |
imports system.data imports system.data.sqlclient public class form1 dim conn as sqlconnection dim da as sqldataadapter dim ds as dataset dim cb as sqlcommandbuilder ' 窗体载入时用datagridview显示数据 private sub form1_load(byval sender as object, byval e as system.eventargs) handles me.load conn = new sqlconnection( "您的连接词 ") conn.open() da = new sqldataadapter( "select * from 表名 ", conn) ds = new dataset da.fill(ds) me.datagridview1.datasource = ds.tables(0) end sub ' 在datagridview中完成增删改查后把修改存入数据库 private sub button1_click(byval sender as object, byval e as system.eventargs) handles button1.click cb = new sqlcommandbuilder(da) try da.update(ds) ds.acceptchanges() msgbox( "updated to the database ") catch ex as exception msgbox( "error! ") end try end sub end class | | |
|