- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 程序设计语言
- 循环结构
- + 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
有如下VB程序段:
x=25: y=20
If x>y Then
y =y+20
If y>50 Then y=y^2
Else
y=y^2
y=x+y
End If
Label1. Caption=Str(y)
该程序段执行后，标签Labell中显示的内容是（ ）
x=25: y=20
If x>y Then
y =y+20
If y>50 Then y=y^2
Else
y=y^2
y=x+y
End If
Label1. Caption=Str(y)
该程序段执行后，标签Labell中显示的内容是（ ）
| A．1600 | B．425 | C．400 | D．40 |
有如下VB程序段：
n = Val(Text1.Text)
For i = 2 to 1 Step -1
If n Mod 2 = 0 Then
n = n \ 2
Else
n = 3 * n + 1
End If
Next i
Label1.Caption = Str(n)
运行该程序，在文本框Text1中输入10，单击按钮Command1后，标签Label1中显示的内容为
n = Val(Text1.Text)
For i = 2 to 1 Step -1
If n Mod 2 = 0 Then
n = n \ 2
Else
n = 3 * n + 1
End If
Next i
Label1.Caption = Str(n)
运行该程序，在文本框Text1中输入10，单击按钮Command1后，标签Label1中显示的内容为
| A．2 | B．5 | C．10 | D．16 |
若输入28，运行结果是 。
Dim x as long
x=inputbox(“输入x的值”)
if x mod 3=0 then
x=x/3
else
x=x mod 3
end if
print x
Dim x as long
x=inputbox(“输入x的值”)
if x mod 3=0 then
x=x/3
else
x=x mod 3
end if
print x
| A．2 | B．2.25 | C．9 | D．以上答案都错 |
某算法流程图如下图所示，图框①②③中应填入的内容分别是
(1)输出 m = ①
(2) 输入 x=4，则输出 x = ②
(3) 执行完该流程图，s 的值为 ③
(1)输出 m = ①
(2) 输入 x=4，则输出 x = ②
(3) 执行完该流程图，s 的值为 ③
