当前位置:首页 >> 政史地 >> vb综合考试试题

vb综合考试试题


1303 班 9 月 16 日第一次综合考试试题
一、单选(本大题共 25 小题, 每小题 2 分,共 50 分) 1. 设 a=2,b=3,c=4,d=5,表达式 NOT a<=c OR 4*c=b^2 AND b<>a+c 的值是( A、-1 的是_ __。 A) Left(A,5)+Right(B,5) C) Mid(A,1,5)+Mid(B,1

,6) 3、下列叙中不正确的是( B) Right(A,5)+Left(B,5) D) Right(A,5)+Right(B,5) ) B、变量名的长度不超过 255 个字符 D、变量名不能使用关键字 B、 1 C、True D、 False )。

2、假设 A="Good Morning.",B="Afternoon,Boys.",下列表达式中结果是"Good Boys."

A、变量名中的第一个字符必须是字母

C、变量名可以包含小数点或者内嵌的类型声明字符 A. 变体是一种没有类型的数据 B. 变体的空值就表示该变体的值为 0 C. 一个变量没有定义就赋值,该变量即为变体类型

4、下列关于变体类型的描述,其中正确的是_______。

D. 变体是赋给变量某一种类型数据后,就不能再赋给它另一类型的数值 5、执行 PRINT 18/2*3,-3^2 命令后,输出结果为_____。 A. 3 C. 27 9 -9 B. 3 D. -9 -9 27

6、下面的_______语句可以实现:先在窗体上输出大写字母 A,然后在同一行的第 10 列 输出小写字母 b。 A. Print "A";Tab(9);"b" C. Print "A";Space(10);"b" A. HELLO a) c) a) B. hello B. Print "A";Tab(10);"b" D. Print "A";Tab(8);"b" C. He D. he

7、语句 Print Format("HELLO", "<")的输出结果是______。 8、如果 X 是一个正的实数,将千分位四舍五入,保留两位小数的表达式是 0.01*int(x+0.05) 0.01*int(100*(x+0.05)) 0 b) 空 c) 1 b) 0.01*int(100*(x+0.005)) d) 0.01*int(x+0.005) ) d) 0.1 D. 0~3 d) False )
1

9、变量未赋值时,数值型变量的值为(

10、A=5,B=8,则(B-A)*Rnd+A 的结果是介于______之间的数。 A. 5~8 a) x+y=11 B. 0~5 b) 11 c) C. 3~5 True 11、若 x=5,y=6,则表达式 x+y=11 的值是_____。 12、下列过程中对形参的定义正确的是(

A. Sub F(x%,3) C. Sub FF(x%,y%) AS Integer

B. Function M(ByVal x%)As Boolean D. Function MM(x+y) ) 。

