- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 算法实例
- + 面向对象程序设计 VB开发工具
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 算法实例的程序实现
- 算法及算法的表示方法
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
下列程序运行后的运行结果为▁▁▁。
X=8:Y=X:Z=10
IF X<=Y THEN
PRINT X;Y;
ELSE
IF Z>=X THEN
PRINT Z
END IF
END IF
X=8:Y=X:Z=10
IF X<=Y THEN
PRINT X;Y;
ELSE
IF Z>=X THEN
PRINT Z
END IF
END IF
A.108 |
B.8 8 |
C.10 10 |
D.810 |
如图所示的流程图片段:该流程图执行过后,a、b、c的值分别为:( )


A.a=21,b=9,c=13 | B.a=5,b=8,c=13 | C.a="5,b=9,c=14" | D.a=21,b=9,c=14 |
已知出租车计费方法如下:路程在3公里以内(包含3公里)收起步价10元,路程超过3公里不超过10公里(包含10公里)部分按每公里2元计费,超出10公里部分按每公里3元计费。现要设计一个VB出租车计费系统程序,在路程文本框中中输入路程数,单击计算按钮可以计算出应付金额并显示到金额文本框中,请回答以下问题:
在设计该程序界面时,要从图二界面到图一界面,需要进行哪些设置?
________________________________________________________________
________________________________________________________________
为计算按钮添加单击事件后,并在其中添加程序代码,代码如下:
Dim d As Single
Dim f As Single
d = Val(Text1.Text)
If d <=" 3" Then ‘3公里以下计费
f =" 10"
end if
If d > 3 And d <=" 10" Then ‘3公里至10公里计费
‘①
End If
If d > 10 Then ‘10公里以上计费
'②
End If
Text2.Text = Str(f)
请完善以上程序代码,在①,②处填入正确的语句
①________________________________
②________________________________
完善程序代码后,若输入路程数为10,则应付金额为________元
实现该程序所用的算法结构属于______________(选择结构/循环结构)
|

________________________________________________________________
________________________________________________________________
为计算按钮添加单击事件后,并在其中添加程序代码,代码如下:
Dim d As Single
Dim f As Single
d = Val(Text1.Text)
If d <=" 3" Then ‘3公里以下计费
f =" 10"
end if
If d > 3 And d <=" 10" Then ‘3公里至10公里计费
‘①
End If
If d > 10 Then ‘10公里以上计费
'②
End If
Text2.Text = Str(f)
请完善以上程序代码,在①,②处填入正确的语句
①________________________________
②________________________________
完善程序代码后,若输入路程数为10,则应付金额为________元
实现该程序所用的算法结构属于______________(选择结构/循环结构)
在VB中,小王使用变量email存储电子邮箱地址,该变量的数据类型应定义为( )
A.Boolean | B.String | C.Integer | D.Single |
在VB窗体中有一个对象,该对像的属性窗口如图所示,下列说法不正确的是( )


A.Interval为属性名 |
B.1680为属性值 |
C.该对象的名称为Timer1 |
D.根据“Timer1 Timer”可判断窗体名为Timer |
设X=5278,能得到其百位上数字“2”的正确表达式是( )
A.X MOD 100 |
B.X\100 MOD 10 |
C.X\100 MOD 100 |
D.X\10 MOD 10 |
每次将一张白纸沿垂直和水平中线对半撕成四张纸片,然后取其中一张纸片照这样再撕成四张纸片,一直这样下去,计算撕了n次后纸片的总张数,现在要用VB来实现该程序。程序界面及功能如下图所示,在文本框中输入撕的次数,单击计算按钮,显示纸片数。

请完善并改正下面的程序代码:
Private Sub Command1_Click()
Dim i, n, s As Integer
n =" Val(Text1." Caption) ‘① 获得撕纸片的次数
s=1 ‘s为纸片数,初始时为1
For i =" 1" To n
② ‘计算撕了n次后的纸片数量
Next i
Label2.Caption = Str(s) 显示最终的纸片数
End Sub
注释①所在行语句中有错误,应改为_____________
在横线②中填入正确的语句_______________
在用VB设计应用程序时,一般经历的阶段的正确顺序是__________(填字母顺序)
a 运行调试程序 b 问题和算法分析
c 应用程序界面设计 d 事件处理过程代码编写

请完善并改正下面的程序代码:
Private Sub Command1_Click()
Dim i, n, s As Integer
n =" Val(Text1." Caption) ‘① 获得撕纸片的次数
s=1 ‘s为纸片数,初始时为1
For i =" 1" To n
② ‘计算撕了n次后的纸片数量
Next i
Label2.Caption = Str(s) 显示最终的纸片数
End Sub
注释①所在行语句中有错误,应改为_____________
在横线②中填入正确的语句_______________
在用VB设计应用程序时,一般经历的阶段的正确顺序是__________(填字母顺序)
a 运行调试程序 b 问题和算法分析
c 应用程序界面设计 d 事件处理过程代码编写
如果x=4,那么以下运算结果为True的表达式是( )
A.(x<=4)and(x>=6) |
B.(x>4)Or(x>=6) |
C.(x>="4)and" not(x>=6) |
D.not(x=4) |
变量c中存储了一个字符,正确判断该字符为数字字符"0 "~ "9 "的VB表达式是( )
A.c>= "0 " And c<= "9 " |
B.c>= "0 " Or c<= "9 " |
C.Asc(c)>="0" And Asc(c)<=9 |
D.Asc(c)>="0" Or Asc(c)<=9 |
下列VB的变量定义正确的是( )
A.Dim a,b As Double |
B.Dim a-b as Integer |
C.Dim c As True |
D.Dim d^2 as Single |