- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- + 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
某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后,将会出现的提示信息是 ( )
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,50] 范围内某一随机整数的表达式是
A.Rnd * 50 |
B.Int(Rnd * 50) |
C.Int(Rnd * 50) + 1 |
D.Int (Rnd * 49) + 1 |
编写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


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 |
下列程序段运行后,变量s的值是( )。
Dim s,k as integer
s = 0
For k =___1___To 50
s =" s" + 2
Next k
Dim s,k as integer
s = 0
For k =___1___To 50
s =" s" + 2
Next k
A.1 | B.2 | C.50 | D.100 |
若变量a=5,b=8,则逻辑表达式:(a*b<10) and not (a="b)" or (a+3=b)的值是( )。
A.Ture | B.False | C.8 | D.40 |
以下变量的定义语句不正确的是:
A.const g=9.8 | B.Dim b(1 To 10) As String |
C.Dim True as Boolean | D.Dim y As Long |