- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 算法实例
- 面向对象程序设计 VB开发工具
- 算法实例的程序实现
- 算法及算法的表示方法
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
下列Visual Basic表达式中计算结果为4的是( )
A.Abs(-4.2) | B.Len("a123") | C.Sqr(4) | D.Int(3.5) |
在Visual Basic中,下列能产生一个[1,100]之间随机正整数的表达式是( )
A.Rnd*100 | B.1+Rnd*99 |
C.Int(Rnd*100) | D.1+Int(Rnd*100) |
古希腊人将因子的和等于它本身的数(自身因子除外)称为完全数。例如28的因子是1、2、4、7、14,且1+2+4+7+14=28,则28是一个完全数。编程求解[2,1000]内的所有完全数,用VB编写的程序运行界面如图2-1所示。

图2-1
(1)利用计算机解决问题一般可以分哪三个步骤? ① 、
② 、 ③ 。
(2)图2-1中标注A处的对象类型应为标签类对象 ④ (填:对 / 错)。
(3)标注B处 Command1对象属性肯定被修改过的是 ⑤ (填:Caption / Font)
(4)在窗体中,创建标签类(Label1)对象时应选择工具箱中的_____⑥_______(如图2-2,填字母: A / B / C / D)
(5)按此要求编写的程序如下,程序划线处⑦应填入 ⑦ (填:Text1_Change() / Command1_Click()),⑧应填入 ⑧ (填:Dim /Define) 。
Private Sub ⑦
⑧ a, b, s As Integer
For a =" 2" To 1000
S = 0
For b =" 1" To a - 1
If a Mod b =" 0" Then s =" s" + b
Next
If a =" s" Then List1.Additem str(a) '输出满足条件的完全数a
Next
End Sub
(6)调试正确,编译生成可执行文件后,想把自己的
成果通过QQ传给同学们使用。发送时应该选择如图2-3
中___⑨_____(填完整文件名)。


图2-1
(1)利用计算机解决问题一般可以分哪三个步骤? ① 、
② 、 ③ 。
(2)图2-1中标注A处的对象类型应为标签类对象 ④ (填:对 / 错)。
(3)标注B处 Command1对象属性肯定被修改过的是 ⑤ (填:Caption / Font)
(4)在窗体中,创建标签类(Label1)对象时应选择工具箱中的_____⑥_______(如图2-2,填字母: A / B / C / D)
A.![]() | B.![]() | C.![]() | D.![]() |
Private Sub ⑦
⑧ a, b, s As Integer
For a =" 2" To 1000
S = 0
For b =" 1" To a - 1
If a Mod b =" 0" Then s =" s" + b
Next
If a =" s" Then List1.Additem str(a) '输出满足条件的完全数a
Next
End Sub
(6)调试正确,编译生成可执行文件后,想把自己的
成果通过QQ传给同学们使用。发送时应该选择如图2-3
中___⑨_____(填完整文件名)。

若a = 8,b = 5,则运行Print a; "-"; b; "="; a - b的结果是( )。
A.a -b = 3 | B.8 - 5 = 3 |
C.a - b =" a" – b | D.3 |