13、下列有关过程的叙述中错误的是( B.Sub 过程中不能嵌套定义 Sub 过程 C.Sub 过程中可以嵌套调用 Sub 过程

A.如果过程被定义为 Static 类型,则该过程中的局部变量都是 Static 类型

D.事件过程可以像通用过程一样由用户定义过程名 14、执行语句 Print format(5459.478,"##,#0.00"),正确的输出是______。 a)5459.48 b) 5,459.48 a) a) how .frm b) are b) .cls c) c) c)5,459,478 d) 5,459.47 d) ho d) .vbp 15、表达式 Left("how are you ",3)的值是_____。 you .bat 16、以下不属于 Visual Basic 系统的文件类型是 _____ 17、以下程序段的运行结果是___ ____。 Private Sub Form_Click() m = 1 n = 1 Do m = m * n n = n + 1 Loop Until n > 4 Print m End Sub A. 25 a) 5 B. 45 b) 6 c) 10 C. 55 d) 12 D. 24 18、如果有声明 Dim a(5) As Integer,则该数组共占用______个字节内存。 19、在 Visual Basic 设计界面中不能隐藏的窗口是______。 a)工程窗口 b) 属性窗口 c) 立即窗口 d) 窗体窗口 20、8.6787E+8 写成普通的十进制数是_______。 a)86787000 b)867870000 c) 8678700 d)8678700000 ) 21、从键盘上输入一个实数 nu,执行 Visual Basic 语句,利用字符串函数对该数进行处 理,如果输出的内容不是字符 END,则程序输出的内容是 ( nu=InputBox("nu=") n$=Str$(nu) p=InStr(n$,".") If p>0 Then
2

Print Mid$(n$,p) Else Print "END" End If A.用字符方式输出数据nu B.输出数据的整数部分 C.输出数据的小数部分+小数点(包括小数点) D.只去掉数据中的小数点,保留所有数字输出 22、Visual Basic 中如果在立即窗口中执行以下操作,则输出的结果是( m = 123: n = 145 p = Len(Str$(m) + Str$(n)) Print p A.2 B .4 C .5 D.8 23、执行如下程序段时,从键盘输入-5,输出的结果是_______。 x=-5 s=Val(InputBox("请输入 s 的值:")) Select Case s Case Is>0 y=x+1 Case Is=0 y=x+2 Case Else y=x+3 End Select Print x;y A. -5 -2 B. -5 -4 C. -5 -3 D. -5 -5 ) 24、执行下面 Visual Basic 程序,最后输出 s 是( Dim a As Integer, i As Integer Dim b As Integer, j As Integer Dim s As Integer a = 5 b = 10 s = 0 For i = 1 To a b = 5 For j = 1 To b
3

)

s = s + b b = b - 1 Next j Next i Print s A. 15 B. 30 25、以下说法不正确的是( C. 45 ) D. 75

A.使用 ReDim 语句可以改变数组的维数 B.使用 ReDim 语句可以改变数组的类型 C.使用 ReDim 语句可以改变数组每一维的大小 D.使用 ReDim 语句可以对数组中的所有元素进行初始化 二、判断题(每题 1 分,共 8 分) 1. VB 中, 变量按其作用范围来说可以分为全局变量、 模块级变量和局部变量三种类型 ( ) 2. Erase 语句可以释放内存中常规数组所占的空间。 ( ) 3. 静态局部变量是在过程中用 Static 语句声明的。 ( ) 4. 变体型变量的数据类型是由赋给它值的数据类型决定。设 A 的类型为变体型,执行 A="True"后则 A 的类型为逻辑型。 ( ) 5. Dim X As Boolean, Y X = True Y = 0 Print X > Y ) 程序的输出结果为 False(

6. 任意整数 X 十位上的数字可以表示为(X MOD 100 - X MOD 10)\10。 ( ) 7. Visual Basic 具有三种基本的流程控制结构:顺序结构、分支结构和循环结构。 ( ) 8. 在 Visual Basic 中,调用子过程时,如果实参是数组,则形式参数也为数组,而且形 式参数的数组不能加括号。 ( ) 三.填空: (本大题共 12 分, 每空 2 分) 1、假定当前日期为 2002 年 7 月 12 日,星期六,则执行语句 Print day(now)后,输出结 果是______。 2、根据变量的定义位置和所使用的变量定义语句的不同,VB 中的变量可以分为 3 类, _____、模块变量和全局变量。 3、以下循环的执行次数是_____。 K=0 Do While k<=10 k=k+1 Loop
4

4、函数 Len("Hello!"+Space(2)+Mid("Shanghai",5,3))的值是_______。 5、下列程序的执行结果为______。 A="1" B="2" A=Val(A)+Val(B) B=Val("12") If A<>B Then Print A-B Else Print B-A 6、数学表达式 Cos (a+b)+5e +lg3 相对的 VB 表达式是________________ 五、读程序,写结果(每题 5 分,共 20 分) 1、Private Sub Command1_Click() a = 0: s = 0 For i = 1 To 2 For j = 1 To 4 If j Mod 2 <> 0 Then a = a + 1 End If a = a + 1 s = s + 1 Next j Next i Print "a="; a, "s="; s End Sub 2、Option Base 1 Dim a()As Integer Private Sub Form_Click() Dim i As Integer,j As Integer ReDim a(2,2) For i=1 To 2 For j=l To 2 a(I,j)=i*2+j Print “a(”;i;“,”;j;“)=”;a(i,j); Next j Print Next i End Sub 3、Private Sub form_click()
5
2 2

Dim a(3, 3) As Integer, I As Integer Dim j As Integer, k As Integer, n As Integer n = 9 For k = 5 To 1 Step -1 If k >= 3 Then For I = 1 To 6 - k a(k - 3 + I, I) = n n = n - 1 Next I Else For I = 1 To k a(k - I + 1, 3 - I + 1) = n n = n - 1 Next I End If Next k For k = 1 To 3 For I = 1 To 3 Print a(k, I); Next I Print Next k End Sub 4. Private Sub Form_Click() Dim x() As String a = " How are you!" n = Len(a) ReDim x(1 To n) For i = n To 1 Step -1 x(i) = Mid(a, i, 1) Next I For i = 1 To n Print x(i); Next i End Sub 六.程序改错。 (本大题共 2 个小题,每题 5 分,共 10 分,每个程序有两处错误,请在
6

答题纸上写出错误行代码和改正后的代码。 ) 1. 下面的程序是将一个十进制整数转换成二进制数,转换后按位放到一维数组 A 中,然 后输出。如输入一个数据 8,将输出 1000。程序中有两处错误,请改正 Dim a(10) As Integer Dim k As Integer Dim yu As Integer Dim i As Integer i = 1 k = InputBox("请输入一个数") Do While k <> 0 yu = k / 2 a(i) = yu k = k \ 2 i = i + 1 Loop For yu = i To 1 Step -1 Print a(yu); Next yu 2.陈婷今年 17 岁,植了 3 棵树。以后每年多植一棵,问他到什么时候才能累计种到或 超过 100 棵树? Dim age As Integer, tree As Integer age = 17 tree = 3 Do age = age - 1 tree = tree + age + 14 Loop Until tree = 100 Print "到"; age; "岁时种到 100 棵树" 七、程序填空(每空 5 分,共 20 分) 1.下列程序功能是:产生 10 个 1~99 随机奇数,将其显示出来,用冒泡法按从小到大 排列输出: Option Base 1 private sub form _click() dim a%(10) i=1 Do while i<=10
7

x=int(rnd*99+1) if x Mod 2 <>0 then a(i)=x:print a(i); i=i+1 end if Loop print for i=1 to 9 for j=1 to ____________ if _______________ then t=a(j):a(j)=a(j+1):a(j+1)=t end if Next j next i for i=1 to 10 print a(i); next i End sub 2.程序功能:有一分数序列:2/1、 2/3、 5/3 、 8/5 、 13/8、 21/13??求出这 个数列的前 20 项之和。 Private Sub Command1_Click() Dim s as single Dim a as integer, b as integer, c as integer a = 1:b = 2:s=0 For i = 1 To 20 _____________ c = a + b a = b _____________ Next i Print s End Sub

8


更多相关文档:

vb综合考试试题

vb综合考试试题_政史地_高中教育_教育专区。1303 班 9 月 16 日第一次综合考试试题一、单选(本大题共 25 小题, 每小题 2 分,共 50 分) 1. 设 a=2...

VB综合复习题

VB综合复习题_IT认证_资格考试/认证_教育专区。VB综合复习题 综合复习题一、选择题 1. 以下叙述中,错误的是___。 A. VB 是事件驱动型可视化编程工具 B. VB...

VB考试真题一 含答案

(15 分) (本题不要求填写运行结果) 请将你解答本题所写的源程序粘贴到下面或者上载源程序 VERSION 5.00 Begin VB.Form Form1 Caption = "Form1" Client...

VB期末考试试题及答案

VB期末考试试题及答案_从业资格考试_资格考试/认证_教育专区。VB 期末考试试题及答案一、 填空题 1、 VB 程序设计的主要特点是 可视化设计 和 事件 编程 。2、...

VB_经典考试题及答案

33 2006 年 4 月全国计算机等级考试二级 VB 笔试试卷 ... 33 2005 年 9 月全国计算机等级考试二级 VB 笔试试卷 ... 43 2005 年 4 月全国计算机等级考试二...

VB上机操作题综合

VB上机操作题综合_IT认证_资格考试/认证_教育专区。VB 程序设计—《暴风影音》程序运行前: 程序运行后: 说明:当用户双击窗体任意区域时,播放器窗口最大化。 提示...

VB期末考试试卷及答案

VB期末考试试卷及答案_工学_高等教育_教育专区。VB期末考试试卷及答案VB 期末考试试卷及答案一·选择题 1.Visual Basic 是一种面向对象的程序设计语言,构成对象的...

VB综合单元练习题一

VB综合单元练习题一_IT认证_资格考试/认证_教育专区。VB 单元练习题一 一、选择题 1、 Visual Basic 集成开发环境中不包括下列哪些窗口?( D) A. 工具箱窗口 ...

VB期末考试试题及答案 (1)

VB期末考试试题及答案 (1)_IT认证_资格考试/认证_教育专区。第一部分:客观题一、 单项选择题 1、在窗体模块的通用段中声明变量时,不能使用的关键字是( ) A...

VB期末考试试题及答案

VB期末考试试题及答案_工学_高等教育_教育专区。此试题是我们学校往年的VB期末考试试题及答案。希望对大家有用。。VB 期末考试试题及答案 期末考试试题及答案一、 ...
更多相关标签:
vb考试试题及答案 | vb期末考试试题及答案 | vb计算机二级考试试题 | vb上机考试试题及答案 | 初中vb考试试题及答案 | 上海vb考试试题及答案 | 医学综合考试试题 | 教师综合素质考试试题 |
网站地图

文档资料共享网 nexoncn.com copyright ©right 2010-2020。
文档资料共享网内容来自网络,如有侵犯请联系客服。email:zhit325@126.com