- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 算法实例
- + 面向对象程序设计 VB开发工具
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 算法实例的程序实现
- 算法及算法的表示方法
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
下列变量定义正确的是()
A.Dim abc as integer | B.Dim a*c as string |
C.Dim for as double | D.Dim 4bc as boolean |
下列语句正确定义了一个单精度实数型变量x 的是()。
A.Dim x As Single |
B.其它三项都不对 |
C.Dim x As Integer |
D.Dim x As String |
有如下 VB 程序段:
For i = 1 To 9 Step 2
s = 0
For i = 0 To 9 Step 3
数组 b 各元素初始值为 0, 数组元素 a(1)到 a(9)的值依次为“29,74,12,38,16,45,21,57,33”,则执行该程序段后,s 的值为( )
For i = 1 To 9 Step 2
b(a(i) Mod 10) = b(a(i) Mod 10) + 1
Next is = 0
For i = 0 To 9 Step 3
s =s + b(i)
Next i数组 b 各元素初始值为 0, 数组元素 a(1)到 a(9)的值依次为“29,74,12,38,16,45,21,57,33”,则执行该程序段后,s 的值为( )
A.5 | B.4 | C.3 | D.2 |
一个单窗体VB程序的运行界面如下图所示。

下列说法正确的是( )
(1)窗体内有1个按钮
(2)窗体内有2个文本框
(3)窗体内有3个标签
(4)该窗体的标题Caption属性值是“加法计算器”

下列说法正确的是( )
(1)窗体内有1个按钮
(2)窗体内有2个文本框
(3)窗体内有3个标签
(4)该窗体的标题Caption属性值是“加法计算器”
A.(2)(3) | B.(1)(4) | C.(1)(2) | D.(3)(4) |
如图所示,下面程序实现读取数据文件,进行可视化呈现,直观地展示了历年来报考研究生人数变化趋势。阅读程序回答问题:

(1)本程序中引用了第三方库,写出库名称,从代码中找出来。
(2)本程序读取了数据文件,文件名称是什么?
(3)读取数据文件的数据赋值到二维表型数据结构对象中,这个对象的名称是什么?
(4)本程序实现了数据可视化,呈现的图表为柱形图、折线图还是散点图?通过哪行代码来实现?
(5)本程序文件实现的图表的标题是什么?阅读程序,从其中找出来。

(1)本程序中引用了第三方库,写出库名称,从代码中找出来。
(2)本程序读取了数据文件,文件名称是什么?
(3)读取数据文件的数据赋值到二维表型数据结构对象中,这个对象的名称是什么?
(4)本程序实现了数据可视化,呈现的图表为柱形图、折线图还是散点图?通过哪行代码来实现?
(5)本程序文件实现的图表的标题是什么?阅读程序,从其中找出来。
素数只能被1和它本身整除,不能被其他自然数整除。编写VB程序实现如下功能:单击“产生奇数并判断”按钮Command1,随机产生一个三位正奇数显示在文本框Text1中,并在文本框Text2中显示其是否为素数的判断结果。例如,当随机产生的三位正奇数为953时,程序运行界面如图a所示。

(1)在设计程序界面时,应使用图b所示“控件工具箱”中的_____________(填写相应编号)添加文本框Text1。
(2)实现上述功能的VB程序如下,请在划线处填写合适的代码。
Private Sub Command1_Click()
Dim n As Integer, i As Integer
Dim flag As Boolean ’用于标记是否为素数
Randomize
n = Int( ①_____)*2+1
Text1.Text = Str(n)
flag = True ’标记为素数
i = 3
Do While i <= n - 1 And flag = True
If ②_____ Then
Text2.Text = Str(n) + "是素数"
Else
Text2.Text = Str(n) + "不是素数"
End If
End Sub
(3)以下选项中,与加框处表达式“n Mod I = 0”等价的是______________(单选,填字母)。

(1)在设计程序界面时,应使用图b所示“控件工具箱”中的_____________(填写相应编号)添加文本框Text1。
(2)实现上述功能的VB程序如下,请在划线处填写合适的代码。
Private Sub Command1_Click()
Dim n As Integer, i As Integer
Dim flag As Boolean ’用于标记是否为素数
Randomize
n = Int( ①_____)*2+1
Text1.Text = Str(n)
flag = True ’标记为素数
i = 3
Do While i <= n - 1 And flag = True
If n Mod i = 0 Then
flag = FalseEnd If
i = i + 2
LoopIf ②_____ Then
Text2.Text = Str(n) + "是素数"
Else
Text2.Text = Str(n) + "不是素数"
End If
End Sub
(3)以下选项中,与加框处表达式“n Mod I = 0”等价的是______________(单选,填字母)。
A.n \ i = Int(n / i) | B.n \ i = n/ i | C.n Mod i = n \ i |