vb考试题目
VB等级考试题目
----3----
Loop
对
错
第9题：Dim关键字可用来声明过程级变量，但不能用来声明模块级变量。
参考答案：错
对
错
参考答案：A
A、字符串
B、浮点数
C、整数
D、长整数
C、Dim A As Integer:Dim B%
D、Dim A%,Dim B%
第2题：设计动画时通常用定时器控件______属性来控制动画速度。
参考答案：A
参考答案：A
A、Enable
B、Load
C、KeyPress
D、Click
第4题：输入对话框（InputBox）的返回值的类型是______ 。
D、单击某表项再按回车键
第6题：变量的类型可以用类型声明符隐式声明，下列______符号是用来声明单精度浮点型的？
参考答案：A
A、!
B、%
对
错
第4题：Sub过程名在过程中必须被赋值。
参考答案：错
对
错
参考答案：B
A、Redim a As Integer
B、Static a As Integer
C、Public a As Integer
参考答案：错
对
错
第8题：若要新建一个磁盘上的顺序文件，可用OUTPUT、在Select Case情况语句中，各个分支（即Case 表达式）的先后顺序无关。
参考答案：错
对
错
第5题：______可以改变目录列表框的Path属性。
参考答案：B
A、单击某表项
VB程序设计考试题库——考试专用
程序设计题1、题目：(事件)单击窗体(响应)用输入框输入一自然数，判断是"正数"、"负数或"零"，并根据输入的数用消息框显示"正数"、"负数〞或"零"。
2、题目：(事件)单击窗体。
(响应)求200~300之间既能被3整除又能被7整除的数。
并求出所有数之和存入变量SUM中3、题目：单击窗体。
(响应)S=1+1/4+1/9+1/16+1/25+…+1/100，结果输出在窗体上。
4、题目：(事件)单击窗体。
(响应)在窗体上打印数列2/1,3/2,5/3,8/5,13/8…的前10项，并求其和，将和保存在变量s中。
5、题目：(事件)双击窗体。
(响应)把一元钞票换成一分、二分和五分的硬币每种至少有一枚〕，求出其所有的换法，把结果输出在窗体上。
将所有的换法的数目存入变量N中6、题目：单击窗体。
)求1!+2!+3!+4!+5!并将结果输出到窗体上。
结果存入变量S中7、题目：(事件)单击窗体。
(响应)生成一个一维数组(10个数组元素依此为：' 15、23、72、43、96、23、3、65、88、17写程序求出这个数组中的最大值、最小值和平均值，并输出在窗体上。
将最大值，最小值，平均值分别存入变量Ma*,Min,Aver中8、题目：(事件)单击窗体。
(响应)在窗体上输出100~200之间的所有合数。
求出所有数之和存入SUM 中所谓合数是指自然数中能被1和本数整除以外,还能被其他数整除的数。
9、题目：(事件)单击窗体。
(响应)求10~20之间所有素数的乘积并输出在窗体上。
将结果存入变量L 中。
10、题目：(事件)单击窗体。
(响应)求1 - 1/2 + 1/3 - 1/4 + …… + 1/99 - 1/100的值。
将结果存入变量J中。
1题n = InputBo*("输入一个自然数")If n > 0 Thenresult = "正数"ElseIf n < 0 Thenresult = "负数"ElseIf n = 0 Thenresult = "零"End IfMsgBo* "输入的数据" & n & "为：" & result2题Dim i As IntegerFor i = 201 To 300If ((i Mod 3) = 0) And ((i Mod 7) = 0) ThenPrint (CStr(i))sum = sum + iEnd IfNe*tPrint sum3题Dim i As Integers = 0For i = 1 To 10s = s + 1 / (i ^ i)Ne*tPrint (s)4题Dim i, j, k, m As Integers = 0 :i = 2:j = 1For k = 1 To 10s = s + i / jm = jPrint (CStr(i)) & "/" & CStr(j)j = ii = i + mNe*t5题Dim i, j, k As IntegerFor i = 1 To 100For j = 1 To 50For k = 1 To 20If ((i + 2 * j + k * 5) = 100) ThenPrint (CStr(i))Print (CStr(j))Print (CStr(k))n = n + 1End IfNe*tNe*tNe*t6题Dim i, j, k As IntegerFor i = 1 To 5k = 1For j = 1 To ik = k * jNe*ts = s + kNe*tPrint (CStr(s))7题Dim a(9) As IntegerDim i, s As Integera(0) = 15：a(1) = 23：a(2) = 72 a(3) = 43：a(4) = 96：a(5) = 23 a(6) = 3：a(7) = 65：a(8) = 88a(9) = 17：ma* = a(0)：min = a(0) s = 0For i = 0 To 9If a(i) > ma* Thenma* = a(i)End IfIf a(i) < min Thenmin = a(i)End Ifs = s + a(i)Ne*taver = Int(s / 10)Print (CStr(ma*))Print (CStr(min))Print (CStr(aver))8题Dim i, j, s As IntegerFor i = 100 To 200For j = 2 To Sqr(i)If (i Mod j) = 0 ThenPrint (CStr(i))sum = sum + iE*it ForEnd IfNe*tNe*tPrint sum9题Dim i%，j%，b As Booleanl = 1：b = FalseFor i = 10 To 20For j = 2 To i - 2If i Mod j = 0 Thenb = TrueEnd IfNe*tIf b = False Thenl = l * iEnd Ifb = FalseNe*tPrint Str(l)10题Dim i As IntegerFor i = 1 To 100If i Mod 2 = 1 Thenj = j + 1 / iElseIf i Mod 2 = 0 Then j = j - 1 / iEnd IfNe*tPrint j11、题目： (事件)单击窗体。
Vb考试温习题最终
Vb考试温习题一、填空题1.设a=2,b=3，表达式a>b 的值是_______。
FALSE2.在VB中声明符号常量的关键字是_______。
const3. 表达式10 MOD 16\4的值是_______。
24. 设A=5，B=6，C=7，D=8，表达式3>2*B OR A=C AND B<>C OR C>D 的值是_______。
False|0|5. 设a=6，b=3，c=5，那么表达式Not a>c And c=b Or b<>a+c 的值为_______。
True6. 设a=1,b=2,c=3,那么VB6.0表达式：a<b or b<c and c<a 的值是_______。
True7. 在VB中，用Dim X As Integer 语句概念的变量X，系统默许其值为_______。
08. 表示x是5的倍数逻辑表达式为_______。
X MOD 5=09. 已知a=3.5,b=5.0,c=2.5,d=True 那么表达式：a>=0 AND a+c>b+3 OR NOT d 的值是____。
False|0|零|假|假值|零值10. 用dim abc as integer 概念的变量abc,其类型是______。
整型11. 表达式"12345"<>"12345" & "ABC"的值是_______。
True12. 在VB中，字符型常量应使_______将其括起来，日期/时刻型常量应利用______将其括起来。
双引号井号13．在窗体上添加一个命令按钮，然后编写如下事件进程：Private Sub Command1_Click()a = InputBox("请输入一个整数")b = InputBox("请输入一个整数")Print a + bEnd Sub程序运行后，单击命令按钮，在输入对话框中别离输入321和456，输出结果为___。
VB题
VB二级测试题一、选择题1．文本框控件中将Text的内容全部显示为所定义的字符的属性项是（）A．PasswordChar B．需要编程来实现C．Password D．以上都不是2．不管一个对象的属性如何设置，程序运行时始终都能接收焦点的方法是（）A．用Tab键 B．用鼠标C．用方向键 D．不能实现3．如果没有在列表框中选择项目，且列表框的MultiSelect属性值为默认值（0~None），则执行语名List1.RemoveItem List1.ListIndex的结果是（）A．删除列表框的最后一项 B．删除列表框的第一项C．出错 D．删除列表框中的最后添加的一项4．下列对象中没有焦点属性的是（）A．命令按钮控件 B．窗口控件C．文本框控件 D单选框控件5．不具有输入数据功能的控件是（）控件A．文本框 B．选项按钮 C．列表框 D．窗体6．常用控件的Style属性值是（）A．字符常量 B．逻辑常量D．数值常量 D．日期常量7．以下关于复选框的说法，正确的是（）A．一个窗体上的所有复选框一次只能有一个被选中B．一个容器中的所有复选框一次只能有一个被选中C．在一个容器中的复选框可以同时有多个被选中D．无论是在容器中还是在窗体中，都可以同时选中多个复选框8．要清除已经在图片框Picture中打印的字符串而不清除图片框中的图像，应使用语句（）A．P1.Cls B．P1.picture=LoadPicture(“”)C．P1.Print”” D．P1.piture””9．要使一个图片框控件能自动地附着在窗体的一条边上，应设置它的（）属性A．Picture B．Alignment C．Border D．Align10．下列赋值语句正确的是（）A． Text1.text=Text.text+Text2.textB． =+C． Text1.Caption=T ext1.Caption+T ext2.CaptionD． Text1.Enable=Text1.Enable+Text2.Enable11．引用列表框的最后一项应使用（）A．List1.List(List1.ListCount-1) B．List1.List(List1.ListCount)C．List1.List(ListCount) D．List1.List(ListCount-1)12．要清除组合框Combol中的所有内容，可以使用（）语句A．Combo1.Cls B．Combo1.Clear C．Combo1.Delete D．Combo1.Remove 13．列表框控件中的列表内容是通过（）属性设置的A．Name B．Caption C．List D．Text14．可以用作其它控件容器的控件有（）A．窗体控件，列表控件，图像控件 B．窗体控件，文本框控件，框架控件C．窗体控件，框架控件，图片框控件 D．窗体控件，标签控件，图片控件15．组合框控件是将（）组合成一个控件A．列表框控件和文本框控件 B．标签控件和列表框控件C．标签控件和文本框控件 D．复选框控件和选项按钮控件16．要在命令按钮控件上显示图像应（）A设置Picture属性 B．实现不了C．先将Type设置为1，然后再设置Picture属性 D．以上都不对17．要在图片框P1中打印字符串“How Are You”，应使用语句（）A．Picture1.Print=“ How Are You”B．P1.Picture=LoadPicture(“How Are You”)C．P1.Print“How Are You” D．Print “How Are You”18．将字符串“hello”添加到列表框的最后，可使用（）请语句。
计算机vb试题
1、以下哪类控件能用来显示图形（）A．Label B．PictureBox C．TextBox D．OptionButton2、在某菜单中，有一菜单项（Caption）内容是”NEW”，名字（Name）是“Create”，则单击该菜单项所产生的事件过程应是（）A．Private Sub MnuNEW_Click()B．Private Sub Create_Click()C．Private Sub NEW_Click()D．Sub Mnu_Create_Click()3、下列叙述中正确的是（）A．在MDI应用程序中，每一个子窗体的菜单都显示在子窗体中B．在多文档应用中，每次可以有几个活动的子窗体进行输入/编辑C． VB的每一个窗体和控件都存在一个预定义的事件集D．改变窗体的标题也就是改变其属性窗口中的Name属性4、标签控件能够显示文本信息，决定其文本内容的属性是A) AlignmentB) CaptionC) VisibleD) BorderStyle5、为清除PictureBox控件中的图形，下列方法正确的是（）A． Set Picture.Picture = LoadPicture(“c:\Win1.bmp”, vbLPLarge, vbLPColor) B． Picture.Picture = LoadPicture(“c:\Win1.bmp”, vbLPLarge, vbLPColor) C． Set Picture.Picture = LoadPictureD． Picture.Picture = LoadPicture6、下列程序的运行结果为Dim a(-1 To 6)For i=LBound(a, 1) To UBound(a, 1)a(i) =iNext iPrint a(LBound(a, 1) ) ; a(UBound(a, 1) )A) 0 0B) -5 0C) -1 6D) 0 67、下面的数组声明语句中正确的是A. Dim gg［1,5］ As StringB. Dim gg［1 To 5,1 To 5］ As StringC. Dim gg(1 To 5) As StringD. Dim gg［1 :5,1: 5］ As String8、在窗体上画一个命令按钮(其Name属性为Command1) ，然后编写如下代码：Option Base 1Private Sub Command1_Click()Dim as=0a=Array(1,2,3,4) ; j=1For i=4 To 1 Step-1s=s+a(i) *jj=j*10Next iPrint sEnd Sub运行上面的程序，单击命令按钮，其输出结果是A) 4321 B) 1234C) 34 D) 129、以下属于Visual Basic中合法的数组元素的是A) K8 B) k［8］ C) k(0) D) k［8］10、使用语句Dim A(2) As Integer 声明数组A之后，以下说法正确的是A) A数组中的所有元素都为0B) A数组中的所有元素值不确定C) A数组中所有元素值都为EmptyD) 执行Erase A后，A数组中所有元素值都不为011、在窗体上画一个命令按钮，其名称为Command1,然后编写如下事件过程：Private Sub Command1_Click()a=12345Print Format＄(a,"000.00")End Sub程序运行后，单击命令按钮，窗体上显示的是A) 123.45 B) 12345.00C) 12345 D) 00123.4512、运行下面的程序后，输出的结果为ClsDim t(5, 5) as IntegerFor i=1 To 5: t(i, i) =1: NextFor i=1 To 5For j=1 To 5Print t(i, j) ,Next jPrintNext IA)1 1 1 1 11 1 1 1 11 1 1 1 11 1 1 1 11 1 1 1 1B) 11111C)1 0 0 0 00 1 0 0 00 0 1 0 00 0 0 1 00 0 0 0 1D) 1 1 1 1 113、下列程序段的执行结果为。
VB题目
25.C语言程序的三种基本结构是（ ）
A) 顺序结构，选择结构，循环结构
B) 递归结构，循环结构，转移结构
C) 嵌套结构，递归结构，顺序结构
D) 循环结构，转移结构，顺序接构
26.下面程序的输出是（ ）
C) scanf(“a=b=%d”,&a,&b) D)scanf(“%5.2f,&f)
3.设a=6，b=4，则表达式b*=a+3的值为（ ）
A）3 B）18 C）27 D）36
4.若给定表达式（m）？a++：a--，则其中表达式m和（ ）等价。
A）m=0 B）m！=0 C）m==0 D）m=1
5. 下列程序的输出是（ ）
main()
{ int a=011;
printf(“%d\n”,++a);
}
A)12 B)11 C)10 D)9
6.正确的C语言自定义标识符是（ ）。
Int x=2;double y;y=(int)(float)x;
4．若a,b和c均是int型变量，则执行下面表达式后，a的值为 4 ，b的值是 5 ，c的值是 6 。
A=(b=4)+(c=2)
5．若x和n均是int型变量，且x和n的初值均为5，则执行下面表达式x 的值为 7 ，n的值为 8 。
的值为 1 。
2．C源程序的基本单位是 2 。
3．经过下述赋值后，变量x的数据类型是 3 。
8．在C语言中的实型变量分为两种类型，它们是 11 和 12 。
9．若有定义：int a=2,b=3;float x=3.5,y=2.5;则下面表达式的值为 13 。
VB试题(选择、填空)
一，选择题1、如果VB环境中缺少某个窗口，一般应从主菜单__C____的下拉菜单中找到相应的激活命令。
（1分）A、编辑B、文件C、视图D、调试2、启动Visual Basic后，VB为用户建立的第一个窗体是__B____。
（1分）A、FormB、Form1C、窗体1D、窗体3、不属于一个工程文件（*.vbp）里的文件是____A__。
（1分）A、*.txt文件B、*.bas文件C、*.cls文件D、*.frm文件4、与传统的程序设计语言相比较，Visual Basic最突出的特点是__C____。
（1分）A、结构化的程序设计B、数据处理C、面向对象的可视化编程D、中文支持5、文本框中的ScrollBars属性已设置为3-Both，但却没有水平和垂直滚动条的效果，原因可能是___B___。
（1分）A、文本框中没有内容B、文本框的MultiLine属性为FalseC、文本框的MaxLength属性为0D、文本框的Locked属性是True6、能够盛放其他控件，而且是最基本的对象是___A___。
（1分）A、窗体B、图像C、标签D、文本7、任何控件都具有的属性是____C__。
（1分）A、PictureB、CaptionC、NameD、AutoSize8、窗体上有一个标签Label1和一个命名按钮Command1，当程序运行时每单击一次命令按钮，标签就向右移动一定距离。
在Command1_Click()中能完成这个功能的命令为___D___。
（1分）A、Label1.Left = 100B、Label1.Left = Label1.Left - 100C、Label1.Move 100D、Label1.Move Label1.Left + 1009、要把一个Image控件对象设置成隐藏，应设置的属性是___A___。
（1分）A、VisibleB、EnabledC、DefaultD、Cancel10、以下___B___是正确的For …Next结构。
VB试题6
1. 计算机网络最突出的优点是_B_____。
A、运算速度快B、共享资源C、容量大D、精度高2.下列选项中，不属于显示器主要技术指标的是__A____。
A、重量B、像素的点距C、显示器的尺寸D、分辨率3.在计算机内部用来传送、存储、加工处理的数据或指令都是以__B____形式进行的。
A、八进制码B、二进制码C、十进制码D、十六进制码4.计算机软件分系统软件和应用软件两大类，其中____B__是系统软件的核心。
A、数据库管理系统B、操作系统C、程序语言系统D、财务管理系统5.计算机存储器中，一个字节由__B___位二进制位组成。
A、32B、8C、4D、16母a的十进制码值是__dWord__d__。
A、91B、95C、96D、977.应用程序窗口中的各种工具栏可以通过(D )进行增减.A、"文件"菜单的"页面设置"命令B、"工具"菜单的"选项"命令C、"文件"菜单的"属性"命令D、"视图"菜单的"工具栏"命令8. 在EXCEL 中单元格的条件格式在(D )菜单中.A、文件B、编辑C、视图D、格式9.在Windows中,文件名MM.txt和mm.txt(C ).A、是两个文件B、不是同一个文件C、是同一个文件D、有时候是同一个文件10. 为网络提供公享资源进行管理的计算机称谓(B )A、网卡B、服务器C、网桥D、工作站11. 符号%是声明__A____类型变量的类型定义符。
B、StringC、SingleD、Integer12. 在窗体上画一个命令按钮（名称为Command1），并编写如下代码：Function Fun1(ByVal a As Integer,b As Integer) As Integer Dim t As Integert=a-bb=t+aFun1=t+bEnd FunctionPrivate Sub Command1_Click()Dim x As Integerx=10Print Fun1(Fun1(x,(Fun1 BA、11B、0C、21D、1013. 如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是___C___。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
第2套
VB语言程序设计
下面是20道选择题,满分为10分,每道题的分数一样,及格分数为6分(即正确率为60%)
1、以下语句Print 3 + 4 \ 5 * 6 / 7 Mod 8的输出结果是（ B.4 ）。
A．3
B．4
C．5
D．6
请选择： A B C D
2、下面不是VB的数据类型的是（B ）。
A．Currency
B．Bool
C．Object
D．Single
请选择： A B C D
3、下列可作为VB的变量名的是（B ）。
A．3*Delta
B．Bool
C．Object
D．Single
请选择： A B C D
4、下面的数2.65358979335278E-06写成普通的十进制数是（B）。
A．0.0000265358979335278
B．0.00000265358979335278
C．0.000265358979335278
D．0.000000265358979335278
请选择： A B C D
5、下面的数1.21576654590569E+19写成普通的十进制数是（D ）。
A．12157665459056900
B．121576654590569000
C．1215766545905690000
D．12157665459056900000
请选择： A B C D
6、设a = 2，b = 3，c = 4，d = 5，下列表达式Not a <= c Or 4 * c = b^2 And b <>
a + c的值是（ D ）。
A．-1
B．1
C．True
D．False
请选择： A B C D
7、语句Print 5 * 5 \ 5 / 5的输出结果是（B ）。
A．5
B．25
C．0
D．1
请选择： A B C D
8、语句Print Sgn(-6^2) + Int(-6^2) + Int(6^2)的输出结果是（ C ）。
A．-36
B．1
C．-1
D．-72
请选择： A B C D
9、以下语句的输出结果是（B ）。
a = Sqr(3)
Print Format(a, "$$####.###")
A．$1.732
B．$$1.732
C．$1732
D．$$0001.732
请选择： A B C D
10、以下程序段的输出结果是（true ）。
a = Sqr(3)
b = Sqr(2)
c = a > b
Print c
A．$1.732
B．$$1.732
C．$1732
D．$$0001.732
请选择： A B C D
11、表达式4 + 5 \ 6 * 7 / 8 Mod 9的值是（B）。
A．4
B．5
C．6
D．7
请选择： A B C D
12、一个语句如果在下一行继续写，应在本行尾部加符号（C ）。
A．,
B．:
C．_
D．;
请选择： A B C D
13、假定Picture1和Text1分别为图片框和文本框的名称，下列不正确的语句是（B）。
B．Picture1.Print 25
C．Text1.Print 25
D．Debug.Print 25
请选择： A B C D
14、以下语句的输出结果是（A ）。
(Δ表示空格)
a = 27
b = 65
Print a; b
A．27 Δ 65
B．Δ 27Δ 65
C．27ΔΔ 65
D．Δ27ΔΔ 65
请选择： A B C D
15、在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a = InputBox("Enter the First integer")
b = InputBox("Enter the Second integer")
Print b + a
End Sub
程序运行后，单击命令按钮，先后在输入对话框中输入456和123，则输出结果是（A. 579）。
A．579
C．456
D．123456
请选择： A B C D
16、执行下面的语句后，所产生的消息框的标题是（A ）。
a = MsgBox("AAAA", , "BBBB", "", 5)
A．BBBB
B．空
C．AAAA
D．实时错误，不能产生消息框
请选择： A B C D
17、对用MsgBox显示的消息框，以下叙述中错误的是（ D）。
a = MsgBox("AAAA", , "BBBB", "", 5)
A．可以有一个按钮
B．可以有两个按钮
C．可以有三个按钮
D．可以有任意多个按钮
请选择： A B C D
18、假定有如下的窗体事件过程：
Private Sub Command1_Click()
a = "Visual Basic程序设计"
b = Left(a, 6)
c = Mid(a, 8)
MsgBox b, 34, c
End Sub
程序运行后，单击命令按钮，则在弹出的消息框的标题栏中显示的信息是（ Basic 程序设计）。
A．可以有一个按钮
B．可以有两个按钮
C．可以有三个按钮
D．可以有任意多个按钮
请选择： A B C D
19、设有语句x = InputBox("输入数值", "示例", "20")程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是（ B ）。
A．变量x的值是数值型数据10
B．变量x的值是字符串型数据"10"
C．10是默认值
D．在InputBox对话框标题栏中显示的是“输入数值”
请选择： A B C D
20、设a = 6，则执行x = IIf(a > 5, -1, 0)后，x的值为（ D）。
A．5
B．6
C．0
D．-1
请选择： A B C D。