题目
有一个工程文件ylc.vbp(相应的窗体文件名为ylc5.frm),在窗体上画一个名为List1的列表框和一个名为Text1的文本框。编写窗体的MouseDown事件。程序运行后,如果用鼠标左键单击窗体,则从键盘上输入要添加到列表框的项目;如果用鼠标右键单击窗体,则从键盘上输入要删除的项目,将其从列表中删除。程序的运行情况如图23所示。注意:存盘时必须存放在考生文件夹下,工程文件名为ylc5.vbp,窗体文件名为ylc5.frm。
第1题
在考生文件夹内(C:\ylc)有一个工程文件ylc.vbp。在窗体上有一个文本框,名字为Text1,以及两个命令按钮,名字分别为Command1和Command2,标题分别为Search和Save。还有一个函数过程Search(a),在程序中可以直接调用该函数,其功能为判断整型参数number是否为质数。如果是则返回True,否则返回False。编写一个事件过程,实现以下功能:运行时,在文本框内输入一个正整数。单击Search按钮后,找到小于该正整数的第一个素数,显示在 Text1中;单击“Save”,则把Text1中的计算结果存入考生文件夹下的out.txt文件中。程序运行后如图27所示。要求实现题目给出的功能,并将文件保存在考生文件夹下,工程文件名为 ylc.vbp。
第2题
在窗体上创建三个命令按钮,名称分别为Command1、Command2和Command3,标题分别为“导入数据”、 “字母转换”和“保存数据”,以及一个文本框,名称为Text1。编写事件过程,使得在运行时,单击“导入数据”按钮,从考生文件里读入data.txt文件(字母&空格),在Text1中显示。单击“字母转换”按钮,则把Text1中的所有大写字母转换成小写字母。单击“保存数据”按钮,存入out.txt文件中。程序运行后如图28所示。要求实现题目给出的功能,并将文件保存在考生文件夹下,工程文件名为ylc.vbp。
第3题
第4题
在考生文件夹中有一个工程文件execise58.vbp(相应的窗体文件名为execise58.frm)。在名为Form1的窗体卜有4个文本框,初始内容为空;一个命令按钮,标题为“降序排列”。功能是通过调用过程Sort将数组按降序排序。请装入该文件。程序运行后,在4个文本框中各输入一个整数,然后单击命令按钮,即可使数组按降序排序,并在文本框中显示出来 (如下图所示)。
本程序不完整,请补充完整,并能正确运行。
要求:
去掉程序中的注释符(“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
第5题
在考生文件夹下有一个工程文件execise23.vbp(相应的窗体文件为execise23.frm)。在名为Form1的窗体上有2个文本框,名称分别为Text1和Text2还有3个命令按钮,名称分别为Cmd1、Cmd2和Cmd3,标题分别为“读取”、“计算”和“保存”,如下图所示。
有一个函数过程isprime可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回True,否则返回False。编写适当的事件过程,使得在运行时,单击“读取”按钮,就把文件in23.txt中的整数放入Text1中;单击“计算”按钮,则找出大于Text1中的整数的第1个素数,并显示在Text2中;单击“保存”按钮,则把Text2中的计算结果存入out23.txt文件中。
注意:
考生不得修改isprime函数过程和控件的属性,必须把计算结果通过“保存”按钮存入 out23.txt文件中。
第6题
在考生文件夹下有一个工程文件execise44.vbp(相应的窗体文件为execise44.frm),在该工程中为考生提供了一个通用过程,考生可以直接调用。请在窗体上绘制一个名为 Text1的文本框;绘制一个名为Cmd1、标题为“计算”的命令按钮;再绘制两个单选按钮,名称分别为Opt1和Opt2、标题分别为“求100到500之间能被5整除的数之和”和“求 100到500之间能被9整除的数之和”,如下图所示。
编写适当的事件过程,使得在运行时,选中一个单选按钮,再单击“计算”按钮,就可以按照单选按钮后的文字要求计算,并把计算结果放入文本框中,最后把已经修改的工程文件和窗体文件以原来的文件名存盘。
注意:
考生不得修改窗体文件中已经存在的程序,退出程序时必须通过单击窗体右上角的“关闭”按钮。在结束程序运行之前,必须至少进行一种计算,否则不得分。
第7题
编写适当事件过程。选中一个单选按钮,并单击“确定”按钮,按照表3-1在文本框中显示相应的内容。
提供Command1对象的Click事件源代码如下,请补充完整。
Private Sub Command1_Click()
If ? Then
Text1.Text="需要1小时"
End If
If ? Then
Text1. Text="需要10小时"
End If
If ? Then
Text1. Text="需要20小时"
End If
If ? Then
Text1. Text="需要100小时"
End If
If ? Then
Text1.Text ="需要500小时"
End If
End Sub
注意:不得修改已经给出的程序。在结束程序运行之前,必须选择进行上面的一种操作.退出程序时必须通过单击窗体右上角的关闭按钮.存盘时必须存放在考生丈件夹下,工程文件名为ylc6.vbp,窗体文件名为ylc6.frm.
第8题
在考生文件夹中有一个工程文件execise119.vbp,相应的窗体文件为execise119.frm。
在名为Form1的窗体上有一个命令按钮(名称为Cmdl,标题为“求和”),其功能是产
生30个0~1000的随机整数,放入一个数组中,然后输出它们的和。程序运行后,单击
命令按钮,即可求出其和,并在窗体上显示出来,如下图所示。
本程序不完整,请补充完整,并能正确运行。
要求:
去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功
能,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
第9题
在考生文件夹下有一个工程文件execise120.vbp(相应的窗体文件名为execise120.frm)。窗体上有4个文本框,它们的初始内容为空:一个标题为“升序排列”的命令按钮,其功能是通过调用过程Sort将数组按升序排序。请装入该文件。程序运行后,在4个文本框中各输入一个整数,然后单击命令按钮,即可使数组按升序排序,并在文本框中显示出来(如下图所示),同时将其平均值在窗体标题上显示。
这个程序不完整,请把它补充完整,并能正确运行。
要求:
去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
第10题
注意:存盘时必须存放在考生文件夹下,工程文件名为ylc4.vbp,窗体文件名为ylc4.frm。
为了保护您的账号安全,请在“赏学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!