- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 算法实例
- + 面向对象程序设计 VB开发工具
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 算法实例的程序实现
- 算法及算法的表示方法
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
小金编写了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 |
程序修改题，每小题①②③④处有1处错误，找出并改正
| （1）下列程序的功能是在文本框Text1中显示变量a和b的较大值。 a = 1：b = 2 ① If a > b Then ② c = a Else ③ c = b End If ④ Text1.Caption = Str(c) 错误在______处，改为_______________。 | （2）下列程序的功能是标签Label1中显示1+2+3+…+10值。 Dim s As Integer Dim i As Integer ① s = 0 ② For i =" 1" To 10 ③ s = i Next i ④ Label1.Caption = Str(s) 错误在______处，改为_______________。 |
一个VB工程的部分设计界面如下图所示：
下列选项正确的是( )。
下列选项正确的是( )。
| A．窗体的Caption属性值是“对象” |
| B．窗体文件名是“Form1.frm” |
| C．当前选中对象的名称是“Shape” |
| D．工程的名称是“工程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) |
Sub test16()
X = 9
For i =" 2" To 51 Step 3
If (X / 2) >=" i" Then X =" X" + 1
Next i
For i =" 2" To -2 Step 3
If (X / 2) >=" i" Then X =" X" + 1
Next i
MsgBox (X+i)
End Sub
该程序的运行结果是（ ）
X = 9
For i =" 2" To 51 Step 3
If (X / 2) >=" i" Then X =" X" + 1
Next i
For i =" 2" To -2 Step 3
If (X / 2) >=" i" Then X =" X" + 1
Next i
MsgBox (X+i)
End Sub
该程序的运行结果是（ ）
| A．64 | B．13 | C．61 | D．62 |