VB程序设计第5次形考(题库)

Visual Basic编程课程基于网络评估改革试点测试第五种格式编程问题(第1题，100分)1.程序运行后，开发人力资源文件管理数据库应用程序，通过MSFlexGrid控件，用户可以在主界面中显示数据表的内容，单击工具栏上的“添加”、“删除”、“查看”按钮执行相应的操作，然后单击程序执行界面如图5-1、5-2和5-3所示。图5-1程序执行主界面图5-2“add(添加)”表单执行界面图5-3“view(查看)”表单执行界面开发阶段和要求：1.准备工作创建“vbxk5 -人力资源文件管理”文件夹以保存用于设计界面的图标。开发过程中的所有文件都存储在vbxk 5人力资源文件管理文件夹中。2.人事档案管理数据库的构建使用名为HRM.mdb的Microsoft Access创建数据库。在HRM.mdb数据库中创建两个“文件”和“职称”数据表。表5-1“文件”表结构字段名类型尺码说明编号文本20主键名字文本15职称文本10简历注释照片OLE物件表5-2“职称”表结构字段名类型尺码说明职称文本未设置为主键3.界面设计(1)创建项目创建项目名称为“HRM.vbp”的新“标准EXE”项目。通过菜单项“项目-部件”或“项目-引用”添加相关对象或控件(例如ADO数据对象、工具栏、MSFlexGrid等)，并将所有表单的StartUpPosition属性设置为以2屏幕为中心，然后根据需要填写表单：(2)创建基本表单(frmMain)使用Toolbor控件、ImageList控件和MSFlexGrid控件填写人力资源文件管理基本表单，如图5-4所示。表单名称frmMain，其他控件保留默认名称。图5-4基本表单设计界面(3)创建“添加”表单(frmAdd)使用标签、文本框、组合框、命令按钮和图片框控件创建名为frmAdd的“添加”表单，如图5-5所示。图5-5“add(添加)”表单设计界面(4)创建“查看”表单(frmShow)使用标签、文本框、组合框、命令按钮和图片框控件创建“查询”表单，如图5-6所示。此时，表单的名称为frmShow。图5-6“查询”表单设计界面4.代码设计(1)添加模块。模块代码如下所示：Public cn As New ADODB。ConnectionSub main()Dim strcn As Stringstr cn= provider=Microsoft . jet . oledb . 4.0；Data Source= App。Path HRM.mdbPersist Security Info=False Cn .Open strcn普鲁马因肖End Subpublic sub save photo(fname as string，strno as string)Dim RS As New ADODB。RecordsetDim image_data() As ByteRs .ActiveConnection=cnRs .open select * from where= strno ，cn，adopen dynamic，adlockoptimisticif Trim(FName)“”ThenOpen Trim(FName) For Binary As #1ReDim image_data(LOF(1)-1)Get #1，image_data()关闭#1Rs(“”)。AppendChunk image_data()Rs .更新Rs .CloseElseRs(“”)。AppendChunk Rs .更新Rs .CloseEnd IfEnd Sub(2)主要表格代码参考实验教材实验7(3)“添加”表单代码参考实验教材实验7(4)“查询”表单代码参考实验教材实验7注：运行vbxk5 -人力资源文件管理文件夹。开发性查询数据库应用程序。其中包括“增量”(Insert)、“修改”(Update)、“删除”(Delete)和“查询”(Select)功能。开发阶段和要求：1.准备工作建立vbxk 5-成绩查询资料夹，以保留用于介面设计的图示。开发过程中的所有文件都存储在“vbxk 5-成绩查询”文件夹中。2.构建绩效查询数据库使用Microsoft Access或SQL Server创建名为“成绩”的数据库。此数据库包括三个数据表、学生成绩表和课程情况表，如表5-3、表5-4、表5-5、表5-5和表5-6所示。表5-3学生成绩单字段名类型长度说明学号文本10主键学科课程编号文本10成绩文本20表5-4学生状况表字段名类型长度说明学号文本10主键名字文本20表5-5课程情况表字段名类型长度说明学科课程编号文本10学科课程名称文本50表5-6添加表记录表格名称表格记录学生成绩单通过程序添加学生状况表手动添加：(001，张红)，(002，李纲)，(003，王力)过程状况表手动添加：(001，数据库原理)，(002，可视化编程)3.编程接口设计(1)创建项目建立名为绩效检视的专案名称的新标准EXE专案，并根据所有表单的StartUpPosition属性设定为2-screen center的以下需求建立表单：(2)创建基本表单(frmMain)使用菜单技术、工具栏技术创建基本表格，如图5-7所示。表单名称frmMain，其他控件保留默认名称。图5-7主表单(frmMain)执行界面(3)创建“新记录”表单(frmAdd)使用标签、文本框、组合框和命令按钮控件添加和创建新记录表格，如图5-8所示。表单名称为frmAdd，其他控件保留默认名称。将“成绩”(personal)文本框中的Alignment属性设置为1-Right Justify，以便数据显示在右端。图5-8添加记录表单(frmAdd)执行界面(4)创建记录修正表单(frmUpdate)使用标签、文本框、组合框和命令按钮控件添加和创建记录修正表单，如图5-9所示。表单名称为frmUpdate，其他控件保留默认名称。将“成绩”(personal)文本框中的Alignment属性设置为1-Right Justify，以便数据显示在右端。图5-9记录修正表单(frmUpdate)执行界面(5)创建删除记录表单(frmDelete)使用标签、组合框和命令按钮控件添加和创建删除记录表单，如图5-10所示。表单名称为frmDelete，其他控件保留默认名称。图5-10删除记录表单(frmDelete)执行界面(6)创建查询记录表单(frmQuery)首先，使用“工程-部件”菜单添加Microsoft FlexGrid Control6.0表格