问答题在考生文件夹下有工程文件sj3.vbp及窗体文件sj3.frm,该程序是不完整的,请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符(即'号),但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下:在窗口中有一个Label控件和两个名称分别为Command1和Comrnand2,标题分别为“开始”和“关闭”的命令按钮。要求程序运行后,单击“开始”按钮后,能将下图给出的菱形写入考生文件夹下的shape.dat文件中;执行完毕,“开始”按钮变成“完成”,且无效(变灰)。程序运行界面如下图右图所示。
问答题(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生20个0~1000的整数,将其放入一个数组中,然后输出这20个整数的平均值。程序运行后,单击命令按钮(名称为Command1,标题为“输出平均值”),即可求出其平均值,并显示在窗体上(如图所示)。这个程序不完整,请把它补充完整,并能正确运行。要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。(2)在考生文件夹下有一个工程文件sjf4.vbp,相应的窗体义件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。程序运行后,单击命令按钮,即可计算出0~200范围内能被3整除的所自整数的和,并显不住文本框中。在窗体的代码窗口中,已给出了部分程序,其中计算能被3整除的整数的和的操作在通用过程Fun中实现,请编写该过程的代码。要求:请勿改动程序中的任何内容,只在FunctionFun()和EndFunction之间填入你编写的若干语句。最后将修改后的文件按原文件名存盘。
问答题在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的,请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符(即'号),但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下:在名称为Form1的窗体上有一个Label控件和两个名称分别为Command1和Command2,标题分别为“开始”和“关闭”的命令按钮。编写函数Minus(A,N),其功能是由数字A组成的不多于N位数的整数,利用该函数求8000-800-80-8的值并把结果写入考生文件夹下的sj5.dat文件中。执行完毕,“开始”按钮变成“完成”,且无效,如下图所示。
问答题(1)在名称为Forml的窗体上添加一个名称为Label1标题为“列表框的使用”的标签。再添加一个名称为List1的列表框,列表中含有5个表项,其内容分别为“北京”、“山西”、“辽宁”、“浙江”和“广东”,并且可以在列表中同时选择多个表项。程序运行后的窗体如图所示。要求:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vbp,窗体文件名保存为sjt1.frm。(2)在名称为Form1的窗体上添加一个名称为Image1的图像框,其高、宽分别为2000、3000,且不随图片大小而变化;再添加两个命令按钮,标题分别是“显示图片”和“隐藏图片”,名称分别为Cmd1、Cmd2,如图所示。需编写两个命令按钮的Click事件过程,使得当单击“显示图片”按钮时,当前文件夹下的图片文件“图片.jpg”显示在图像框中;如果单击“隐藏图片”按钮,则清除图像框中的图片。要求:程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
问答题在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请画两个标签,名称分别为Label1和Label2,标题分别为“出现次数最多的字母是”和“它出现的次数为”;再画两个名称分别为Text1和Text2、初始值为空的文本框,如图5所示。程序功能如下:①单击“读数据”按钮,则将考生文件夹下in5.dat文件的内容读到变量s中(此过程已给出)。②单击“统计”按钮,则自动统计in5.dat文件中所含各字母(不区分大小写)出现的次数,并将出现次数最多的字母显示在Text1文本框内,它所出现的次数显示在Text2文本框内。“读数据”按钮的Click事件过程已经给出,请为“统计”按钮编写适当的事件过程实现上述功能。注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行统计,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后程序按原文件名存盘。[题目提供的源程序]OptionBase1DimsAsStringPrivateSubCommand1_Click()OpenApp.Path&"/in5.dat"ForInputAs#1s=Input(LOF(1),#1)Close#1EndSubPrivateSubCommand2_Click()'考生应编写的程序EndSubPrivateSubForm_Unload(CancerAsInteger)OpenApp.Path&"/out5.dat"ForOutputAs#1Print#1,Text1.Text,Text2.TextClose#1EndSub
问答题在名称为Form1的窗休上添加一个名称为Label1的标签,字号大小为四号,标题为“等级考试”,如图1所示。通过设置属性使标签初始为不显示。请编写适当的程序,使得运行程序时,窗体的标题立即变为“标签”,单击窗体时,显示标签,如图2所示。注意:存盘时,将文件保存至考生文件夹下,且窗体文件名保存为sjt2.frm,工程文件名保存为sjt2.vbp。要求程序中不得使用变量,每个事件过程中只能写一条语句。
问答题(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生30个0~1000的整数,放入一个数组中,然后输出其中的最小值。程序运行后,单击命令按钮(名称为Command1,标题为“输出最小值”),即可求出其最小值,并在窗体上显示出米(如图所示)。这个程序不完整,请把它补充完整,并使其能正确运行。要求:去掉程序中的注释符,把平晕序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后将修改后的文件按原名存盘。(2)在考生文件灾下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。程序运行后,单击命令按钮,即町计算出0~1000范围内不能被7整除的整数的个数,并在文本框中显示出来。在窗体的代码窗口中,已给出了部分程序,其中计算不能被7整除的整数的个数的操作在通用过程Fun中实现,请编写该过程的代码。要求:请勿改动程序中的任何内容,只在FunctionFun()和EndFuuction之问填入你编写的若干语句。最后将修改后的文件按原文件名存盘。
问答题注意:下面出现的“”均为c:/wexam/25160001。请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在窗体上建立一个二级菜单,该菜单含有“文件”和“帮助”(名称分别为vbFile和vbHelp)两个主菜单项,其中“文件”菜单包括“打开”、“关闭”和“退出”三个子菜单项(名称分别为vbOpen、vbClose和vbExit),如图1-1所示。只建立菜单,不必定义其事件过程。注意:保存时必须存放在考生文件夹下,窗体文件名为sjt1.frm,工程文件名为sjt1.vbp。(2)在名为Form1的窗体上画一个框架,名称为Frm1,标题为“框架”,高度为2500,宽度为4000,框架内建立一文本框,距左边框600,距框架的上边框1200,文本框中的初始内容设置为“文本框”。如图1-2所示。注意:保存时必须存放在考生文件夹下,窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。
问答题考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表对象“tCourse”、“tScore”和“tStud”,试按以下要求完成设计:(1)创建一个查询,查找党员记录,并显示“姓名”、“性别”和“入校时间”三列信息,所建查询命名为“qT1”。(2)创建一个查询,当运行该查询时,屏幕上显示提示信息:“请输入要比较的分数:”,输入要比较的分数后,该查询查找学生选课成绩的平均分大于输入值的学生信息,并显示“学号”和“平均分”两列信息,所建查询命名为“qT2”。(3)创建一个交叉表查询,统计并显示各班每门课程的平均成绩,统计显示结果如图2.1所示(要求:直接用查询设计视图建立交叉表查询,不允许用其他查询做数据源),所建查询命名为“qT3”。(4)创建一个查询,运行该查询后生成一个新表,表名为“tNew”,表结构包括“学号”、“姓名”、“性别”、“课程名”和“成绩”等五个字段,表内容为90分以上(包括90分)或不及格的所有学生记录,并按课程名降序排序,所建查询命名为“qT4.”。要求创建此查询后,运行该查询,并查看运行结果。
问答题注意:下面出现的“”均为c:/wexam/25160001。请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上建立一个名称为P1的图片框和两个命令按钮,名称分别为Cmd1和Cmd2,标题分别为“输出”和“清除”,如图3-1所示。要求程序运行后,每单击一次“输出”按钮,不使用任何变量而直接在图片框中显示小写字母“loadme”:如果单击“清除”按钮,则清除图片框中的内容。注意:保存时必须存放在考生文件夹下,窗体文件名为sjt1.frm,工程文件名为sjt1.vbp。(2)在名称为Form1的窗体上建立一个名称为List1的列表框。要求:在程序运行后,通过Form_Load()事件过程加载窗体时,执行语句List1.AddItem"AAA",每当单击某个列表项时,都执行语句List1.AddItemList1.Text一次,如图3-2所示。注意:保存时必须存放在考生文件夹下,窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。
问答题请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画1个命令按钮,其名称为C1,标题为“等级考试”;再画1个文本框,名称为T1,如图3-107(a)所示。请编写适当的事件过程,使程序运行后,一旦文本框rfj的信息有任何变化或输入任何信息,则命令按钮消失,并使命令按钮的标题站在文本框中显示出来,如图3.107(b)所示。注意:存盘时,将文件保存至考生文件夹下,窗体文件名为sitl.frm,工程文件名为sitl.vbp。(2)在名称为Foml、标题为“菜单演示”的窗体上画一个名称为Labell、标题为窄的标签;再建立一个菜单,各菜单项的属性设置见下表。窗体外观如图3一108(a)所示。请编写适当的程序,使得选中“输出窗体标题”菜单项时,就在标签中显示窗体标题;选中“输出当前时间”菜单项时,在标签中显示当前系统时间(如图3.108(b)所示)。要求程序中不得使用变量,每个事件过程中只能写一条语句。注意:存盘时,将文件保存至考生文件夹下,窗体文件名为sit2.frm,工程文件名为sit2.vbp。
问答题为了验证一个正整数n(n>3)是否为素数,最直观的方法是,看在2~n/2范围内能否找到一个整数m将n整除,若m存在,则n不是素数;若找不到m,则n为素数。在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有1个名称为Text1的文本框。请根据上面的算法,编写判断一个正整数是否为素数的函数prime,然后用这个函数找出200~300之间的所有素数,求出这些素数的和,将该数在文本框中显示出来,并存入文件out5.txt中。 要求:编写函数prime的代码,然后在Form Click事件过程中调用该函数,并计算素数的和。事件过程中已给出了把素数和保存到文件中的代码,考生不得修改。 注意:请务必把求得的和在文本框中显示出来,这样才能存入文件out5.txt,否则没有成绩。
问答题在考生文件夹下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.眦文件(如图1所示),单击“打开”按钮,则把文件中的内容读入并显示在文本框(Text1)中;单击“修改内容”按钮,则将Text1中的大写字母“E”、“N”、“T”改为小写,把小写字母“e”、“n”、“t”改为大写;单击“保存文件”按钮,则弹出“另存为”对话框,默认文件类型为“文本文件”,默认文件夹为考生文件夹,默认文件为“out5.txt”(如图2所示),单击“保存”按钮,则将Text1中修改后的内容存到out5.txt文件中。窗体中已经给出了所有控件和程序,但程序不完整,去掉程序中的注释符,把程序中的?改为正确的内容,并编写“修改内容”按钮的Click事件过程。注意:考生不得修改已经存在的程序。必须把Text1中修改后的内容用“保存文件”按钮存储结果,否则无成绩。最后,按照原文件名将程序存盘。
问答题在考生文件夹下有一个数据库文件“samp3.accdb”,其中存在设计好的表对象“tStud”和查询对象“qStud”,同时还设计出以“qStud”为数据源的报表对象“rStud”。请在此基础上按照以下要求补充报表设计。 (1)在报表的报表页眉节区添加一个标签控件,名称为“bTitle”,标题为“97年入学学生信息表”。 (2)在报表的主体节区中添加一个文本框控件,显示“姓名”字段值,将该控件放置在距上边0.1厘米、距左边3.2厘米的位置,并命名为“tName”。 (3)在报表的页面页脚节区添加一个计算控件,显示系统年月,显示格式为:××××年××月(注:不允许使用格式属性)。将计算控件放置在距上边0.3厘米、距左边10.5厘米的位置,并命名为“tDa”。 (4)按“编号”字段的前4位分组统计每组记录的平均年龄,并将统计结果湿示在组页脚节区中。计算控件命名为“tAvg”。 注意:不能修改数据库中的表对象“tStud”和查询对象“qStud”,同时也不允许修改报表对象“rStud”中已有的控件和属性。
问答题在考生文件夹中有1工程文件sit5.vbp及其窗体文件sjr5.frm,该程序是不完整的,请在有“?”号的地方填入正确内容,然后删除“?”及所有注释符(即“'”号)但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下。在名称为Form1的窗体上有一个文本框,名称为Text1,MultiLine属性为True,ScrollBars属性为2,两个命令按钮,名称分别为Cmd1和Cmd2,标题分别为“读入数据”和“保存数据”),如图11-23所示。程序运行后,如果单击“读入数据”按钮,则读入“in.txt”文件中的100个整数,放入一个数组中(数组下界为1),并在文本框Text1中显示出来;如果单击“保存数据”按钮,则把数组中的前50个数据在文本框Text1中显示出来,并存入考生文件央中的文件“result.txt”一书。(考生文件夹中有标准模块prog.bas,其中的putdata过程可以把指定个数的数组元素存入result.txt文件。)
问答题在窗体上绘制两个标签,名称分别为Lab1和Lab2,标题分别为“请输入一个正整数N”和“1+2+3+…+N=”;绘制两个文本框,名称分别为Text1和Text2,内容都设为空白;绘制一个命令按钮,名为Cmd1,标题为“计算”。编写适当的程序,使程序运行时,在Text1中输入一个正整数N,单击“计算”按钮,计算出1+2+3+…+N的和显示在Text2中。程序运行结果如下图所示。注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。
问答题在考生文件夹下有一个工程文件sjt5.vbp,其功能是:单击“读数据”按钮,则把考生文件夹下in5.dat文件中的100个正整数读入数组a中,同时显示在Text1文本框中;单击“素数”按钮,则将数组a中所有素数(只能被1和自身整除的数称为素数)存入数组b中,并将数组b中的元素显示在文本框Text2中。在给出的窗体文件中已经有了全部控件(如图5所示),但程序不完整。要求:完善程序使其实现上述功能。注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须先执行“素数”操作,然后再用窗体右上角的关闭按钮结束程序,否则无成绩。最后程序按原文件名存盘。[题目提供的源程序]OptionBase1Dima(100)AsInteger,numAsIntegerPrivateSubCommand1_Click()DimkAsIntegerOpenApp.Path&"/in5.dat"ForInputAs#1Fork=1To100Input#1,a(k)Text1=Text1+Str(a(k))+Space(2)NextkClose#1EndSubPrivateSubCommand2_Click()Dimb(100)AsIntegernum=0IfLen(Text1.Text)=0ThenMsgBox"请先执行"读数据"功能!"Else'考生应编写的程序(功能:生成存放素数的数组b)'注意:请务必将数组b的元素个数存入变量num中'以下程序段将b数组的内容显示在Text2中Fori=1TonumText2.Text=Text2.Text+Str(b(i))+Space(2)NextiEndIfEndSubPrivateSubForm_Unload(CancelAsInteger)OpenApp.Path&"/out5.dat"ForOutputAs#1Print#1,Text2.TextClose#1EndSub
问答题在下有一个工程文件sjt4.vbp。窗体上有一个名称为Timer1的计时器,一个名称为List1的列表框和一个名称为Label1的标签,如图所示。请通过属性窗口向列表框添加四个项目,分别是:“第一项”、“第二项”、“第三项”、“第四项”。程序运行后,将计时器的时间间隔设置为1秒钟,即每一秒钟从列表框中取出一个项目显示在Label1的标签中,首先显示“第一项”,然后,依次显示“第二项”、“第三项”、“第四项”,如此循环。在给出的窗体文件中已经有了全部控件和程序,但不完整,请添加List1中的项目,去掉程序中的注释符,把程序中的?改为正确的内容。注意:考生不得修改工程中已经存在的内容和控件属性,最后将修改后的文件按原文件名存盘。
问答题在考生文件夹下有一个工程文件sjt3.vbp,窗体中有两个图片框,名称分别为P1、P2,其中的图片内容分别是一架航天飞机和一朵云彩,一个命令按钮,名称为C1,标题为“发射”,还有一个计时器,名称为Timer1。并给出了两个事件过程,但并不完整,要求:①设置Timer1的属性,使其在初始状态下不计时:②设置Timer1的属性,使其每隔0.1秒调用Timer事件过程一次;③去掉程序中的注释符,把程序中的?改为正确的内容,使得在运行时单击“发射”按钮,则航天飞机每隔0.1秒向上移动一次,当到达P2的下方时停止移动,如图所示。注意:不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
问答题(1)在名称为Form1的窗体上画一个名称为Text1的文本框,其高、宽分别为400、2000。运行后的窗体如图3.112所示。请在属性框中设置适当的属性满足以下要求:①Text1的字体为“黑体”,字号为“四号”;②窗体的标题为“输入”,不显示最大化按钮和最小化按钮。注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。(2)在名称为Form1的窗体上画一个名称为Imagel的图像框,利用属性窗口装入考生目录下的图像文件picl.bmp,并设置适当属性使其中的图像可以适应图像框大小;再画两个命令按钮,名称分别为Command1、Command2,标题分别为“向右移动”、“向下移动”。请编写适当的事件过程,使得在运行时,每单击“向右移动”按钮一次,图像框向右移动100;每单击“向下移动”按钮一次,图像框向下移动100。运行时的窗体如图3.113所示。要求程序中不得使用变量,事件过程中只能写一条语句。注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
