VB 6．0中Integer表示整型，其取值范围是（  ）

A．0到32767	B．1到32767
C．－32768到32767	D．－65536到65535

下列哪一个表达式能产生一个属于区间100,999内的整数（ ）

A．Int（Rnd*1000）+100	B．Int（Rnd*900）+100
C．Rnd+998	D．Rnd*1000

当输入21，输出结果是 。
Dim x as long
x=inputbox(“输入x的值”)
if x mod 10="1" then
if x mod 8="3" then
x=x-12
end if
else
x=x-7
end if
print x

下列VB程序段用于比较两个等长的字符串a和b，并在标签Label1中显示比较结果：如果a和b完全相同，则输出“完全相同”，否则在输出结果中指出第1个不相同字符的位置。
k＝0 ’整数型变量k用于记录第1个不相同字符的位置
For i＝1 To Len(a) ’字符串变量a用于存储第1个字符串
key＝Mid(a，i，1)
If key＜＞Mid(b，i，1) Then ’字符串变量b用于存储第2个字符串
Exit For
End If
Next i
If k＝0 Then
Label1.Caption＝“完全相同”
Else
Label1.Caption＝“第”＋Str(k)＋“个字符不相同”
End If
方框中的正确语句是(  )

A．k＝i	B．k＝0
C．k＝1	D．k＝len(a)

在VB中，如果要定义变量p用于存储年级学生姓名，那么变量p的数据类型是(   )。

A．String

B．Integer

C．Boolean

D．Date