注意MSHFlexGrid 控件所显示的是只读数据,无法完成你所要求的操作。见MSDN的说明:
MSHFlexGrid 控件
Microsoft Hierarchical FlexGrid (MSHFlexGrid) 控件对表格数据进行显示和操作。
在对包含字符串和图片的表格进行分类、合并以及格式化时,具有完全的灵活性。当绑定到 Data 控件上时,MSHFlexGrid 所显示的是只读数据。
要完成你希望的操作,应使用ADO数据控件和DataGrid 控件
DataGrid 控件是一种类似于电子数据表的绑定控件,可以显示一系列行和列来表示 Recordset 对象的记录和字段。
可以使用 DataGrid 来创建一个允许最终用户阅读和写入到绝大多数数据库的应用程序。DataGrid 控件可以在设计时快速进行配置,只需少量代码或无需代码。当在设计时设置了 DataGrid 控件的 DataSource 属性后,就会用数据源的记录集来自动填充该控件,以及自动设置该控件的列标头。
然后您就可以编辑该网格的列;删除、重新安排、添加列标头、或者调整任意一列的宽度。
在运行时,可以在程序中切换 DataSource 来察看不同的表,或者可以修改当前数据库的查询,以返回一个不同的记录集合
具体做法:
新建工程时选数据工程,此时VB6集成调试环境左边工具箱内已加载了有关数据库编程必须的控件。
然后在FORM1窗体中添加ADODC控件和DATAGRID控件,将DATAGRID1的属性DATASOURCE选ADODC1,打开ADODC1控件属性页使用连接字符串,选生成,在提供者选项中选MICROSOFT jet 4。0 OLE DB Provider,然后按要求连接数据库等。
在ADODC1控件属性页使用连接字符串空白文本窗口中就有一长串字符串,注意该字符串可复制到程序代码用于编程。ADODC1控件属性页的数据源内有命令文本(SQL)编写窗口可编写SQL查询语言。该窗口的SQL语句可复制到程序代码用于编程。
SQL查询语言主要结构为:
Select 查询字段 from 表名 Where 查询条件语句 [排序语句或分组语句]
查询字段必须分别用(英文)逗号分开或就用一个*号代替,上述查询中排序语句建议最好应用。
SQL查询语言如有错程序运行时告诉你出错,作相应改动即可。本人一般先按上述连接,SQL用"SELECT * FROM TabelName"作调试,无问题,用一个按钮孔件将前述需复制的连接字符串和SQL查询语言先复制于按钮控件的CLICK事件中备着,以便放着以后使用。
然后删去ADODC1孔件,再添加ADODC1控件再添其他内容。
在DataGrid 控件显示的数据中删除一条数据,可将鼠标选中该行记录,使用SQL查询语句进行
删除操作代码供参考:
Private Sub Command2_Click()
Adodc1。
Recordset。Delete
Adodc1。ConnectionString = "Provider=Microsoft。Jet。OLEDB。4。0;Data Source=C:\ldgz\jly。mdb;Persist Security Info=False"
Adodc1。
RecordSource = "select * from jishijilu"
Adodc1。Refresh
DataGrid1。Refresh
Adodc1。ConnectionString = "Provider=Microsoft。
Jet。OLEDB。4。0;Data Source=C:\ldgz\jly。mdb;Persist Security Info=False"
Adodc1。RecordSource = "select * from jishijilu"
Adodc1。
Refresh
DataGrid1。Refresh
End Sub
Private Sub Form_Load()
Adodc1。ConnectionString = "Provider=Microsoft。Jet。OLEDB。4。0;Data Source=C:\ldgz\jly。
mdb;Persist Security Info=False"
Adodc1。RecordSource = "select * from jishijilu"
Adodc1。Refresh
End Sub
。
全部