15、在WindowsXP中，下列不能查找文件或文件夹操作是（）
A）用“开始”菜单中的“搜索”命令
B）在“资源管理器”窗口中选择“搜索”菜单
C）用鼠标右击“我的电脑”图标，在弹出的菜单中选择“搜索”命令
D）用鼠标右击“开始”按钮，在弹出的菜单中选择“搜索”命令
16、在WindowsXP中，“任务栏”的作用是（）。
A）实现窗口之间的切换B）只显示活动窗口名
C）只显示正在后台工作的窗口名D）显示系统的所有功能
17、在Windowsxp中，用“创建快捷方式”创建的图标（）
A）可以是任何文件或文件夹B）只能是可执行程序或程序组
C）只能是单个文件D）只能是程序文件和文档文件
18、在WindowsXP中，对同时打开的多个窗口进行层叠式排列，这些窗口的显著特点是（）
A）每个窗口的内容全部可见B）每个窗口的部分标题栏可见
C）部分窗口的标题栏不可见D）每个窗口的标题栏全部可见
19、在下拉式菜单中，有的菜单项右边有组合键名字如Ctrl+S，是该菜单的键盘快捷键，它意味着用户_______？
A）必须激活菜单后，才可以在键盘上按Ctrl+S来执行对应命令。
B）不必激活菜单，就可以在键盘上按Ctrl+S来执行对应命令。
C）必须激活菜单后，，才可以同时按Alt键和Ctrl+S来执行相应命令
D）不必激活菜单，就可以在键盘上按Alt键和Ctrl+S来执行对应命令。
20、要删除一个文件，以下操作错误的是________
A）选定要删除的文件，直接按Del键
B）直接将该文件拖入“回收站”
C）选定要删除的文件，单击右键弹出快捷菜单，选择其中的“删除”命令
D）选定要删除的文件，选择“编辑”菜单中的“删除”命令
21、在Windowsxp的“资源管理器”窗口中，如果想一次选定多个分散的文件或文件夹，正确的操作是（）
A）按住Ctrl键，用鼠标右键逐个选取B）按住Ctrl键，用鼠标左键逐个选取
C）按住Shift键，用鼠标右键逐个选取D）按住Shift键，用鼠标左键逐个选取
22、在WindowsXP中，若计算机中有多个帐户，则不需要密码就可以登陆帐户的是：
A）来宾账户B）受限制用户C）计算机管理员D）都可以
23、下列关于窗体的说法中，不正确的是（）
A）窗体是VB的一个控件B）可以把窗体看作是一个包含各种对象的容器
C）窗体是VB的一个对象D）各种控件必须建立在窗体上
24、为了使标签中的内容居右显示，应把Alignment属性设置为（）
A）0B）1C）2D）True
25、删除列表框中指定的项目所使用的方法为（）
A）RemoveB）ClearItemC）ClearD）RemoveItem
26、用菜单编辑器建立一个名为MyMenu的菜单，则下列选项能够在该菜单项前打上一个“✓”的是（）
A）MyMenu.Enabled=TrueB）MyMenu.Visible=True
C）Mymenu.Checked=TrueD）MyMenu.Checked=False
27、菜单能够响应的事件是（）
A）MouseMoveB）MouseDownC）DblClickD）Click
28、执行下列语句：
a=“MicrosoftVisualBasic”
x=Instr（a,”VISUAL”）
则X的值为（）
A）9B）10C）11D）0
29、表达式INT（4*RND+5）+5值的范围是______。
A）[10,13]B）[10,14]C）[9,13]D）[5,14]
30、将当前目录下的图形文件AA.Bmp作为窗体Form1的背景图片的设置语句是（）
A）Form1.Picture=”AA.Bmp”B）Form1.LoadPicture（“AA.Bmp”）
C）Form1.Picture=LoadPicture（“AA.Bmp”）D）Form1.Picture=LoadPicture（AA.Bmp）
31、窗体的隐藏和删除，分别用在不同的场合，隐藏Forml和删除Forml的命令是（）。
A）HideFormlUnloadFormlB）Forml.HideForml.Unload
C）Forml.HideUnloadFormlD）HideFormlForml.Unload
32、下列程序的执行结果为：
A=“1”
B=“2”
A=val（A）+val（B）
B=val（“12”）
Ifa<>bthenprinta-belseprintb-a
A）-9B）9C）-12D）0
33、下列VB程序的运行结果为（）
Privatesubcommand1_click（）
DimaAsInteger,sAsInteger
a=8
s=1
Do
s=s+a
a=a－1
LoopWhilea<=0
Prints；a
Endsub
A）79B）340 C）97D）死循环
34、下列关于数组定义语句，错误的是：
A）k%=10B）constk%=10
Dimarr（k）dimarr（k）
C）dimarr1（10）asintegerD）dimarr1（1to10）
Dimarr2（10）dimarr2（1to10,2to11）
35、下列过程语句中，一定按传值方式进行数据传递的语句是：
A）subpro2（aasinteger）B）subpro2（byrefaasinteger）
C）subpro2（byvalaasinteger）D）subpro2（arr（））
二、填空题
6、CAD是计算机主要应用领域，它的含义是[6]。
7、-10H的8位补码是[7]（用二进制数表示）
8、在多媒体计算机中，声音属于媒体。
9、程序必须存放在，计算机才可以执行。
10、计算机发展的到各个阶段是以作为标志的。
11、在计算机系统中，存储一个汉字的国标码所需要的字节数为
12、资源子网的主要作用是提供网络共享的，进行必要的数据处理。
13、在WindowsXP中，下拉式菜单中的菜单项若有符号“…”，则表示该菜单项含有[13]
14、要卸载一个应用程序，可以通过“控制面板”中的对话框来完成应用程序的删除操作。
15、鼠标拖动可以移动整个窗口。
16、在WindowsXP中提供了一个程序，系统会根据用户的设置而定期自动地执行任务计划表中的任务。
17、VB语言的表达式5\3+14MOD4的值是。
18、MsgBox函数的返回值类型是。
19、为了防止用户随意将光标置于控件上，应将控件的属性设置为False。
20、计算机系统是由硬件和_______组成的。
三、判断题
1．光盘不属于存储媒体。
（）
2．目前广泛使用的触摸屏技术属于计算机技术中的工程技术。
（）
3．定期备份数据文件不能有效提高计算机系统的病毒防治能力。
（）
4．用户不能修改文件的属性。
（）
5．不同文件夹下的文件可以同名。
（）
6．计算机中的记忆设备简称为ALU。
（）
7．存储在硬盘上的信息可以直接读入CPU进行处理。
（）
8．数码相机不支持即插即用。
（）
9．当计算机显示屏幕保护图像时，应立即进行冷启动。
（）
10．在VisualBasic中，声明全局变量所使用的关键字是Public。
（）
四、阅读分析题
1、dimx（3,5）
fori=1to3
forj=1to5
x（i,j）=x（i-1,j-1）+i+j
nextj,i
printx（3,4）
上面程序运行时输出的结果为。
2、以下程序段的输出结果为。
X=1
Y=4
Dountily>4
X=x*4
Y=y+1
Loop
Printx
3、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
privatesubcommand1_click（）
DimintA（4）AsInteger
DimintB（4）AsInteger
DimiAsInteger
Fori=0To2
intA（i+1）=i*2+1
intB（3-i）=intA（i+1）
Nexti
PrintintB（i）
Endsub
程序运行后的结果是。
4、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
PrivateSubCommand1_Click（）
StaticxAsInteger
Fori=1To2
y=y+x
x=x+2
Next
Printx,y
EndSub
程序运行后，连续三次单击Command1按钮后，窗体上最后一次的结果是。
5、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
PrivateSubCommand1_Click（）
DimxAsInteger
Do
X=x+1
s=s+x
x=（x+2）*x
loopuntilx>15
print“s=”;s,“x=”;x
EndSub
程序运行后的结果是。
6、在窗体上画一个命令按钮，然后编写如下程序：
privatesubcommand1_click（）
dimiasinteger
forI=0.5to8.5step2.5
s=s+I*10
nextI
prints,I
endsub
程序运行后，单击命令按钮，在窗体上的的输出结果为。
7、以下程序运行后，单击窗体，输出结果是
PrivateSubform_click（）
DimmAsInteger
DimnAsInteger
m=3:
n=5
Printm,n,test（m,n）
EndSub
PrivateFunctiontest（xAsInteger,ByValyAsInteger）
x=x+y:
y=x-y
test=x*y
EndFunction
8、在窗体上画一个命令按钮，然后编写如下程序：
Privatesubcommand1_click（）
Dima（1to３,２to4）asinteger
ForI=1to３
Forj=２to4
A（I,j）=I*2+j＊３
Nextj
NextI
Printa（2,3）+a（3,2）
Endsub
程序运行后，单击命令按钮，在窗体上的的输出结果是。
9、在窗体上画一个命令按钮，然后编写如下程序：
privatesubcommand1_click（）
dimintaasinteger
x=1
inta=inputbox（"请输入a的值：
"）
selectcaseinta
case1to4
x=x+1
case5to10
x=x+2
case8
x=x+3
caseelse
x=x+4
endselect
printx
endsub
程序运行后，单击命令按钮，在弹出的对话框中输入８，则窗体上的的输出结果是。
10、在窗体上画一个命令按钮，然后编写如下程序：
privatesubcommand1_click（）
FORa=1TO5
y=1
FORb=1TO5
FORc=1TO5
y=y+c
NEXTc
NEXTb
NEXTa
PRINT“y=”；y
ENDsub
程序运行后，单击命令按钮，在窗体上的的输出结果为。
五、程序填空题
1、下面函数计算两个非负整数m与n的最小公倍数。
请在空白处填入适当内容将程序补充完整。
PrivateSubcommand1_click（）
DimmAsInteger
DimnAsInteger
m=Val（InputBox（"请输入整数M：
",m））
n=Val（InputBox（"请输入整数N：
",n））
ForI=2Tom
IfmModI=0AndThen
k=I
EndIf
s=
print“最小公倍数为：
”,s
EndSub
2、窗体上有一个名称为List1的列表框，一个名称为Text1的文本框，一个名称为Label1、Caption属性为“Sum”的标签，一个名称为Command1、标题为“计算”的命令按钮。
程序运行后，将把1～100之间能够被7整除的数添加到列表框中。
如果单击“计算”按钮，则对List1中的数进行累加求和，并在文本框中显示计算结果，如图所示。
以下是实现上述功能的程序，请填空。
PrivateSubForm_Load（）
Fori=1To100
IfiMod7=0Then
EndIf
Next
EndSub
PrivateSubCommand1_Click（）
Sum=0
Fori=0To
Sum=Sum+
Next
Text1.Text=Sum
EndSub
3、求所有满足条件的四位数ＡＢＣＤ，它是１１的倍数，且第三位数加上第二位数等于第四位数（即Ａ＝Ｂ＋Ｃ）。
Privatesubcommand1_（）
DimIasinteger
Dimbasinteger,casinteger
ForI=
B=i\100mod10
C=
Ifanda=b+cthen
PrintI;
Endif
NextI
Endsub
4.打印输出如下数组的前２０项,并输出
１，１，３，７，１７，４１……
privatesubcommand1.click（）
dima（1to20）aslong
a
（1）=1
a
（2）=1
forI=3to20
nextI
forI=1to20
printa（i）;
nextI
Endsub
升级会员 