下面程序段是利用For语句给数组a赋值，使a(1)＝1，a(2)＝3，a(3...

单项选择题 下面程序段是利用For语句给数组a赋值，使a(1)＝1，a(2)＝3，a(3)＝5，……，a(50)＝99，则划线处的语句应该是()。 Dim a(1 to 50) As Integer For i＝1 To 50 ______Next i

A.a（i）＝2*i+1
B.a（i）＝2*（i+1）
C.a（i）＝i+2
D.a（i）＝2*i-1

1.单项选择题 下列Visual Basic表达式中，能产生一个10到99之间（包括10和99）随机整数的是（）。

A.Rnd（）*89
B.Rnd（）*50+10
C.Int（Rnd（）*89）+10
D.Int（Rnd（）*90）+10

2.单项选择题 在Visual Basic中，若a＝3，b＝3，c＝1，语句Ifa＞bThenc＝a+1Elsec＝b-1执行后，变量c的值是（）。

A.3
B.2
C.4
D.1

3.单项选择题某校田径运动会中，八名100米短跑运动员的成绩分别为12.1，12.3，12.6，12.8，13.0，13.3，13.5，13.8采用对分查找算法查找成绩13.8需要4次，这4次查找中依次比较的成绩是（）。

A.12.8 13.3 13.5 13.8
B.13.0 13.3 13.5 13.8
C.12.8 13.0 13.5 13.8
D.13.0 12.6 13.3 13.8

4.单项选择题长方体侧面积计算公式是s＝2h（a+b），a、b为长和宽，h为高，计算s的Visual Basic表达式是（）。

A. 2h（a+b）
B. 2h*（a+b）
C. 2*h（a+b）
D. 2*h*（a+b）

5.单项选择题 在Visual Basic中，若x、y都是正整数，且x能被y整除，则下列表达式值一定为真的是（）。

A.x／y＝0
B.Abs（x\y）＝x\y
C.Int（x\y）＝0
D.Int（x／y）＝x／y

6.单项选择题 下列属于Visual Basic工程文件的是（）。

A.circlE.frm
B.circlE.vbp
C.circlE.doc
D.circlE.jpg

7.单项选择题 在Visual Basic中，正确表示“a的平方减去b的平方”的表达式是（）。

A.（a-B.2
B.（a-B.^2
C.（a-B.*（a-B.
D.a^2-b^2

8.单项选择题 在Visual Basic中，语句sn＝“QQ2009”执行后，变量sn的数据类型是（）。

A.String
B.Integer
C.Boolean
D.Double

9.单项选择题计算月工资收入在2500元至4000元之间（含4000元不含2500元）的个人所得税算法如下：①输入月工资收入额x②用公式计算所得税y＝500×5%+（x-2500）×10%③输出所得税y，上述算法属于（）。

A.枚举算法
B.排序算法
C.递归算法
D.解析算法

10.单项选择题已知一个物体在斜抛运动时斜抛角度为α（弧度），斜抛初速度为v，重力加速度为9.8，计算物体水平位移的步骤有：①计算物体飞行时间t＝v？sinα／9.8②输入斜抛角度α和初速度v③输出变量s④计算水平位移量s＝2w？t？cosα其正确的顺序是（）。

A.③④①②
B.①②③④
C.②①④③
D.②①③④