注意:
以上设置都只能在属性窗口中进行设置;文件必须存放在考生文件夹中,工程文件名为execise89.vbp,窗体文件名为execise89.frm。
第1题
中有8个元素。完成下列程序。
Private Sub OrderChange(a())
Dim i As Integer, Temp As Integer
For i = 1 To 4
Temp = a(i)
______
______
Next i
End Sub
第2题
下列程序用于判断一个整数是否为质数,试将程序补充完整。
Private Sub Command1_Click()
Dim n As Integer
n = InputBox("请输入")
t = Int(Sqr(n))
i = 2
flag = 0
While i <= t And flag = 0
If ______Then
flag = 1
Else: i = i + 1
End If
Wend
If ______Then
Print "这是一个质数"
Else
Print "这不是一个质数"
End If
End Sub
第3题
为Timer1的计时器。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。如下图所示的是程序刚启动时的情况。
注意:
程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为 exeeise85.vbp,窗体文件名为execise85.tim。
第4题
一个名称为Cmd1的命令按钮(标题为“开始倒计数”)和一个名称为 Timer1的计时器。请在窗体上绘制一个标签(名称为Lab1,标题为“请输入一个正整数”)、一个文本框(名称为Text1,初始内容为空白) (如下图所示)。已经给出了相应的事件过程。
程序运行后,在文本框中输入一个正整数,此时如果按回车键,则可使文本框中的数字每隔1秒减1(倒计数):当减到0时,倒计数停止,清空文本框,并把焦点移到文本框中。
要求:
去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其能正确运行,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
第5题
了所有控件。其功能是:单击“读入”命令按钮,则把考生目录下的 in32.txt文件中的所有英文字符放入Text1(可多行显示):如果单击“统计”命令按钮,则统计文本框中字母A、B、c、D各自出现的次数,并把结果在文本框中显示出来,如下图所示;如果单击“保存”命令按钮,则把统计结果存入考生文件夹下的out32.txt文件中。文件中已给出了“读入”和“保存”按钮的Click事件过程。请编写“统计”按钮的Click事件过程。
要求:
(1)统计每个字母出现的次数时,不区分大小写。
(2)统计后的每个字母的次数必须存入考生文件夹下的out32.txt文件中,否则没有成绩。在文件中的格式为:
字母A出现的次数为xx
字母B出现的次数为xx
字母C出现的次数为xx
字母D出现的次数为xx
注意:
不能修改已经给出的程序部分:在结束程序运行之前,必须单击“保存”按钮,把结果存入out32.txt文件,否则无成绩。最后把修改后的文件按原文件名存盘。
第8题
标签Lab1和Lab2,标题分别为“密码”和“允许次数”;一个命令按钮Cmd1:标题为“确定”;两个文本框名称分别为Text1和Text2。其中Text1用来输入密码(输入时,显示“*”),无初始内容,Text2的初始内容为3。已给出了Cmd1的事件过程,但不完整,要求去掉程序中的注释符“'”,把程序中的问号“?”改为正确内容,使得在运行时,在Text1中输入密码后,单击“确定”按钮,如果输入的是“abcdef”则在Text1中显示“密码正确”;如果输入其他内容,单击“确定”后,弹出如下图所示的错误提示对话框,并且Text2中的数字减1。最多可输入3次密码,若3次都输入错误,则禁止再次输入。
注意:
不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
第9题
体上有4个文本框,初始内容为空;1个命令按钮,标题为“求Min”。功能是通过调用过程FindMin求数组的最小值,请装入该文件。程序运行后,在4个文本框中各输入一个整数,然后单击命令按钮,即可求出数组的最小值,并在窗体上显示出来,如下图所示。
本程序不完整,请补充完整,并能正确运行。
要求;
去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
第10题
框、2个框架和3个命令按钮,在每个框架中各有3个单选按钮,所有控件已经画出。本题要求:程序启动时文本框的默认文字为Input,默认的字体为“宋体”,字号为五号;程序运行过程中可以修改文本框的内容;在单击Init按钮时恢复启动时的状态;在单击Clear按钮后,文本框的内容为空,并恢复默认的字体、字号;选择相应的字体和字号可以设置文本框内文字的字体和属性。如下图所示。
本程序不完整,请补充完整,并能正确运行。
要求:
去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!