- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- + 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
下列Visual Basic表达式中计算结果为4的是( )
A.Abs(-4.2) | B.Len("a123") | C.Sqr(4) | D.Int(3.5) |
下列能表示"x 大于0 且 x 小于10"的Visual Basic表达式是( )
A.x > 0 Or x < 10 | B.x >= 0 And x < 10 |
C.x >= 0 And x <= 10 | D.x > 0 And x < 10 |
将数学表达式
改写成VB表达式,正确的是

A.1 - Sqr(b ^ 2 – ac / 2) |
B.1 - Sqr(b ^ 2 – a * c / 2) |
C.1 - Abs(b ^ 2 – ac / 2) |
D.1 - Abs(b ^ 2 – a * c / 2) |
变量c中存储着一个字符,能正确判断出该字符为数字字符“a”~“z”的VB表达式是
A.c >= "a " And c <= "z " |
B.c >= "a " Or c <= "z" |
C.chr(c) >= "a " And chr(c) <= "z " |
D.chr(c) >= "a " Or chr(c) <= "z " |
有如下VB程序段:
Private Sub Command1_Click()
Dim n As Integer, r As Integer, s As String
Dim t As Integer, k As Integer, v As Integer
n = 35: t = 0: k = 0
s = ""
Do While n > 0
r = n Mod 2
n = n \ 2
t = t + r
k = k + 1
s = Str(r) + s
Loop
s = Mid("0000000", 1, 7 - k) + s
v = t Mod 2
Text1.Text = s + Str(v)
End Sub
执行该程序段后,文本框Text1中显示的内容是
Private Sub Command1_Click()
Dim n As Integer, r As Integer, s As String
Dim t As Integer, k As Integer, v As Integer
n = 35: t = 0: k = 0
s = ""
Do While n > 0
r = n Mod 2
n = n \ 2
t = t + r
k = k + 1
s = Str(r) + s
Loop
s = Mid("0000000", 1, 7 - k) + s
v = t Mod 2
Text1.Text = s + Str(v)
End Sub
执行该程序段后,文本框Text1中显示的内容是
A.1 0 0 0 1 1 1 | B.0 1 0 0 0 1 1 1 | C.1 1 0 0 0 1 1 | D.1 1 0 0 0 1 0 1 |