1以下叙述中错误的是Visual.docx
《1以下叙述中错误的是Visual.docx》由会员分享,可在线阅读,更多相关《1以下叙述中错误的是Visual.docx(26页珍藏版)》请在冰豆网上搜索。
1以下叙述中错误的是Visual
一、选择题
(1)以下叙述中错误的是VisualBasic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性
(2)以下叙述中错误的是在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件
(3)以下叙述中错误的是窗体或控件的事件的名称可以由编程人员确定
(4)以下不属于VisualBasic系统的文件类型是.bat
(5)以下叙述中错误的是VisualBasic应用程序只能以解释方式执行
(6)以下能正确定义数据类型TelBook的代码是TypeTelBook
(7)以下声明语句中错误的是Dimvar2='ABC'
(8)设窗体上有一个列表框控件List1,且其中含有若干列表项。
则以下能表示当前被选中的列表项内容的是List1.Text
(9)程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是Load
(10)设a=10,b=5,c=1,执行语句Printa>b>c后,窗体上显示的是False
(11)如果要改变窗体的标题,则需要设置的属性是Name
(12)以下能判断是否到达文件尾的函数是EOF
(13)如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是如果工程中含有SubMain过程,则程序一定首先执行该过程
(14)窗体的MouseDown事件过程
Form_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)
有4个参数,关于这些参数,正确的描述是通过Button参数判定当前按下的是哪一个鼠标键
(15)设组合框Combo1中有3个项目,则以下能删除最后一项的语句是Combo1.RemoveItem2
(16)以下关于焦点的叙述中,错误的是如果文本框的TabStop属性为False,则不能接收从键盘上输入的数据
(17)如果要在菜单中添加一个分隔线,则应将其Caption属性设置为-
(18)执行语句Open"Tel.dat"ForRandomAs#1Len=50后,对文件Tel.dat中的数据能够执行的操作是
既可以读,也可以写
(19)在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框,然后编写如下事件过程:
PrivateSubCommand1_Click()
n=Text1.Text
SelectCasen
Case1To20
x=10
Case2,4,6
x=20
CaseIs<10
x=30
Case10
x=40
EndSelect
Text2.Text=x
EndSub
程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的内容是10
(20)设有以下循环结构
Do
循环体
LoopWhile<条件>
则以下叙述中错误的是若"条件"是一个为0的常数,则一次也不执行循环体
(21)在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
DimnumAsInteger
num=1
DoUntilnum>6
Printnum;
num=num+2.4
Loop
EndSub
程序运行后,单击命令按钮,则窗体上显示的内容是135
(22)在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
DimaAsInteger,sAsInteger
a=8
s=1
Do
s=s+a
a=a-1
LoopWhilea<=0
Prints;a
EndSub
程序运行后,单击命令按钮,则窗体上显示的内容是97
(23)设有如下通用过程:
PublicFunctionf(xAsInteger)
DimyAsInteger
x=20
y=2
f=x*y
EndFunction
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
StaticxAsInteger
x=10
y=5
y=f(x)
Printx;y
EndSub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是20
(24)设有如下通用过程:
PublicSubFun(a(),ByValxAsInteger)
Fori=1To5
x=x+a(i)
Next
EndSub
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下的事件过程:
PrivateSubCommand1_Click()
Dimarr(5)AsVariant
Fori=1To5
arr(i)=i
Next
n=10
CallFun(arr(),n)
Text1.Text=n
EndSub
程序运行后,单击命令按钮,则在文本框中显示的内容是10
(25)在窗体上画一个名称为Command1的命令按钮,然后编写如下代码:
OptionBase1
PrivateSubCommand1_Click()
d=0
c=10
x=Array(10,12,21,32,24)
Fori=1To5
Ifx(i)>cThen
d=d+x(i)
c=x(i)
Else
d=d-c
EndIf
Nexti
Printd
EndSub
程序运行后,如果单击命令按钮,则在窗体上输出的内容为23
(26)在窗体上画两个滚动条,名称分别为Hscroll1、Hscroll2;六个标签,名称分别为Label1、Label2、Label3、Label4、Label5、Label6,其中标签Label4~Label6分别显示"A"、"B"、"A*B"等文字信息,标签Label1、Label2分别显示其右侧的滚动条的数值,Label3显示A*B的计算结果。
如图所示。
当移动滚动框时,在相应的标签中显示滚动条的值。
当单击命令按钮"计算"时,对标签Label1、Label2中显示的两个值求积,并将结果显示在Label3中。
以下不能实现上述功能的事件过程是PrivateSubCommand1_Click()
Label3.Caption=HScroll1.Text*HScroll2.Text
EndSub
(27)在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
Forn=1To20
IfnMod3<>0Thenm=m+n\3
Nextn
Printn
EndSub
程序运行后,如果单击命令按钮,则窗体上显示的内容是21
(28)在窗体上画一个名称为Text1的文本框,并编写如下程序:
PrivateSubForm_Load()
Show
Text1.Text=""
Text1.SetFocus
EndSub
PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)
Print"程序设计"
EndSub
PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger)
Print"VisualBasic";
EndSub
程序运行后,如果按"A"键,然后单击窗体,则在窗体上显示的内容是VisualBasic程序设计
(29)设有如下程序:
PrivateSubCommand1_Click()
DimsumAsDouble,xAsDouble
sum=0
n=0
Fori=1To5
x=n/i
n=n+1
sum=sum+x
Next
EndSub
该程序通过For循环计算一个表达式的值,这个表达式是1/2+2/3+3/4+4/5
(30)以下有关数组定义的语句序列中,错误的是
DimnAsInteger
PrivateSubCommand4_Click()
Dimarr4(n)AsInteger
......
EndSub
(31)下列叙述中正确的是程序经调试改错后还应进行再测试
(32)下列数据结构中,能用二分法进行查找的是顺序存储的有序线性表
(33)下列关于栈的描述正确的是栈是特殊的线性表,只能在一端插入或删除元素
(34)下列叙述中正确的是
一个逻辑数据结构可以有多种存储结构,且各种存储结构影响数据处理的效率
(35)下列描述中正确的是软件工程的主要思想是强调在软件开发过程中需要应用工程化原则
(36)在软件设计中,不属于过程设计工具的是DFD图
(37)下列叙述中正确的是软件交付使用后还需要进行维护
(38)数据库设计的根本目标是要解决数据共享问题
(39)设有如下关系表:
RST
ABCABCABC
112313112
223223
313
则下列操作中正确的是T=R∪S
(40)数据库系统的核心是数据库管理系统
(41)假定一个VisualBasic应用程序由一个窗体模块和一个标准模块构成。
为了保存该应用程序,以下正确的操作是分别保存窗体模块、标准模块和工程文件
(42)为了清除窗体上的一个控件,下列正确的操作是选择(单击)要清除的控件,然后按Del键
(43)以下叙述中错误的是
VisualBasic应用程序只能以解释方式执行
(44)设a=2,b=3,c=4,d=5,下列表达式的值是False
Nota<=cOr4*c=b^2Andb<>a+c
(45)设a=5,b=10,则执行
c=Int((b-a)*Rnd+a)+1
后,c值的范围为6~10
(46)在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:
PrivateSubCommand1_Click()
a$="softwareandhardware"
b$=Right(a$,8)
c$=Mid(a$,1,8)
MsgBoxa$,,b$,c$,1
EndSub
运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是hardware
(47)在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程:
PrivateSubCommand1_Click()
a=InputBox("Enteraninteger")
b=InputBox("Enteraninteger")
Text1.Text=b+a
EndSub
程序运行后,单击命令按钮,如果在输入对话框中分别输入8和10,则文本框中显示的内容是108
(48)在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:
PrivateSubForm_Load()
Show
Text1.Text=""
Text2.Text=""
Text1.SetFocus
EndSub
PrivateSubText1_Change()
Text2.Text=Mid(Text1.Text,8)
EndSub
程序运行后,如果在文本框Text1中输入BeijingChina,则在文本框Text2中显示的内容是China
(49)在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程:
PrivateSubForm_Load()
List1.AddItem"Item1"
List1.AddItem"Item2"
List1.AddItem"Item3"
EndSub
PrivateSubCommand1_Click()
List1.List(List1.ListCount)="AAAA"
EndSub
程序运行后,单击命令按钮,其结果为把字符串“AAAA”添加到列表框的最后(即“Item3”的后面)
(50)假定有如下事件过程:
PrivateSubForm_Click()
DimxAsInteger,nAsInteger
x=1
n=0
DoWhilex<28
x=x*3
n=n+1
Loop
Printx,n
EndSub
程序运行后,单击窗体,输出结果是814
(51)有如下程序:
PrivateSubForm_Click()
DimCheck,Counter
Check=True
Counter=0
Do
DoWhileCounter<20
Counter=Counter+1
IfCounter=10Then
Check=False
ExitDo
EndIf
Loop
LoopUntilCheck=False
PrintCounter,Check
EndSub
程序运行后,单击窗体,输出结果为10False
(52)有如下程序:
PrivateSubForm_Click()
DimiAsInteger,sumAsInteger
sum=0
Fori=2To10
IfiMod2<>0AndiMod3=0Then
sum=sum+i
EndIf
Nexti
Printsum
EndSub
程序运行后,单击窗体,输出结果为12
(53)在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
Dimarray1(10,10)AsInteger
DimiAsInteger,jAsInteger
Fori=1To3
Forj=2To4
array1(i,j)=i+j
Nextj
Nexti
Text1.Text=array1(2,3)+array1(3,4)
EndSub
程序运行后,单击命令按钮,在文本框中显示的值是12
(54)在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:
PrivateSubCommand1_Click()
Dima1(4,4),a2(4,4)
Fori=1To4
Forj=1To4
a1(i,j)=i+j
a2(i,j)=a1(i,j)+i+j
Nextj
Nexti
Printa1(3,3);a2(3,3)
EndSub
程序运行后,单击命令按钮,在窗体上输出的是612
(55)有如下程序:
OptionBase1
PrivateSubForm_Click()
Dimarr,Sum
Sum=0
arr=Array(1,3,5,7,9,11,13,15,17,19)
Fori=1To10
Ifarr(i)/3=arr(i)\3Then
Sum=Sum+arr(i)
EndIf
Nexti
PrintSum
EndSub
程序运行后,单击窗体,输出结果为27
(56)在窗体上画一个命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
Dima(5)AsString
Fori=1To5
a(i)=Chr(Asc("A")+(i-1))
Nexti
ForEachbIna
Printb;
Next
EndSub
程序运行后,单击命令按钮,输出结果是ABCDE
(57)以下关于函数过程的叙述中,正确的是
函数过程形参的类型与函数返回值的类型没有关系
(58)函数过程F1的功能是:
如果参数b为奇数,则返回值为1,否则返回值为0。
以下能正确实现上述功能的代码是
FunctionF1(bAsInteger)
IfbMod2=0Then
F1=0
Else
F1=1
EndIf
EndFunction
(59)以下关于KeyPress事件过程中参数KeyAscii的叙述中正确的是
KeyAscii参数是所按键的ASCII码
(60)设窗体上有一个名为Text1的文本框,并编写如下程序:
PrivateSubForm_Load()
Show
Text1.Text=""
Text1.SetFocus
EndSub
PrivateSubForm_MouseUp(ButtonAsInteger,_
ShiftAsInteger,XAsSingle,YAsSingle)
Print"程序设计"
EndSub
PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger)
Print"VisualBasic";
EndSub
程序运行后,如果在文本框中输入字母“a”,然后单击窗体,则在窗体上显示的内容是VisualBasic程序设计
(61)假定有下表所列的菜单结构:
━━━━━━━━━━━━━━━━━━━━
标题名称层次
────────────────────
显示appear1(主菜单)
大图标bigicon2(子菜单)
小图标smallicon2(子菜单)
━━━━━━━━━━━━━━━━━━━━
要求程序运行后,如果单击菜单项“大图标”,则在该菜单项前添加一个“?
”。
以下正确的事件过程是
PrivateSubbigicon_Click()
bigicon.Checked=True
EndSub
(62)假定通用对话框的名称为CommonDialog1,命令按钮的名称为Command1,则单击命令按钮后,能使打开的对话框的标题为“NewTitle”的事件过程是
PrivateSubCommand1_Click()
CommonDialog1.DialogTitle="NewTitle"
CommonDialog1.ShowOpen
EndSub
(63)如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是
如果工程中含有SubMain过程,则程序一定首先执行该过程
(64)假定在工程文件中有一个标准模块,其中定义了如下记录类型
TypeBooks
NameAsString*10
TelNumAsString*20
EndType
要求当执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条记录。
下列能够完成该操作的事件过程是
PrivateSubCommand1_Click()
DimBAsBooks
Open"c:
\Person.txt"ForOutputAs#1
B.Name=InputBox("输入姓名")
B.TelNum=InputBox("输入电话号码")
Write#1,B.Name,B.TelNum
Close#1
EndSub
(65)目录列表框的Path属性的作用是
显示当前驱动器或指定驱动器上的目录结构
(66)结构化程序设计方法的主要原则是:
自顶向下、逐步求精、模块化及限制使用goto语句。
可复用性是指软件元素不加修改和稍加修改可在不同的软件开发过程中重复使用的性质。
软件可复用性是软件工程追求的目标之一,是提高软件生产效率的最主要方法。
面向对象的程序设计具有可复用性的优点。
(67)模块的独立程度可以由两个定性标准度量:
内聚性和耦合性。
耦合性衡量不同模块彼此间互相依赖(连接)的紧密程度;内聚性衡量一个模块内部各个元素彼此结合的紧密程度。
一般来说,要求模块之间的耦合尽可能地弱,而模块的内聚程度要尽可能地高。
(68)测试的目的在于发现错误,由程序的编写者自己进行测试是不合适的,为了达到好的测试效果,应该由独立的第三方进行测试工作
(69)栈的特点是栈顶元素总是最后被插入的元素,也是最早被删除的元素;栈底元素总是最早被插入的元素,也是最晚才能被删除的元素,即栈的修改原则是“后进先出”(LastInFirstOut,简称LIFO)或“先进后出”(FirstInLastOut,简称FILO)。
(70)所谓线性链表,就是指线性表的链式存储结构,简称链表。
线性表链式存储结构的基本单位称为存储结点,每个存储结点包括数据域和指针域两个组成部分。
栈、队列和双向链表是线性结构,二叉树是非线性结构。
线性结构和非线性结构是从数据的逻辑结构角度来讲的,与该数据结构中有多少个元素没有关系,即使是空的二叉树也是非线性结构。
(71)后序遍历可以描述为:
若二叉树为空,则空操作;否则:
①后序遍历左子树;
②后序遍历右子树;
③访问根结点。
(72)对于后序遍历,第一个访问的结