分析:
变量amin中存放的是最小分数值。
程序改错题2得分:
1.窗体Form2.frm中程序的功能是:
将任意字符串按逆序输出。
如:
输入的字符串是“1234”,输出字符串为“4321”。
2.程序有2处错误,错误均在"'*ERROR*"注释行,请直接在该行修改。
不得增加或减少程序行数,也不得删除或修改错误标记'*ERROR*。
PrivateSubForm_Click()
Dims1AsString,s2AsString,nAsInteger
s1=InputBox("请输入一个字符串")
Print"原字符串为:
";s1
s2=0'*ERROR*
n=Len(s1)
DoWhilen>=1
s2=s2&Mid(s1,n,1)
n=n+1'*ERROR*
Loop
Print"逆序字符串为:
";s2
EndSub
参考答案:
*ERROR1*s2=""
*ERROR2*n=n-1
Windows操作题得分:
请在考生文件夹中进行以下操作:
1.将文件夹year下的文件light.wps改名为lamp.wps;
2.将文件夹year下的子文件夹paper删除;
3.在文件夹address下新建一个文本文档myself.txt;
4.将文件夹group下的文件time.wri删除;
5.将文件夹group下的文件check.xls复制到文件夹address中。
综合应用题1得分:
在考生文件夹中,完成以下要求:
1.启动工程文件Sjt.Vbp,将该工程文件的工程名称改为“Spks”,并将该工程中的窗体文件Sjt.frm的窗体名称改为“Vbbc”,窗体的标题为“VB控件”。
2.在窗体上添加以下控件:
一个标签Label1,标题为“请输入一个自然数”,自动调整大小;一个文本框Text1;一个命令按钮Command1,标题为“添加”;一个列表框List1。
3.编写代码实现:
程序运行时,在文本框中输入一个自然数,单击“添加”按钮时,首先清除列表框中的内容,然后在列表框中列出小于等于该自然数并且大于0的所有偶数。
运行效果如下图所示:
4.请先调试、运行,然后将工程、窗体保存。
参考代码如下:
PrivateSubCommand1_Click()
DimxAsInteger,iAsInteger
List1.Clear
x=Val(Text1.Text)
Fori=1Tox
IfiMod2=0Then
List1.AddItemi
EndIf
Next
EndSub
综合应用题2得分:
在考生文件夹的\综合应用题2\文件夹中建立一个名称为“Vbcd”的工程文件Menu1.Vbp,并在工程中建立一个名称为“Menu1”的菜单窗体文件Menu1.frm,要求在其中:
1.建立菜单,格式与内容如下:
文件(F)数据处理
打开计算
──────
退出Ctrl+X
其中,括号内的字符为热键;
分隔条的名称为FGT,其它菜单和子菜单的名称与标题相同,但不含热键;
Ctrl+X:
设置为快捷键。
2.将考生文件夹内“综合应用题1”下的窗体文件sjt.frm添加进本工程。
3.除“计算”菜单项的Click()事件调用sjt.frm窗体,“退出”菜单项的Click()事件执行End语句,其它菜单和子菜单不执行任何操作。
4.调试运行并生成可执行程序:
Menu1.exe。
操作步骤如下:
1.进入VB编程环境,建立一新工程,将该工程在考生文件夹中的\综合应用题2\中另存为Menu1.Vbp,工程名改为Vbcd,窗体名改为Menu1,窗体文件名改为Menu1.frm。
请注意:
一定要把新建的工程文件和窗体文件保存在考生文件夹中的\综合应用题2\中!
!
模拟时考生文件夹在c盘;考试时,考生文件夹在k盘。
考生文件夹名是考生准考证号。
2.单击“工具”菜单的“菜单编辑器”命令,打开“菜单编辑器”窗口。
3.在“标题”栏中输入菜单项的标题“文件(&F)”,在“名称”栏中输入菜单项的名称“文件”。
4.单击“下一个”按钮,再单击“→”按钮,使用与步骤3相似的方法输入下级菜单项“打开”;使用类似的操作,输入如下所示的菜单:
文件(F)数据处理
打开计算
──────
退出Ctrl+X
5.说明:
在“退出”菜单项的“快捷键”下拉列表框中选择“Ctrl+X”。
6.单击“工程”菜单的“添加窗体”命令,将考生文件夹下的“sjt.frm”文件添加到本工程。
7.添加如下所示的菜单事件过程代码:
PrivateSub退出_Click()
End
EndSub
PrivateSub计算_Click()
loadvbbc
vbbc.show
EndSub
8.调试运行并保存工程,然后单击“文件”菜单的“生成Menu1.exe”命令,生成可执行程序:
Menu1.exe。
2016VB模拟题第2套
单项选择题
1:
下列关于计算机的叙述中,正确的是__B____。
A.计算机的主机只包括CPU
B.计算机最主要的工作特点是存储程序与自动控制
C.计算机必须具有硬盘才能工作
D.内存和外存中的数据均可由CPU直接读取
2:
计算机系统中的1个字节由______B__位二进制数组成。
A.2B.8C.16D.32
3:
将文件从本地计算机传输到FTP服务器的过程称为_____A_。
A.上传
B.浏览
C.查找
D.下载
4:
为了防止计算机感染病毒,较好的做法是_____A_。
A.不打开来历不明的电子邮件
B.无病毒的U盘不要与有病毒的U盘放在一起
C.经常对磁盘进行格式化
D.安装多个操作系统
5:
企业使用的财务管理系统属于计算机应用中的__C_____。
A.科学计算
B.实时控制
C.数据处理
D.人工智能
6:
以下文件类型不属于VisualBasic系统的是_____C___。
A..FrmB..BasC..CppD..Vbp
7:
一个新建的VisualBasic工程,工具箱中不会出现的控件是___C___。
A.单选按钮
B.图片框
C.通用对话框
D.文本框
8:
在赋值语句Text1.Text="确定"中,Text1、Text、"确定"分别代表____A___。
A.对象、属性、值
B.对象、方法、属性
C.对象、值、属性
D.属性、对象、值
9已知a="12345678",则表达式Mid(a,3,2)+Right(a,2)的值是_____B_。
A."23478"B."3478"C.312D.112
10:
下列正确的赋值语句是______A_。
A.Z=B*B-4*C
B.S/4=R*R
C.X-Y=2.17
D.4Z=Y+38
11:
在VisualBasic中,若要强制变量必须先定义才能使用,应该用_____B__语句说明。
A.PublicConst
B.OptionExplicit
C.Type数据类型名
D.DefDbl
12:
下列各项不是VisualBasic基本数据类型的是______C__。
A.LongB.StringC.DimD.Single
13:
用十六进制表示VisualBasic的整型常数时,前面要加上的符号是__A_____。
A.&HB.&OC.HD.O
14:
数学表达式3≤x<10在VisualBasic中的逻辑表达式为____B__。
A.3<=x<10
B.3<=xAndx<10
C.x>=3Orx<10
D.3<=xAnd<10
15:
下列表达式返回值不是-3的是___C___。
A.Fix(-3.14)
B.Round(-3.14,0)
C.Int(-3.14)
D.Val("-3ab")
16:
执行语句x=InputBox("您好!
",1,"2013"),所产生的对话框的标题是_______D_。
A.您好!
B.2013C.0D.1
17:
下列语句不合法的是__D______。
A.x=1:
y=2
B.Printx;y;
C.Printx,y,
D.x=1;y=2
18:
声明变量n为整型,单精度变量x=1.1,则执行语句n=3*x后,n的值是______A。
A.3B.3.3C.3.5D.4
19:
随机产生区间[1,6]的一个整数的表达式为______A__。
A.Int(Rnd*6+1)
B.Int(Rnd*6)
C.Int(Rnd*7)
D.Int(Rnd(6)+1)
20:
表达式2^3*10/4Mod6\2的值是______B。
A.1B.2C.3D.4
21:
以下关系表达式中,其值为False的是____A____。
A."ABC">"AbC"
B."the"<>"they"
C."VISUAL"=UCase("Visual")
D."Integer">"Int"
22:
一条语句要分行书写,需用的续行符是_____c___。
A.,B.+C._D.:
23:
若x=10,则执行语句IfxThenx=1Elsex=-1后,x的值是____c___。
A.实时错误B.编译错误C.1D.-1
24:
以下关于窗体的描述中,错误的是_____b___。
A.执行UnloadForm1语句后,窗体Form1消失,但仍在内存中
B.窗体的Load事件在加载窗体时发生
C.当窗体的Enabled属性为False时,通过鼠标和键盘对窗体的操作都被禁止
D.执行Form1.Hide语句后,窗体Form1消失,但仍在内存中
25:
执行语句Label1.Left=Label1.Left+100后,标签Label1将____b__。
A.左移B.右移C.上移D.下移
26:
下面程序的输出结果是_____d__。
Fori=1To10Step3
s=s+i
Nexti
Printi
A.10B.11C.12D.13
27:
改变单选按钮的_____c___属性值可改变其是否选中的状态。
A.EnabledB.CaptionC.ValueD.Index
28:
如果每秒产生5个Timer事件,那么时钟控件的Interval属性应设为_____b_。
A.100B.200C.500D.1000
29:
以下叙述错误的是_____d___。
A.滚动条的重要事件是Change和Scroll
B.框架的主要作用是将控件对象进行分组,以完成各自相对独立的功能
C.组合框是组合了文本框和列表框的特性而形成的一种控件
D.计时器控件可以通过对Visible属性的设置,在程序运行时显示在窗体上
30:
下面关于图像框与图片框控件的描述错误的是_____a___。
A.两者都支持Print方法
B.两者都有Picture属性
C.两者都可以用LoadPicture函数把图形文件装入控件中
D.两者都能在属性窗口装入图形文件,也都能在程序运行期间装入图形文件
31:
窗体上有一