- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- + 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
某宾馆的房间号由5位字符组成(例如A0823表示A幢8层33号房间)，末位数字为奇数时表示房间朝南、为偶数时表示房间朝北。字符串变量s中存储了1个房间号，下列能正确判断房间朝南的VB表达式是( )
| A．Val(Mid(s，5，1))Mod 2＝1 |
| B．Val(Mid(s，5，1))Mod 2＝0 |
| C．Val(Mid(s，5，1))\2＝1 |
| D．Val(Mid(s，5，1))\2＝0 |
在一次校园歌手大奖赛中，有20位评委负责评判，打分的上限是10分。统计选手得分时，去掉一个最高分，再去掉一个最低分，然后取评委打分的平均值作为选手的最后得分。根据上述规则，信息小组设计了计算选手得分的程序。核心部分的程序如下：
‘d数组中存放了20位评委的打分
Smax=0:smin=10:score=0
For i=1 To 20
Next i
score =" (" score – smax – smin )/18
Text1.Text= smax
Text2.Text= smin
Text3.Text= score
请分析任务和程序段，完成下列题目。
（1）程序段中出现的Text1、Text2、Text3是 类型的控件。（选填“A”或“B”）
（2）在设计用户界面时，要在启动计算过程的按钮上显示“计算”二字，应该将按钮的“ ”属性值设置为“计算”。
（3）为精确地显示选手的最后得分，变量score的数据类型应定义为 。
（4）程序执行过程中，程序段中虚线框内的代码将被执行 次。
（5）请分析程序，将程序段中虚线框内的空白处补充完整。
If
‘d数组中存放了20位评委的打分
Smax=0:smin=10:score=0
For i=1 To 20
Next i
score =" (" score – smax – smin )/18
Text1.Text= smax
Text2.Text= smin
Text3.Text= score
请分析任务和程序段，完成下列题目。
（1）程序段中出现的Text1、Text2、Text3是 类型的控件。（选填“A”或“B”）
| A．列表框 | B．文本框 |
（3）为精确地显示选手的最后得分，变量score的数据类型应定义为 。
（4）程序执行过程中，程序段中虚线框内的代码将被执行 次。
（5）请分析程序，将程序段中虚线框内的空白处补充完整。
If
编写一元二次方程的求解程序，要求能够判断方程是否有根，如果没有根则给出相应的提示信息。
程序如下：
Private Sub Command1_Click（）
Dim a as Single, b as Single, c as Single
Dim t as Single, x1 as Single, x2 as Single
a = Val（InputBox（"a=", "数据输入框", 1））
b = Val（InputBox（"b=", "数据输入框", 2））
c = Val（InputBox（"c=", "数据输入框", 1））
If a =" 0" Then
If b =" 0" Then
If c =" 0" Then Print "解得:x有无穷解" Else Print "x无解"
Else
Print "解得:x=" & -c / b
End If
Else
t = ________（1）______________
If t < 0 Then ①
x1 = （-b + Sqr（t）） / （2 * a） ②
x2 = （-b - Sqr（t）） / （2 * a） ③
Print "解得:x1=" & x1,
Print "x2=" & x2
Else
x1 = ______（2）__________
If t =" 0" Then Print "解得:x=" & x1
If t > 0 Then ④
Print "无实根"
End If
End If
End If
End Sub
请认真分析任务和程序段，完成下列题目。
（1）用计算机编程解决问题，一般分为几个过程：①编写程序②分析问题③确定算法④调试程序，正确排序应该是_________（填序号）。
（2）流程图是用图框及流程线来表示算法的，流程图中的“◇”（菱形框）用来表示_______________（选填“选择分支”、“数据输出”、“条件判断”）。
（3）程序段出现的语句“Dim a as Single”是将“a”定义为________________（写汉字）数据类型。
（4）程序中的语句Sqr（t）所表示的含义是____________________。
（5）调试过程中，运行的结果跟预期结果不符，编译过程中语句出现错误，请找出①②③④中选出错误_____________。
（6）程序中所在（1）横线处的表达式是___________________。
（7）依次输入的数据为：4,-2,1后，运行该程序，输出的结构是_________________。
（8）程序中所在（2）横线处的表达式是___________________。
（9）该程序属于__________结构的程序设计。
（10）将设计好的窗体文件保存到磁盘上，窗体文件的扩展名为______________。（选填“exe”、“frm”、“vbp”或“vbw”）
程序如下：
Private Sub Command1_Click（）
Dim a as Single, b as Single, c as Single
Dim t as Single, x1 as Single, x2 as Single
a = Val（InputBox（"a=", "数据输入框", 1））
b = Val（InputBox（"b=", "数据输入框", 2））
c = Val（InputBox（"c=", "数据输入框", 1））
If a =" 0" Then
If b =" 0" Then
If c =" 0" Then Print "解得:x有无穷解" Else Print "x无解"
Else
Print "解得:x=" & -c / b
End If
Else
t = ________（1）______________
If t < 0 Then ①
x1 = （-b + Sqr（t）） / （2 * a） ②
x2 = （-b - Sqr（t）） / （2 * a） ③
Print "解得:x1=" & x1,
Print "x2=" & x2
Else
x1 = ______（2）__________
If t =" 0" Then Print "解得:x=" & x1
If t > 0 Then ④
Print "无实根"
End If
End If
End If
End Sub
请认真分析任务和程序段，完成下列题目。
（1）用计算机编程解决问题，一般分为几个过程：①编写程序②分析问题③确定算法④调试程序，正确排序应该是_________（填序号）。
（2）流程图是用图框及流程线来表示算法的，流程图中的“◇”（菱形框）用来表示_______________（选填“选择分支”、“数据输出”、“条件判断”）。
（3）程序段出现的语句“Dim a as Single”是将“a”定义为________________（写汉字）数据类型。
（4）程序中的语句Sqr（t）所表示的含义是____________________。
（5）调试过程中，运行的结果跟预期结果不符，编译过程中语句出现错误，请找出①②③④中选出错误_____________。
（6）程序中所在（1）横线处的表达式是___________________。
（7）依次输入的数据为：4,-2,1后，运行该程序，输出的结构是_________________。
（8）程序中所在（2）横线处的表达式是___________________。
（9）该程序属于__________结构的程序设计。
（10）将设计好的窗体文件保存到磁盘上，窗体文件的扩展名为______________。（选填“exe”、“frm”、“vbp”或“vbw”）
28. 如下程序的运行结果是( )
s=0
n=1
do while n<10
s=s+n
n=n+3
loop
print s,n
s=0
n=1
do while n<10
s=s+n
n=n+3
loop
print s,n
| A．12 10 |
| B．12 7 |
| C．22 10 |
| D．22 7 |
下列语句中的等于“=”作用与其他选项不同的是（ ）
| A．if a ="0" then | B． do while x=0 |
| C． for x=0 to 5 | D． if n mod 3="0" then |
如下程序的运行结果是( )
x＝7
if x>10 then
y＝x*2＋2
else
if x<＝5 then
y＝x*3
else
y＝4－x/7
end if
end if
print y
x＝7
if x>10 then
y＝x*2＋2
else
if x<＝5 then
y＝x*3
else
y＝4－x/7
end if
end if
print y
| A．16 | B．21 | C．3 | D．－21 |
