- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- + 赋值语句
- 选择语句
- 循环语句
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
以下程序段运行后，整型变量max1，min1的值分别是（ ）。
a=3 b=5
max1=(a+b)/2+Abs(a-b)/2
min1=(a+b)/2-Abs(a-b)/2
a=3 b=5
max1=(a+b)/2+Abs(a-b)/2
min1=(a+b)/2-Abs(a-b)/2
| A．5，3 | B．5，5 | C．3，3 | D．3，5 |
将双精度浮点数变量x的值四舍五入保留三位小数，赋值给双精度浮点数变量y，y=_______________________________
交换LABEL2和LABEL3中的数据
PRIVATE SUB FORMCLICK（ ）
LABEL2.CAPTION=90 : LABEL3.CAPTION=86
C=LABEL2.CAPTION
________
________
END SUB
PRIVATE SUB FORMCLICK（ ）
LABEL2.CAPTION=90 : LABEL3.CAPTION=86
C=LABEL2.CAPTION
________
________
END SUB
输入一个两位正整数，个位和十位交换后在LABEL1上和窗体上分别输出。
PRIVATE SUB FORM-CLICK( )
DIM X AS INTEGER, G AS INTEGER
DIM S AS INTEGER , Y AS INTEGER
X=VAL(INPUTBOX(“请输入一个两位正整数”))
G=________ ‘个位
S=________ ‘十位
Y=________ ‘新数
________
________
END SUB
PRIVATE SUB FORM-CLICK( )
DIM X AS INTEGER, G AS INTEGER
DIM S AS INTEGER , Y AS INTEGER
X=VAL(INPUTBOX(“请输入一个两位正整数”))
G=________ ‘个位
S=________ ‘十位
Y=________ ‘新数
________
________
END SUB
窗体上有标签LABEL1,有两个命令按钮，COMMAND1的标题是“变大”，COMMAND2的标题是“变小”。单击“变大”按钮，LABEL1中的字变大一倍，单击“变小”按钮，LABEL1中的字变小一倍。
PRIVATE SUB COMMAND1-CLICK( )
________
END SUB
PRIVATE SUB COMMAND2-CLICK( )
________
END SUB
PRIVATE SUB COMMAND1-CLICK( )
________
END SUB
PRIVATE SUB COMMAND2-CLICK( )
________
END SUB
a=2：b=3
a=a+b：b=b+a
print a，b
这段程序的执行结果是（ ）
a=a+b：b=b+a
print a，b
这段程序的执行结果是（ ）
| A．15 21 |
| B．5 8 |
| C．6 9 |
| D．21 15 |
下列VB程序运行时，单击命令按钮Command1后，文本框Text1中显示的内容是____________________。（2分）
Private Sub Command1_Click()
Dim i As Integer, c As Integer, n As Integer
c =" 0:" n = 10
For i =" 1" To 10 Step 2
If n Mod i =" 0" Then
c =" c" * i
Else
c =" c" + i
End If
Next i
Text1.Text = Str(c)
End Sub
Private Sub Command1_Click()
Dim i As Integer, c As Integer, n As Integer
c =" 0:" n = 10
For i =" 1" To 10 Step 2
If n Mod i =" 0" Then
c =" c" * i
Else
c =" c" + i
End If
Next i
Text1.Text = Str(c)
End Sub