《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的值是 （A ）110 （B ）103 （C ）200 （D ）100100

6、 在Visual Basic 中，a = -100，表达式"360" + Str(a)的值是（ ） （A ）260 （B ）360-100 （C ）460 （D ）360100 7. 在Visual Basic 中，表达式5678\100的值是

（A ）5 （B ）56 （C ）56.78 （D ）567 8. 在Visual Basic 中，表达式12345 Mod 100的值是 （A ）123 （B ）45 （C ）12 （D ）5 9. 在Visual Basic 中，表达式Fix(1.8)的值是

（A ）2 （B ）1.8 （C ）1 （D ）0.8 10、将数学表达式

x x cos sin 2

1

（x 的单位：弧度）写成Visual Basic 表达式，正确的是

（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 ≤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

（C ）Int(Rnd()*12)+1 （D ）Int(Rnd()*13)+1

15、设x 是正数，下列能用于描述"x 是否为偶数"的Visual Basic 条件表达式是

（A）x \ 2 = 0 （B）x / 2 = 0 （C）x Mod 2 = 0 （D）x = Abs(x)

二、填空题

1、有如下Visual Basic程序段：

a = 4

b = 5

a = a / 2

c = Abs(a - b)

该程序段运行后，变量c的值为____________。

2、有如下Visual Basic程序段：

a = 9

b = "Command Button"

c = Len(b)

If a > 0 And a < c Then

Label1.Caption = Mid(b, a, 6)

Else

Label1.Caption = "error"

End If

该程序段运行后，在标签Label1上显示的是____________。

3、有如下Visual Basic程序段：

a = 3.14

b = 20

c = Int(a) + b

该程序段运行后，变量c的值为____________。

4、有如下Visual Basic程序段：

a = "360"

b = Val(a)

c = Len(a)

If b > c Then

Label1.Caption = "取数值"

Else

Label1.Caption = "取字符"

End If

该程序段运行后，在标签Label1上显示的是____________。

5、有如下Visual Basic程序段：

a = 6

b = "Hello!"

c = (a ^ 2) - Len(b)

该程序段运行后，变量c的值为____________。

6、有如下Visual Basic程序段：

a = 10

b = 6

c = 5

If a + b > c And b + c > a And c + a > b Then

Label1.Caption = "YES"

Else

Label1.Caption = "NO"

End If

该程序段运行后，在标签Label1上显示的是____________。

7、有如下Visual Basic程序段：

w = 9

a = 90

b = 50

If w > 10 Or a * b > 4000 Then

Label1.Caption = "托运"

Else

Label1.Caption = "携带"

End If

该程序段运行后，在标签Label1上显示的是____________。

5、《VB程序设计基础》练习题答案

一、选择题：

二、填空题：

1、3

2、Button

3、23

4、取数值

5、30

6、Y es

7、托运