- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 算法实例
- + 面向对象程序设计 VB开发工具
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 算法实例的程序实现
- 算法及算法的表示方法
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
| A．Int(Rnd() * 9) + 90 | B．Int(Rnd() * 90) + 10 |
| C．Int(Rnd() * 89) + 10 | D．Int(Rnd() * 99) + 1 |
Dim a(1 To 10) As Integer
a(10) = 1
a(9) = 2
For x = 8 To 1 Step -1
a(x) = a(x + 1) + a(x + 2)Next x
该程序段运行后，a(6)的值是（ ）| A．5 | B．8 | C．11 | D．13 |
S = 0
For I = _____ to 3 step -1
S = S + iNext I
该程序段运行后，语句S = S + i共执行了4次，则下划线处应是（ ）| A．0 | B．1 | C．5 | D．6 |
s = 0
i = 0
Do While s < 10
i = i + 1
s = s + i * i
Loop
| A．3 | B．2 | C．1 | D．4 |
Dim i As Integer
Dim x As Integer
Dim y As Integer
y=30
For i=1 To 3x=Val(InputBox(“x=”))
If y< x Then
y=x
End If
Next i
Print y
程序运行后，依次输入：36 87 51
运行后输出结果是_________________。
Dim a(10) as integer
Dim i as integer
Dim s as integer
For i=1 to 5
a(i)=i*i
next i
s=a(3)+a(4)
print s
上述程序运行后，变量s的值是________
Private Sub Command1_Click()
Dim i As Integer, c As String, s As String, t As String
s = Text1.text
t = ""
For i = 1 To Len(s)
c = Mid(s, i, 1)
If c >= "0" And c <= "9" Then t = t + c
Next i
Text2.text = t
End Sub
运行该程序，在文本框Text1中输入“2016_Student”（不包含引号），单击命令按钮Command1后，文本框Text2中显示的内容是_________。Dim a As Integer
Private Sub Command1_Click()
Timer1.Enabled = True
Timer1.Interval = 100
End Sub
Private Sub Timer1_Timer()
a = a + 1
Image1.Picture = LoadPicture(App.Path & "\" & a & ".jpg")
If a >= 8 Then a = 0
End Sub
单击命令按钮Command1，加框处语句执行的时间间隔为（ ）| A．0.1秒 | B．1秒 | C．10秒 | D．100秒 |
| A．For…Next | B．Do While…Loop |
| C．If…Then… | D．Do…Loop Until |