- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- + 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
设a=" -" 8,b=6,下列运行结果中，值最大的是（ ）
| A．2*a+3*b | B．sqr(a^2+b^2) | C．int(a+b) | D．abs(b+a/b) |
输出的结果为 。
c = 0
for m =" 0" to 2
s = 0
Do While s < 60
c =" c" + 1
s =" s" + 1
Loop
next
Print c
c = 0
for m =" 0" to 2
s = 0
Do While s < 60
c =" c" + 1
s =" s" + 1
Loop
next
Print c
输入19，输出的结果为 。
Dim s As String '定义变量s为字符串类型
Dim n As Long
n = InputBox("n")
s = ""
Do While n > 0
a =" n" Mod 2
s =" Str(a)" + s '将数字a转换成字符，连接在字符串s的左边
n =" n" \ 2
Loop
Print s
Dim s As String '定义变量s为字符串类型
Dim n As Long
n = InputBox("n")
s = ""
Do While n > 0
a =" n" Mod 2
s =" Str(a)" + s '将数字a转换成字符，连接在字符串s的左边
n =" n" \ 2
Loop
Print s
小金编写了VB程序，部分程序如下所示，在调试程序的时候出现如图所示的错误信息：
Private Sub Command1_Click()
Dim x As String, i As Integer
For i =" 1" To 10
If i Mod x =" 1" Then
x = "奇数"
Else
x = "偶数"
Next i
……
End Sub
产生此错误的语句是( )。
Private Sub Command1_Click()
Dim x As String, i As Integer
For i =" 1" To 10
If i Mod x =" 1" Then
x = "奇数"
Else
x = "偶数"
Next i
……
End Sub
产生此错误的语句是( )。
| A．For | B．End If |
| C．Next | D．If |
如果x=4，那么以下运算结果为True的表达式是 ( )
| A．x<="4" And x>="6" | B．x>4 Or x>=6 |
| C．x<4 Or x>6 | D．Not x<>4 |
下列VB表达式的值等于3的是( )。
| A．Sqr(2) + 1 | B．Abs(-1) - 2 |
| C．Asc("1") + 2 | D．Len("-2") + 1 |
将数学表达式
写成Visual Basic表达式，正确的是( )。
写成Visual Basic表达式，正确的是( )。| A．Sqr(b*b-4a*c) |
| B．Sqr(b*b-4*a*c) |
| C．Str(b*b-4*a*c) |
| D．Sqr(b*b-4ac) |