问答题在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、lblTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txtTel和txtPost,初始内容均为空白,如图3-36所示。程序运行后,如果单击“显示第三个记录”命令按钮,则读取考生文件夹下in5.txt文件中的第三个记录,将该记录的三个字段分别显示在三个文本框中(该文件是一个用随机存取方式建立的文件,共有5个记录)。单击“保存”按钮,则把该记录(三个字段)保存到考生文件夹下的顺序文件out5.txt中。请编写“显示第三个记录”按钮的Click事件过程,以实现上述功能。注意:考生不得修改已经存在的程序,必须用“保存”按钮存储结果,否则无成绩。最后,按原文件名把程序存盘。程序源码:PrivateTypePalTypeNameAsString*8TelAsString*10PostAsLongEndType考生编写如下事件过程中的程序(icmdDisplay—Click)PrivateSubcmdDisplay—Click()EndSubPrivateSubcmdSaveClick()Open”out5.txt”ForOutputAs#1Print#1,txtName.Text,txtTe1.Text,txtPost,Textclose1EndSub
问答题注意:下面出现的“考生文件夹”均为c:/wexam/25160001。(1)在考生文件夹中有工程文件sjt3.vbp及其窗体文件sjt3.frm,该程序是不完整的。请在有?号的地方填入正确内容,然后删除?及所有注释符(即'号)但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下:在窗体上有3个名称分别为Text1、Text2和Text3的文本框,一个名称为C1,标题为“计算”的命令按钮,如图4-4所示。要求程序运行后,在Text1和Text2中分别输入两个整数,单击“计算”按钮后,可把两个整数之间的所有整数(含两个整数)累加起来并在Text3中显示。(2)在窗体上建立一个名称为Text1的文本框,建立一个名称为Cmd1,标题为“计算”的命令按钮,如图4-5所示。要求程序运行后,如果单击“计算”按钮,则求出100-200之间所有可以被3整除的数的总和,在文本框中显示出来,并把结果存入考生文件夹下的out.txt文件中。(在考生的文件夹下有一个mode.bas标准模块,该模块中提供了保存文件的过程putdata,考生可以直接调用。)注意:保存时必须存放在考生文件夹下,窗体文件名为sjt4.frm。工程文件名为sjt4.vbp,结果存入out.txt文件。
问答题在考生文件央下有一个工程文件sjt5.vbp,功能是用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是:a
2
+b
2
=c
2
。例如,3、4、5就是一个满足条件的整数组合(注意:a.b,c分别为4,3,5与分别为3,4,5被视为同一个组合,不应该重复计算)。编写程序,统计均在60以内的三个数满足上述关系的整数组合的个数,并显示在标签Label1中。
注意:不得修改原有程序的控件属性。在结束程序运行之前,必须至少正确运行一次程序,将统计的结果显示在标签中,否则无成绩。最后把修改后的文件按原文件名存盘。
问答题请在名称为Form1的窗体上添加一个名称为H1的水平滚动条,并在属性窗口中设置它的属性值,使其满足下列要求:它的最小刻度值为1,最大刻度值为100,在程序运行时,用鼠标单击滚动条上滚动框以外的区域(不包括两边按钮),滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1和L2的标签,并分别显示1和100,运行时的窗体如图所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
问答题在考生文件夹中有工程文件Sjt3.vbp及其窗体文件sjt3.frm,该程序是不完整的,请在有“?”号的地方填入正确内容,然后删除“?”及所有注释符(即“'”号),但不能修改其他部分。存盘时不得改变文件名和文件夹。 本题描述如下。 在窗体上有一个列表框,名称为Ljst1,一个文本框,名称为Text1,和一个命令按钮,名称为C1,标题为“复制”。要求程序运行后,在列表框中自动建立4个列表项,分别为“Item1”、“Item2”、“Item3”、“Item4”如果选择列表框中的一项,则单击“复制”按钮时,可以把该项复制到文本框中,如图11-10所示。
问答题在名称为Form1的窗体上画一个图片框,其名称为Picture1,一个水平滚动条,名称为HScroll1,一个命令按钮,名称为Command1,标题为“设置属性”,通过属性窗口在图片框中装入一个图形(文件名为pic1.jpg,位于考生目录下),图片框的高度与图形的高度相同,图片框的宽度任意(如图1所示)。编写适当的事件过程,程序运行后,如果单击命令按钮,则设置水平滚动条的属性如下:Min100Max1500LargeChange100SmallChange10之后就可以通过移动滚动条上的滚动块来放大或缩小图片框。程序运行后的窗体如图2所示。要求程序中不得使用任何变量。注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
问答题以下数列:1,1,2,3,5,8,13,21…的规律是从第3个数开始,每个数都是其前面两个数之和。在考生文件夹下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如下图所示。请编写适当的事件过程完成如下功能:选中一个单选按钮后,单击“计算”按钮,则计算出上述数列第n项的值,并在文本框中显示,n是选中的单选按钮后面的数值(提示:因计算结果较大,应使用长整型变量)。注意:不能修改已经给出的程序和已有的控件的属性;在结束程序运行之前,必须选中一个单选按钮,并单击“计算”按钮以获得一个结果;必须使用窗体右上角的关闭按钮结束程序,否则无成绩。最后把修改后的文件按原文件名存盘。
问答题在考生文件夹中有一个工程文件vbsj5.vbp(相应的窗体文件为vbsj5.frm)。窗体Form1上有两个名称为Lab1和Lab2的标签,它们的标题分别为“密码”和“允许次数”;一个名称为Cmd1的命令按钮,其标题为“确定”;两个名称分别为Txt1和Txt2的文本框。其中Txt1用来输入密码(输入时显示“*”),无初始内容,Txt2的初始内容为3。已给出了Cmd1的事件过程,但不完整,要求去掉程序中的注释符“'”,把程序中的问号“?”改为正确内容,使得在运行时,在Txt1中输入密码后,单击“确定”按钮,如果输入的是“123456”,则在Txt1中显示“密码正确”如图3—66所示;如果输入其他内容,单击“确定”后,弹出如图3—67所示的错误提示对话框,并且Txt2中的数字减1。最多可输入3次密码,若3次输入错误,则禁止再次输入。程序源码:PrivateSubCmd1_Click()'If?="123456"ThenTxt1.Text="密码正确"'Txt1.?=""ElseTxt2.Text=Txt2.Text-1'IfTxt2.Text>?ThenMsgBox"第"&(3-Txt2.Text)&"次密码错误,请重新输入"ElseMsgBox"3次输入错误,请退出"'Txt1.Enabled=?EndIfEndIfEndSub
问答题新建一个工程,要求实现的功能是,在窗体中实现从左向右动态显示“为人民服务”这几个字。字符串以0.1秒一次的速度移动。程序运行情况如图7所示。程序中不得使用任何变量。注意:存盘时必须存放在考生文件夹下,工程文件名为ylc3.vbp,窗体文件名为ylc3.frm.
问答题在考生文件夹下有一个工程文件sjt4.vbp。请在窗体上添加一个组合框,名称为cb1,并输入3个列表项:“3”、“7”、“11”(列表项的顺序不限,但必须是这3个数字);添加一个名为Text1的文本框;再添加一个标题为“计算”、名称为C1的命令按钮,如图所示。请编写适当的事件过程,使得在程序运行时,在组合框中选定一个数字后,单击“计算”按钮,则计算5000以内能够被该数整除的所有数之和,并放入Text1中。最后,按原文件名存盘。 提示:由于计算结果较大,应使用长整型变量。 注意:考生不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须至少进行一次计算。并且必须用窗体右上角的关闭按钮结束程序,否则无成绩。
问答题在窗体上画一个列表框,名称为List1,通过属性窗口向列表框中添加3个项目,分别为“Iterm1、“Iterm2”和“Item3”。编写适当的事件过程。使程序运行后,如果双击Form1空白处.则清空列表框中的内容。程序运行时窗体界面如下图左图和下图右图所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sj1.vbp,窗体文件名为sj1.frm。
问答题注意:下面出现的“考生文件夹”均为c:/wexam/25160001。去掉程序中的注释符,把程序中的?改为正确的内容,使其实现下述功能,但不能修改程序中的其他部分。在窗体上有三个菜单(名称分别为Read、Calc和Save,标题分别为“读入数据”、“计算并输出”和“存盘”),还有一个文本框(名称为Text1,MultiLine属性设置为True,ScrollBars属性设置为2),如图22-8所示。程序运行后,如果执行“读入数据”命令,则读入datain1.txt文件中的100个整数,放入一个数组中,数组的下界为1;如果单击“计算并输出”按钮,则把该数组中可以被3整除的元素在文本框中显示出来,求出它们的和,并把所求得的和在窗体上显示出来;如果单击“存盘”按钮,则把所求得的和存入考生文件夹下的dataout.txt文件中。在考生文件夹下有一个工程文件sjt5.vbp,窗体文件中的ReadData过程可以把datain1.txt文件中的100个整数读入Arr数组中;而WriteData过程可以把指定的整数值写到考生文件夹下指定的文件中(整数值通过计算求得,文件名为dataout.txt)。注意:考生不得修改窗体文件中已经存在的程序。存盘时,工程文件名仍为sjt5.vbp,窗体文件名仍为sjt5.frm。
问答题在考生文件夹下有一个工程文件sjt5.vbp,其窗体上添加有两个名称分别为Text1、Text2的文本框,其中Text1中MutiLine属性为True。请添加两个名称为Command1、Command2,标题分别为“产生数组”、“查找”的命令按钮,如图所示。程序功能如下:①单击“产生数组”按钮,则用函数生成10个0一100范围内(不含0和100)互不相同的随机数值,并将它们保存到一维数组a中,同时将这10个数值显示在Text1文本框内。②单击“查找”按钮将弹出输入对话框,接收用户输入的任意一个数,并在一维数组a中查找该数,若查找失败,则在Text2文本框内显示该数“不存在于数组中”;否则显示该数在数组中的位置。要求:请去掉程序中的注释符,把程序中的“?”改为正确内容,使其实现上述功能,但是不能修改窗体文件中已经存在的控件和程序,最后将修改后的文件按原文件名进行存盘。
问答题在窗体上有一个名为Label1的标签控件和3个单选按钮,均没有标题,请利用“属性”窗口为单选按钮依次添加标题为“汉语”、“英语”、“德语”;再添加一个标题为“输出”的命令按钮,如下图所示。程序的功能是:运行时,如果选中一个单选按钮后,单击“输出”按钮,则根据单选按钮的选中情况,在Label显示“我的母语是汉语”、“我的母语是英语”或“我的母语是德语”。要求:依次添加单选按钮标题为“汉语”、“英语”、“德语”;设初始选中的是“汉语”,添加命令按钮标题为“输出”;去掉程序中的注释符“"”,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的其他属性。最后把修改后的文件按sj3.vbp和sj3.frm文件名存盘。
问答题在考生文件夹下自一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大十2的偶数,并单击“分解为”命令按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时可以分解为多种素数的组合,例如24可以分解为5和19,也町以分解为11和13,要求取含有最小素数的组合,如图所示)。要求编写“分解为”命令按钮事件过程中“考生编写程序开始”和“考生编写程序结束”之间的代码,以实现上述功能。过程IsPrime用来判断一个数是否为素数,如果是,返回值为True,否则返回值为False。注意:不得修改原有程序和控件的属性。至少正确运行一次程序,且程序运行时在文本框中输入23456,单击“分解为”按钮,将结果显示在标签中,否则将没有成绩,最后将修改后的文件按原文件名存盘。
问答题在考生文件夹下有一个工程文件sjt5.vbp,窗体如图3.82所示。运行程序时,从数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,并统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框中。结束程序之前,必须单击“保存”按钮,保存统计结果。注意:不能修改程序的其他部分和控件属性。程序调试通过后,运行程序,将统计结果显示在文本框中,再按“保存”按钮保存数据,否则无成绩。最后把修改后的文件按原文件名存盘。
问答题(1)在名称为Form1的窗体上添加三个单选按钮,其名称分别为Option1、Option2和Option3(如图1所示),然后通过属性窗口设置窗体和单选按钮的属性,实现如下功能:①窗体标题为“设置单选按钮属性”;②三个单选按钮的标题分别为“按钮1”、“按钮2”和“按钮3”;③初始状态为,第一个单选按钮为“选中”;④程序运行后,第二个单选按钮“不可用”;⑤程序运行后,第三个单选按钮不可见。程序的运行情况如图2所示。要求:不编写任何代码。注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。(2)在名称为Form1的窗体上画一个垂直滚动条和一个命令按钮,其名称分别为VScrolll和Commandl.编写适当的事件过程。程序运行后,如果单击命令按钮,则按如下要求设置垂直滚动条的属性:Max=窗体高度Min=0LargeChange=50SmallChange=10如果移动垂直滚动条的滚动框,则在窗体上显示滚动框的刻度值。程序的运行情况如图所示。要求:不得使用任何变量。注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
问答题在考生文件夹下有一个工程文件sjt4.vbp。窗体上有名称为Timer1的计时器控件和名称为Label1的标签。该程序的功能是在名称为Label1的标签中循环显示不同的内容。程序开始运行,在标签中显示“第一项”(如图所示),且每隔1秒钟依次显示“第二项”、“第三项”、“第四项”,如此循环。在给出的窗体文件中已经有了全部控件和程序,但程序不完整,要求去掉程序中的注释符,把程序中的?改为正确的内容。注意:不能修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。
问答题在考生文件夹中有工程文件sjt5.vbp及其窗体文件sjt5.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即'号)但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下:在名称为Form1的窗体上有一个文本框,名称为Text1,MultiLine属性为True,ScrollBars属性为2;两个命令按钮,名称分别为Cmd1和Cmd2,标题分别为“读入数据”和“计算保存”,如图2-6所示。要求程序运行后,如果单击“读入数据”按钮,则读入“in.txt”文件中的100个整数,放入一个数组中(数组下界为1),同时在文本框中显示出来;如果单击“计算保存”按钮,则计算数组中大于或等于400并且小于800的所有数之和,把求和结果在文本框Text1中显示出来,同时把结果存入考生文件夹中的文件result.txt中。(在prog.bas中的putdata过程可以把结果存入result.txt文件)。注意:文件必须存放在考生文件夹下,窗体文件名为sjt5.frm,工程文件名为sjt5.vbp,计算结果存入result.txt文件中,否则没有成绩。
问答题在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个名称为Textl的文本框数组,下标从0开始。程序运行时,单击“产生随机数”按钮,就会产生10个3位数的随机数,并放入Textl数组中,如图3-115(a)所示;单击“重排数据”按钮,将把Text1中的奇数移到前面,偶数移到后面,如图3.115(b)所示。文件中已经给出了所有控件和部分程序。要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,不能修改程序的其他部分和控件属性,最后把修改后的文件按原文件名存盘。提示:在“重排数据”按钮的事件过程中有对其算法的文字描述,请仔细阅读。
