《VB程序设计基础》练习题
《VB 程序设计基础》练习题
、选择题: 1在Visual Basic 中，下列能作为变量名的是 （A ） x+1
（ B ）x_1
（ C Or （ D ） If 2、 在Visual Basic 中，语句 Dim x As Single
所说明的变量 x 属于
（A ）整数型
（B ）逻辑型 （C ）字符串型 （D 单精度实数型
3、 在Visual Basic 中，用变量p 存储杂志的刊号（如CN 41-103 ”），变量p 的数据类型应定义 为（
（A ） String （ B ） Integer （ C ） Single （ D ） Date
4、 在Visual Basic 中，用变量存储 560位学生的身高数据（如：1.76 ），下列最合适的变 量说明
是
（A ） 将560个变量说明为整数型 （B ） 将560个变量说明为单精度实数型
（C ） 将一个元素个数为 560的一维数组说明为整数型 （D ） 将一个元素个数为 560的一维数组说明为单精度实数型 5、在 Visual Basic 中，表达式 Sqr(100) + 100 的值是
1 .
10、 将数学表达式 sin xcos x (x 的单位：弧度)写成 Visual Basic 表达式，正确的
2
是
(A) SinxCosx / 2 (B) Sinx * Cosx / 2 (C) Sin(x)Cos(x) / 2 (D) Sin(x) * Cos(x) / 2
11、 下列属于正确的 Visual Basic 表达式是( ) (A ) a+b*|c|
( B ) b3+2
( C ) 2n-1
( D ) 2 ? h/g
12、 在Visual Basic 中，从字符串"Good morning"中截取"morning"的表达式是( )
(A ) Mid("Good morning", 6, 7) ( B ) Mid(Good morning, 6, 7) (C ) Mid("Good morning", 5, 7)
( D ) Mid("Good morning", 7, 7) 13、 将数学表达式 a < b w c 写成Visual Basic 表达式，正确的是
(A ) a<=b<=c ( B ) a<=b Or b<=c (C ) a<=b And b<=c ( D ) a<=b Not b<=c
14.
随机产生［0,12)中的数，以模拟旅客通过检票口的时间，正确的 Visual Basic 表达式是
(A ) Rnd()*12
(B ) Rnd()*13
(A ) 110 ( B ) 103
在 Visual Basic 中，a = -100，表达式"360" + Str(a)
(B ) 360-100 (C) 200
(D ) 100100
6、 (A ) 260 7. 在Visual Basic (A ) 5
8. 在Visual Basic (A ) 123 ( B )
(C ) 460
的值是（
） 中, (B ) 中, 45 中, 1.8
表达式5678\100的值是 56 ( C ) 56.78
表达式12345 Mod 100的值是
(D ) 5 的值是
(D ) 0.8
(C ) 12 表达式Fix(1.8) (C ) 1
(D ) 567
(C) Int(Rnd()*12)+1 (D) Int(Rnd()*13)+1
15、设x是正数，下列能用于描述"x是否为偶数”的Visual Basic 条件表达式是
(A ) x \ 2 = 0 (C ) x Mod 2 = 0
、填空题
1、有如下 Visual Basic 程序段
a = 4
b = 5
a = a / 2
c = Abs(a - b)
该程序段运行后，变量
c 的值为 2、有如下 Visual Basic
程序段
a = 9
b = "Comma nd Butt on"
c = Len(b)
If a > 0 And a < c The n
Label1.Caption = Mid(b, a, 6) Else
Label1.Caption = "error" End If
该程序段运行后，在标签 Label1上显示的是 _______________ 3、 有如下Visual Basic 程序段：
a = 3.14
b = 20
c = In t(a) + b
该程序段运行后，变量 c 的值为 ______________ 。 4、 有如下Visual Basic 程序段：
a = "360"
b = Val(a)
c = Len(a) If b > c The n
Label1.Caption =" 取数值" Else
Label1.Caption =" 取字符”
End If
该程序段运行后，在标签 Label1上显示的是 _______________ 5、 有如下Visual Basic 程序段：
a = 6
b = "Hello!"
c = (a A 2) - Len(b)
该程序段运行后，变量 c 的值为 ______________ 。 6、 有如下Visual Basic 程序段：
a = 10
b = 6
c = 5
(B ) x / 2 = 0 (D ) x = Abs(x)
If a + b > c And b + c > a And c + a > b The n
Labell.Captio n = "YES"
Else
Label1.Caption = "NO"
End If
该程序段运行后，在标签Label1上显示的是 _______________
7、有如下Visual Basic 程序段：
w = 9
a = 90
b = 50
If w > 10 Or a * b > 4000 The n
Labell.Caption =" 托运”
Else
Labell.Caption =" 携带”
End If
该程序段运行后，在标签Labell上显示的是________________
5、《VB程序设计基础》练习题答案、选择题:
、填空题:
1、3
2、Button
3、23
4、取数值
5、30
6、Yes
7、托运