精彩文档
实用标准文案
A.1
B.-1
C.TRUE
D.FALSE
29.Sqr（81）+Fix（3.6）的值是（）。
A.12
B.7
C.8
D.9
30.把字符串“123”转换为数值123时应该使用的函数是（）。
A.Str
B.Val
C.Len
D.Log
31.表达式Abs（-3）+int（3.14）的值为（）。
A.5
B.6
C.0.14
D.6.14
32.Int（Rnd*100）表示的是（）范围内的一个整数。
精彩文档
实用标准文案
A.[0,100]
B.[1,99]
C.[0,99]
D.[1,100]
33.Len（“Friend”）的值是（）。
A.6
B.7
C.8
D.9
34.Int（-3.14）的值是（）。
A.-3
B.-3.14
C.-4
D.3.14
35.Right（“banana”,4）的值是（）。
A.ba
B.banana
C.nana
D.ban
36.表达式Mid（“Hello”,2,3）的值是（）。
精彩文档
实用标准文案
A.“ll”
B.“llo”
C.“ell”
D.“ello”
37.语句if3*4>=10thena=1elsea=2执行后，a的值为（）。
A.12
B.10
C.1
D.2
38.语句Ifx=1Theny=1,下列说法正确的是（）。
A.x=1和y=1均为赋值语句
B.x=1和y=1均为关系表达式
C.x=1为关系表达式，y=1为赋值语句
D.x=1为赋值语句，y=1为关系表达
39.下面程序段中，（）不是把两个数中的大值赋给变量Ｍax。
A.Max=IIf（x>y,x,y）
B.Ifx>yThenMax=xElseMax=y
C.Max=x：
Ify>=xThenMax=y
D.Ify>=xThenMax=yMax=x
40.在Select判断结构中，下面的表述中不正确的是（）。
精彩文档
实用标准文案
A.Case1
B.Casea>5
C.Case3To6
D.Caseis<10
41.由"Fori=1To16Step3"决定的循环结构被执行（）次。
A.4
B.5
C.6
D.7
42.Dima（5,5）AsLong定义的数组元素的个数是（）。
A.10
B.11
C.25
D.36
43.用于清空数组数据的关键字是（）。
A.Erase
B.Lbound
C.Ubound
D.Redim
44.下列关于dowhileloop和doloopwhile循环执行循环体次数的描述正确的是
精彩文档
实用标准文案
（）。
A.dowhile
loop
循环和doloopwhile
循环至少都执行一次
B.dowhile
loop
循环可能不执行，doloopwhile
循环至少执行一次
C.dowhile
loop
循环至少执行一次，doloopwhile
循环可能不执行
D.dowhile
loop
循环和doloopwhile
循环可能都不执行
45.For-Next语句属于程序基本结构中的（
）。
A.顺序结构
B.循环结构
C.分支结构
D.选择结构
46.下列关于ExitFor的说法，正确的是（）。
A.它可以退出任何类型的循环
B.一个循环只能有一个ExitFor
C.每个循环必须有ExitFor
D.ExitFor本身是无条件退出循环
47.在VisualBasic代码窗口中,将某一条语句加以注释和说明时,应在语句前加（）。
A.,
B.:
C.'
D.?
精彩文档
实用标准文案
48.为了将一个语句写在多行上所使用的行续接符是：
（）。
A.&
B._
C.'
D.：
49.在一个语句内写多条语句时,每个语句之间分隔符号是（）。
A.,
B.；
C.:
D.'
50.Function过程的定义，不必须有的是（）。
A.过程的名称
B.虚参
C.EndFunction
D.给过程赋值
51.下列过程调用语句中，被调用的过程一定是Sub子过程的语句是（）。
A.Pro1（x）
B.PrintPro2（x）
C.x=Pro3（x）
D.CallPro4（x）
精彩文档
实用标准文案
52.Sub过程与Function过程最根本的区别是（）。
A.Sub过程可以用Call语句直接使用过程名调用，而Function过程不可以
B.Function过程可以有形参，Sub过程不可以
C.Sub过程不能返回值，而Function过程能返回值
D.两种过程参数的传递方式不同
53.当拖动滚动条中的滚动块时，将触发滚动条的事件是（）。
A.Move
B.SetFocus
C.Scroll
D.Change
54.列表项选择后得到的选中索引是指（）。
A.Value
B.ListValue
C.Index
D.ListIndex
55.定时器定时工作所触发的事件是（）。
A.Click（）
B.Change（）
C.Timer（）
D.Load（）
精彩文档
实用标准文案
56.在图片框中加载图形（c:
\666.jpg）的方法是（）。
A.Loadpicture（"c:
\666.jpg"）
B.Loadpicture（）
C.print（"c:
\666.jpg"）
D.cls
57.以下关于VB列表框的叙述中（）是错误的。
A.可通过属性“Item”，返回列表框中的项目
B.可通过属性“Text”，得到当前列表项中的内容
C.可通过属性“ListIndex”返回当前选中的列表项的索引
D.可通过属性“ListCount”返回列表框中项目的数目
58.为了把焦点移到某个指定控件，所使用的方法是（）。
A.GetFocus
B.Visible
C.Refresh
D.SetFocus
59.为了隐藏一个窗体，所使用的方法为（）。
A.Load
B.Show
C.Hide
D.UnLoad
精彩文档
实用标准文案
60.如果窗体被遮挡，通过调用（）方法，可以将其显示。
A.Hide
B.Show
C.Unload
D.load
61.VB窗体设计器的主要功能是（）。
A.建立用户界面
B.画图
C.编辑文字
D.编写程序代码
62.窗体的（）方法可以清除窗体上的图形与文本。
A.print
B.cls
C.load
D.circle
63.窗体没有（）属性。
A.Caption
B.Text
C.Picture
D.Top
精彩文档
实用标准文案
64.当一个工程有多个窗体时，其中的启动窗体是（）。
A.第一个添加的窗体
B.最后一个添加的窗体
C.启动VB时建立的窗体
D.在工程属性对话框中指定的窗体
65.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（）。
A.工程资源管理器窗口
B.工具箱窗口
C.代码窗口
D.属性窗口
66.以下哪种属性或者方法可以重新定义VB坐标系？
（）
A.ScaleMode属性
B.Scale方法
C.DrawWidth和DrawStyle属性
D.BorderWidth和BorderStyle属性
67.指令Circle（2000，3000），2000，QBColor，－3.14/2，－3.14将绘制以下哪种图形？
（）
A.圆
B.椭圆
C.扇形
精彩文档
实用标准文案
D.圆弧
68.使用Line方法时，参数B和F可以组合使用，下列组合中（）是不允许的。
A.不使用B和F
B.B
C.B和F
D.F
69.执行命令Line（200，200）－step（500，500）后，CurrentX＝（）。
A.200
B.500
C.700
D.300
70.在VisualBasic中,以下选项中表示单击事件的是（）。
A.KeyUp
B.Click
C.Activate
D.Load
71.下面不属于键盘事件的是（）。
A.KeyUp
B.KeyDown
C.KeyPress
精彩文档
实用标准文案
D.Click
72.每当窗体失去焦点时会触发的事件是（）。
A.Active
B.Deactive
C.LostFocus
D.Initialize
73.设在窗体上有一通用对话框控件Commonialog1，通过调用（）语句可以建立“颜
色”对话框。
A.Commonialog1.ShowOpen
B.Commonialog1.Action=2
C.Commonialog1.ShowColor
D.Commonialog1.Action=5
74.用语句Commonialog1.ShowOpen建立了“打开”对话框以后，要得到用户所选
择文件的路径及文件名，应使用Commonialog1的（）。
A.DialogTitle属性
B.FileTitles属性
C.FileName属性
D.InitDir属性
75.用于显示弹出式菜单的方法名是（）。
A.ShowOpen
精彩文档
实用标准文案
B.ShowMenu
C.ShowPopup
D.PopupMenu
76.打开菜单编辑器的快捷键是（）。
A.CTRL+F
B.Alt+F
C.CTRL+E
D.Alt+E
77.下列叙述中，错误的是（）。
A.顺序文件打开后，既可以读又可以写
B.随机文件打开后，既可以读又可以写
C.顺序文件打开后，只能读或者只能写
D.顺序文件和随机文件的打开都使用Open语句
78.VB编程中顺序文件的处理将用到关键字是（）。
A.File
B.Save
C.Open
D.Disk
二、填空题1
精彩文档
实用标准文案
79.PrivateSubCommand1_Click（）a=3
b=1
Fori=1To3
f=a+ba=bb=f
NextiPrintf
EndSub
以上程序段运行后，f的结果为。
80.设有如下通用过程：
PublicSubfun（a（）AsInteger,xAsInteger）
Fori=1To5
x=x+a（i）
Next
EndSub
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如
下事件过程:
PrivateSubCommand1_Click（）
精彩文档
实用标准文案
Dimarr（5）AsInteger,nAsInteger
Fori=1To5
arr（i）=2*i
Next
funarr,n
Text1.Text=Str（n）
EndSub
程序运行后,单击命令按钮,则在文本框中显示的内容是。
81.阅读下列程序段
OptionExplicit
PrivateSubCommand1_Click（）
Dimstr1AsString
Dimstr2AsString
str1="ABCDEFG"
MySubstr1,str2
Printstr2
EndSub
PrivateSubMySub（ByValaAsString,bAsString）
DimcAsString
精彩文档
实用标准文案
DimiAsInteger
Fori=Len（a）To1Step-1
c=c+Mid（a,i,1）
Next
b=c
EndSub
程序运行后，“print”语句的输出结果是____。
82.在窗体上画一个命令按钮，然后编写如下事件过程：
PrivateSubCommand1_Click（）
x=Int（Rnd）+6
Ifx^2>25Theny=x^2+5
x=Int（Rnd）+4
Ifx^2<25Theny=x^2
x=Int（Rnd）+5
Ifx^2=25Theny=x^2-5
Printy
EndSub
程序运行后，单击命令按钮，其输出结果为___。
83.阅读下列程序段
PrivateSubCommand3_Click（）
精彩文档
实用标准文案
Printpl（3,6）
EndSub
PublicFunctionpl（xAsSingle,nAsInteger）AsSingle
Ifn=0Then
pl=1
Else
IfnMod2=1Then
pl=x*x+n
Else
pl=x*x-n
EndIf
EndIf
EndFunction
程序运行后，单击该命令按钮，屏幕上显示的结果是______。
84.阅读下列程序段
PrivateSubCommand2_Click（）
Fori=1To3
x=1
Forj=1To3
x=3+j
精彩文档
实用标准文案
Fork=1To3
x=x+3
Nextk
Nextj
Nexti
Printx
EndSub
运行程序后，单击命令按钮，输出结果是。
85.阅读下列程序段
PrivateSubCommand1_Click（）
DimiAsInteger
DimkAsInteger
k=0
Fori=0To10
k=k+1
i=i+k
Next
Printk;i
EndSub
请问其循环体共执行了次，i的值是。
精彩文档
升级会员 