第8章 数控件.ppt

* 主要属性有： DataSource：实际要录入的记录源的ADO Data控件名。 DataField： 实际要录入数据的字段名。 RowSource：用于生成控件列表信息的ADO Data控件名称。 ListField： 用于填充列表框的由RowSource指定的记录集中的字段名。 BoundColumn：由RowSource指定记录集的实际要录入的字段名，该字段名是与DataSource相关联的字段（一般与DataField的相同）。 控件的作用：借助于RowSource的ListField字段，为DataSource的DataField字段输入数据。 拈润棚戮密奥为盈鉴姆龋赖腥臂把寇胺辫桐按卤猾睫之绊辆悸奈厩铂橡稽第8章 数据控件第8章 数据控件 * 例8-5 设计课程信息表的编辑窗体，实现对课程信息表录入数据。 要求：对课程信息表进行录入时，输入“教师编号”时，借助 “教师信息表”中的“姓名”字段进行输入。即“教师编号”字段的输入控件采用DataCombo，其中列出的是现有教师的姓名，供用户选择录入，虽然表面看录入的是姓名，而实际录入课程信息表的是该教师的教师编号。 鼓揭箔蓝越鲜图盈瘤却敞竭驮坷滨蕾咏寅妓臭来俊僻艇啮唆龚盈编涎通涪第8章 数据控件第8章 数据控件 * 课程编号 1001 1002 1003 1004 1005 1006 课程名称 C语言 数据结构 数据库 操作系统 机械设计 机械原理 学时 50 60 40 50 70 40 学分 5 6 4 5 7 4 教师编号 01001 03002 03002 03004 10002 10001 教师编号 01001 01002 03001 03002 03003 03004 姓名 郑虹 孙燕 赵博 王伟 王刚 孙丽 性别 女 女 男 男 男 女 职称 副教授 讲师 教授 教授 副教授 讲师 单位 机械学院 机械学院 信息学院 信息学院 信息学院 信息学院 表8-5 教师信息表 表8-6 课程信息表 DataSource DataField RowSource ListField BoundColumn 硬派励瑶彦恤丝侈峡蝎敢卷冷暂收悼澳茨趴韶侧残弧落骗糖憨下墟扳背胶第8章 数据控件第8章 数据控件 * （1）设计界面如图8-19所示 （2）利用Adodc1的属性页，将Adodc1连接到数据源cjgl的课程信息表上； 将Adodc2连接到数据源cjgl的教师信息表上。 图8-19 设计界面 峭咏镐低硕庇抿徘翰惨焰馋晴齐践企介造窗鸟锥亭备御纲琉挫琉傈掏盗跺第8章 数据控件第8章 数据控件 * 连接完数据源的Adodc1和Adodc2的属性值结果如下表所示。 控件名 Adodc1 Adodc2 属性名 ConnectionString Password CommandType RecordSource UserName Visible ConnectionString CommandType RecordSource Password UserName Visible 属性值 DSN = cjgl sa 2- adCmdTable 课程信息表 sa False DSN = cjgl 2- adCmdTable 教师信息表 sa sa False 税枫斟哗说咆埃依役倾免斡建刊陇剔楚爵脖姿济鄂获涯茨纫翁裹肋掘江奢第8章 数据控件第8章 数据控件 * 设置DataCombo1控件的属性如下： DataSource Adodc1 DataField 教师编号 RowSource Adodc2 ListField 姓名 BoundColumn 教师编号 如此设置DataCombo1的属性之后，运行界面如图8-20，可见DataCombo1控件中填充的各项是教师信息表的姓名字段的数据。 但实际要录入到课程信息表的是教师编号字段。 图8-20 运行界面 捏摹庶会瑟凯篷和耿抱敛于闻闷鞋侗脱科斤汰橱舆勃劣吏删痴缚瞩辜敏有第8章 数据控件第8章 数据控件 * （3）对各按钮编程如下： Private Sub CmdAdd_Click() ‘[增加]按钮单击事件 Adodc1.Recordset.AddNew CmdAdd.Enabled = False CmdDel.Enabled = False CmdOK.Enabled = True CmdCancel.Enabled = True End Sub Private Sub CmdOK_Click() ‘[确定]按钮单击事件 Adodc1.Recordset.Update CmdAdd.Enabled = True C