- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 算法实例
- + 面向对象程序设计 VB开发工具
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 算法实例的程序实现
- 算法及算法的表示方法
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
在窗体上画一个命令按钮,其Name属性为Command1,然后编写如下代码:
Option Base 1
Private Sub Command1Click
Dim a(4,4)
For i = 1 To 3
For j = 1 To 3
a(i,j)=(i-1)*3+j
Next j
Next i
PRINT A(3,1)
End Sub
程序运行后,单击命令按钮,其输出结果为.
Option Base 1
Private Sub Command1Click
Dim a(4,4)
For i = 1 To 3
For j = 1 To 3
a(i,j)=(i-1)*3+j
Next j
Next i
PRINT A(3,1)
End Sub
程序运行后,单击命令按钮,其输出结果为.
A.6 |
B.7 |
C.8 |
D.9 |
DIM A(-2 TO 3, 4) AS INTEGER ,该数组占的字节数是(_________),该数组中的元数个数是(_____)个。
下列程序的运结果是[ ]
DIM A(1991 TO 1998) AS INTEGER
FOR I=1 TO 8
A(I)=I
PRINT A(I);
NEXT I
DIM A(1991 TO 1998) AS INTEGER
FOR I=1 TO 8
A(I)=I
PRINT A(I);
NEXT I
A.1 2 3 4 5 6 7 8 |
B.1991 1992 1993 1994 1995 1996 1997 1998 |
C.显示出错信息 |
D.0 0 0 0 0 0 0 0 |
按了回车键后,将组合框中输入的内容添加到组合框中,组合框的名称是COMBO1。
PRIVATE SUB COMBO1________[1](KEYASCII AS INTEGER)
IF ________[2]
________[3]
END IF
END SUB
PRIVATE SUB COMBO1________[1](KEYASCII AS INTEGER)
IF ________[2]
________[3]
END IF
END SUB
素数是指除了1和本身不能被任何数整除的数。请将3到100间的素数添加到LIST1中。
PRIVATE SUB FORMCLICK
FOR I = 3 TO ________[1]
F=0
FOR J= 2 TO I-1
IF ________[2] THEN
F=1
EXIT FOR
END IF
NEXT J
IF F=0 THEN ________[3]
________[4]
END SUB
PRIVATE SUB FORMCLICK
FOR I = 3 TO ________[1]
F=0
FOR J= 2 TO I-1
IF ________[2] THEN
F=1
EXIT FOR
END IF
NEXT J
IF F=0 THEN ________[3]
________[4]
END SUB
执行下列程序后,变量X的值是( )
PRIVATE SUB FORM__CLICK( )
S=0
FOR A = 1 TO 5
FOR B= 1 TO 3
S=S+1
NEXT B
NEXT A
PRINT S
END SUB
PRIVATE SUB FORM__CLICK( )
S=0
FOR A = 1 TO 5
FOR B= 1 TO 3
S=S+1
NEXT B
NEXT A
PRINT S
END SUB
A.70 |
B.8 |
C.25 |
D.15 |