下列运算结果中，值最大的是(    )

A．3\4

B．3/4

C．4 mod 3

D．3 mod 4

VB中工程文件的扩展名为(    )

A．vbp

B．frm

C．.bas

D．.vbw

Sub test7()
For i =" 1" To 6
S =" S" + (-1) ^ i  *2 ^ i
Next i
MsgBox (S)
End sub
该程序的运行结果是（   ）

A．126

B．-126

C．-42

D．42

Function f(x As Long, y As Long) As Long
Dim t As Long, r As Long
If x < y Then t =" x:" x =" y:" y = t
r =" x" Mod y
Do While r <> 0
x =" y:" y = r
r =" x" Mod y
Loop
f = y
End Function
-------------------------------------------------------------------------------------------------
Private Sub Command1_Click()
Dim a As Long, b As Long
x = Val(InputBox("x="))
y = Val(InputBox("y="))
a =" x:" b = y
s =" f(x," y)
MsgBox (Str(a * b / s))
End Sub
当x=20，y=6时，以上程序运行后，输出结果是（   ）

A．2

B．120

C．30

D．60

Sub test12()
S=0
Do While c <=5
C ="C" + 1
S=S+C
Loop
MsgBox (STRC、 + STR(S))
End Sub
该程序的运行结果是（  ）

A．5  15

B．6  15

C．5  21

D．6  21

在数组变量A中，A（1）、A（2）、…、A(10依次放了1号、2号、…、10号同学的成绩，下面一段程序的功能是实现反次序在列表框list1中输出这10个同学成绩，即输出次序为： A（10）、A（9）、…、A(1)， 程序段如下：
Dim A(-20 To 20) As Integer
for i=① to ② step ③
List1.AddItem A( ④ )
Next i
上程序中的①,②,③,④依次填入有下面几个可能答案：
（1）、 10，  1，  -1， i
（2）、  1， 10，  1， 11-i
（3）、 -5，  4,    1,  5-i
（4）、0.2,   2,  0.2,  11-i/0.2
上面答案中，正确的有（  ）

A．1个

B．2个

C．3个

D．4个

有关下列语句说法不正确的是（   ）
① If a="b=c" Then  Msgbox(“这三个数相等”)  Else  Msgbox(“这三个数不相等”) 
②赋值语句 a=b>c
③赋值语句 a+b=c
④ Msgbox  (a+b=c)

A．语句①能运行，但逻辑上有错误

B．语句②能运行，且无任何逻辑错误

C．语句③不能运行

D．语句④不能运行

一个漂亮的酒杯被摔碎了，则漂亮、酒杯、摔、酒杯被摔碎了分别代表的是（）

A．对象，属性，事件，方法	B．对象，属性，方法，事件
C．属性，对象，方法，事件	D．属性，对象，事件，方法

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim n As Integer
Dim m As Integer
m = 0
For n =" 1" To 20
If n Mod 3 <> 0 Then m =" m" + n \ 3
Next n 
Text1.text = Str(m)
End Sub
程序运行后，如果单击命令按钮，则文本框Text1中显示的内容是    (    )

A．15

B．18

C．42

D．24

在信息加工中，经常要对被处理的数据进行排序，在排序时经常要进行数据的交换。下面有四个程序段：
      
其中将能正确地x和y两个变量中的数据进行交换的程序段有几个？

A．1个

B．2个

C．3个

D．4个