- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- + 赋值语句
- 选择语句
- 循环语句
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
某电信部门规定：拨打市内电话时，如果通话时间不超过3分钟（含3分钟），则收取通话费0.2元，如果通话时间超过3分钟，则超过部分以每分钟0.1元收取通话费（通话时间为整数）。下面是计算通话费用的流程图和程序，请认真分析并回答问题。根据题意，完善流程图，填写空白处。
①
下图是计算通话费用程序窗体界面布局示意图。
Command1_Clik事件过程如下。
请填写程序空白处。
Private Sub Command1_Click()
Dim ② as ③
‘定义 x 为整型
x = Val(Text1.Text)
④ Then
‘条件语句
⑤
显出通话时间不超过3分钟时的电话费
Else
Text2.Text =" Str(0.2" + 0.1 * (x - 3)) ‘显出通话时间超过3分钟时的电话费
End If
End Sub
这段程序属于 ⑥ 结构程序设计。
①
下图是计算通话费用程序窗体界面布局示意图。
Command1_Clik事件过程如下。
请填写程序空白处。
Private Sub Command1_Click()
Dim ② as ③
‘定义 x 为整型
x = Val(Text1.Text)
④ Then
‘条件语句
⑤
显出通话时间不超过3分钟时的电话费
Else
Text2.Text =" Str(0.2" + 0.1 * (x - 3)) ‘显出通话时间超过3分钟时的电话费
End If
End Sub
这段程序属于 ⑥ 结构程序设计。
在VB中，设x=389，能得到其百位数字“3”的正确表达式是_______。
| A．Int(x/10)*10 | B．Int(x/100)*100 | C．Int(x/100) | D．x-Int(x/10)*10 |
赋值语句y = x的功能是________。
| A．x的值赋给y，x的值变为0 |
| B．y的值赋给x，y的值变为0 |
| C．y的值赋给x，y保留原来的值 |
| D．x的值赋给y，x保留原来的值 |
由“For k="35" To 0 Step 3 : Next k ”循环语句控制的循环次数是_______。
| A．12 | B．0 | C．-10 | D．-11 |
Y为分段函数
求y的值。完成该流程图，在空白处填入_____
求y的值。完成该流程图，在空白处填入_____
| A．x mod 2 <> 0 |
| B．x / 2 = 0 |
| C．x =" 2" * n-1 |
| D．x \ 2 = 0 |
若变量m =" 0" .81 ，则表达式Sqr ( m ) ＜1 And Not int ( m) > 1 的值是_____
| A．T | B．F | C．0.9 | D．1 |