某VB程序的一个事件过程如下:
Private sub command1_click( )
Dim i as integer
Dim a(1 to 8 ) as integer
List1.clear
For i="1" to 99
a(i)=i+1
Next i
For i="1" to 8
list1.AddItem   str(a(i))
Next i
End sub
程序运行时,单击命令按钮command1后,将会出现的提示信息是 ( )
A.溢出B.下标越界
C.类型不匹配D.无效的过程调用或参数
当前题号:1 | 题型:选择题 | 难度:0.99
产生[1,50] 范围内某一随机整数的表达式是   
A.Rnd * 50 
B.Int(Rnd * 50)
C.Int(Rnd * 50) + 1
D.Int (Rnd * 49) + 1
当前题号:2 | 题型:选择题 | 难度:0.99
编写VB程序,实现如下功能:在文本框Textl和Text2中分别输入一个整数,单击命令按钮Command1,在列表框List1中显示结果,运行效果如1图所示。结果包含两列数据,第1列为两数之间的摄氏温度值(间隔1度、升序),第2列为对应的华氏温度值。
 
1图 2图
(1)要使命令按钮Command1上显示的文本改为“转换”,可在其属性窗口(2图) 中将属性的属性值修改为“___________”。
(2)为实现上述功能,请在划线处填入合适代码或选项。
Private Sub Command1_Click()
Dim t1 As Integer, t2 As Integer
Dim i As Integer, t As Integer
Dim f As Single
List1.Clear
t1 = Val(Text1.Text)
t2 = Val(Text2.Text)
If     ①     Then  '(选填字母,从下列A.B.C.D四个选项中选取一项)
t =" t1:" t1 =" t2:" t2 = t
End If
i = t1
Do While ②     '(选填字母,从下列A.B.C.D四个选项中选取一项)
f =" i" * 9 / 5 + 32    '摄氏温度转换为华氏温度
List1.AddItem Str(i) + " " + Str(f)
'(填程序代码)
Loop
End Sub
划线①、②处的选项:
A.i <= t2  B.f <= t2  C.t1 > t2 
A.i < f
当前题号:3 | 题型:填空题 | 难度:0.99
下列程序段运行后,变量s的值是( )。
Dim s,k as integer
s = 0
For k =___1___To 50
s =" s" + 2
Next  k
A.1B.2C.50D.100
当前题号:4 | 题型:选择题 | 难度:0.99
若变量a=5,b=8,则逻辑表达式:(a*b<10)  and not (a="b)" or (a+3=b)的值是( )。
A.TureB.FalseC.8D.40
当前题号:5 | 题型:选择题 | 难度:0.99
程序中的变量是计算过程中要用的数据的   
当前题号:6 | 题型:填空题 | 难度:0.99
以下变量的定义语句不正确的是:
A.const g=9.8B.Dim b(1 To 10) As String
C.Dim True as BooleanD.Dim y As Long
当前题号:7 | 题型:选择题 | 难度:0.99
在VB中,用变量存储某个人的身份证号码,以下数据类型合适的是:
A.IntegerB.LongC.StringD.Single
当前题号:8 | 题型:选择题 | 难度:0.99
已知a,b为整型变量,下列VB表达式值恒为False的是:
A.a=bB.a>b And b>aC.a>b or b>aD.a<>b
当前题号:9 | 题型:选择题 | 难度:0.99
下列可作为变量名的是:
A.3DB.X_YC.X+YD.And
当前题号:10 | 题型:选择题 | 难度:0.99