2021年VB程序设计第5次形考题库.docVIP

Visual Basic程序设计课程基于网络考评改革试点 第5次形考 编程题（1个题， 100分 ） 1．开发一个人事档案管理数据库应用程序，要求程序运行后，经过MSFlexGrid控件在主界面上显示数据表中内容，单击工具栏上“增加”、“删除”、“查看”按钮，能够进行对应操作，单击“退出”按钮，退出应用程序。程序运行界面图5-1、5-2、5-3所表示。 图 图5-1 程序运行主界面 图 图5-2 “增加”窗体运行界面 图 图5-3 “查看”窗体运行界面 开发步骤及要求： １．准备工作 建立名称为“vbxk5－人事档案管理”文件夹，在该文件夹下，建立“图标”文件夹，在其中存入界面设计时所用图标。开发过程中全部文件存放在“vbxk5－人事档案管理”文件夹中。 ２．建立人事档案管理数据库 用Microsoft Access建立数据库，名称为HRM.mdb。在HRM.mdb数据库中建立“档案”和“职称”2个数据表。 　　　　　　　　　　　　　表5-1 “档案”表结构 字段名 类型 大小 说明 编号 文本 20 主键 姓名 文本 15 职称 文本 10 简历 备注 照片 OLE 对象 表5-2 “职称”表结构 字段名 类型 大小 说明 职称 文本 不设为主键 ３．界面设计 （１）创建工程 新建一“标准EXE”工程，工程名为“HRM.vbp”。经过“工程－部件”或“工程－引用”菜单项添加ADO数据对象、工具条、MSFlexGrid等相关对象或控件，并按以下要求创建窗体，全部窗体StartUpPosition属性均设置为：2-屏幕中心。 （2）创建主窗体（frmMain） 按图５－4所表示，利用Toolbor控件、ImageList控件和MSFlexGrid控件创建“人事档案管理”主窗体。窗体名frmMain，其它控件保留缺省名称。 　　　　　 图 图5-4 主窗体设计界面 （３）创建“增加”窗体（frmAdd） 按图５－5所表示，使用标签、文本框、组合框、命令按钮、图片框控件，创建“增加”窗体，窗体名为frmAdd。 　　　　　 图 图5-5 ＂增加＂窗体设计界面 （４）创建“查看”窗体（frmShow） 按图５－6所表示，使用标签、文本框、组合框、命令按钮、图片框控件，创建“查询”窗体，窗体名为frmShow。 　　　　　　　　　　 图 图5-6 ＂查询＂窗体设计界面 　４．代码设计 　（１）添加模块，模块代码以下： Public cn As New ADODB.Connection Sub main() Dim strcn As String strcn = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= + App.Path + \HRM.mdb;Persist Security Info=False cn.Open strcn frmMain.Show End Sub Public Sub SavePhoto(FName As String, strNo As String) Dim rs As New ADODB.Recordset Dim image_data() As Byte ?¨ò?í???±￡′?μ?±?á? rs.ActiveConnection = cn rs.Open Select * From μμ°? Where ±ào?= + strNo + , cn, adOpenDynamic, adLockOptimistic If Trim(FName) Then ?ùè?óDí???￡??aê?μ?μ?í??????t Open Trim(FName) For Binary As #1 ReDim image_data(LOF(1) - 1) Get #1, , image_data() Close #1 rs(????).AppendChunk image_data() rs.Update rs.Close Else rs(????).AppendChunk rs.Update rs.Close End If End Sub （２）主窗体代码 参考试验教材试验７ （３）“增加”窗体代码 参考试验教材试验７ （４）“查询”窗体代码 参考试验教材试验７ 注意：提交“vbxk5－人事档案管理”文件夹。 ２．开发一个成绩查询数据库应用程序。它含有数据增加（Insert）、修改（Update）、删除（D