程序有bug
1。在Form_Load里不应重新定义cnstr
2。DataGrid1_RowColChange中rs.Open s, cn改成rs.Open s, cn, adOpenStatic, adLockReadOnly
另外还有几个建议
1。cn是全局连接对象,不必多次打开,一个应用程序打开一次就够了,在main函数中打开就行了。退出程序时要记得关闭连接
2。Datagrid中已经有现成的数据了,要把datagrid中的数据显示在文本框中不必再次进行数据库查询,直接可以调用datagrid中的值,去看看datagrid的属性吧。