《工控程序开发训》-项目3.ppt

工 作 任 务 5月6日任务 目标：完成打包品种管理窗体的制作 要求(1)能够添加、更改和删除品种 (2)可通过鼠标右键快捷菜单选择 小组讨论，以个人为单位完成上交。 步 骤 1.建立“打包品种管理”窗体 2.添加ADODC控件及DataGrid网格控件，连接数据库及数据表； 3.添加窗体菜单。 步 骤 4.VB有关数据库操作的语句介绍 (1)取得当前记录的某字段的数据 变量=ADODC.Recordset.Fields(字段名) (2)记录定位查找 ADODC.Recordset.Find 姓名=‘张三’ ADODC.Recordset.Eof = true ‘没有找到 ADODC.Recordset.Eof = Flase ‘找到 记录指针示意图 第一条记录First 最后一条记录Last 最底一条记录Bottom 最顶一条记录Top Bof = true Eof = true Bof = False Eof = False SQL查询语句的使用 (3)记录指针移动 第一条记录 ADODC.Recordset.MoveFirst 上一条 ADODC.Recordset.MoveNext 下一条 ADODC.Recordset.MovePrevious 最后一条 ADODC.Recordset.MoveLast (4)数据集中的记录数 ADODC.Recordset.RecordCount SQL查询语句的使用 (5)当前记录号 ADODC.Recordset.AbsolutePosition (6)添加空白记录 ADODC.Recordset.AddNew (7)删除当前记录 ADODC.Recordset.Delete SQL查询语句的使用 (8)当前记录的字段修改 ADODC.Recordset.Fields(“字段名”)=新数据 ADODC.Recordset.Update (9)记录指针的位置 在底：ADODC.Recordset.Eof = True 在中间：ADODC.Recordset.Eof = Flase 工 作 任 务 5月7日任务 目标：继续完成打包品种管理窗体的制作 要求：完善添加功能，完成更改和删除功能 小组讨论，以个人为单位完成上交。 步 骤 4.有关数据库编辑的SQL语句介绍 (1)插入记录ADODC.Recordset.ActiveConnection.Execute ? =?”Insert into 表(字段1,字段2…) values(x1,x2…)” 步 骤 (2)删除ADODC.Recordset.ActiveConnection.Execute ? = ?Delete from 表 where … (3)更新 ADODC.Recordset.ActiveConnection.Execute ? = ?“Update 表 set 字段1=新值1,字段2=新值2, … where … 步 骤 (3)记录指针的位置 在顶：ADODC.Recordset.Bof = True 在中间：ADODC.Recordset.Bof = Flase 在中间：ADODC.Recordset.Eof = Flase 在底：ADODC.Recordset.Eof = True 步 骤 5.完成“删除品种”功能 要求：(1)能删除当前选择的一条记录 (2)删除前要有提示确认功能 6.MsgBox()函数简介 见VB帮助。 步 骤 7.完成“添加品种”功能 要求：(1)对用户添加的数据要能够判断其合理性； (2)不能添加重复品种 提示：①用SQL中的Insert语句添加 ②用记录集的Find方法定位查找 ADODC控件的RecordSource属性 数据绑定控件显示数据 数据库 数据表 ADODC控件的Connectionstring属性连接数据库 记录集 Recordset Recordset对象的主要属性 属性名 设置值及意义 EOF 表示该记录指针是否在Recordset中的最后一条记录之后，逻辑型。 BOF 表示该记录指针是否在Recordset中的第一条记录之前，逻辑型。 NoMatch 该属性值为True时表示未找到匹配项，逻辑型。 RecordCount 返回一个表示该Recordset对象所包含的记录数。 AbsolutePosition 返回或设置一个表示该Recordset对象的当前记录的绝对位置。 Fie