有如下VB程序段
m=a(1)
For t=2  to  15  step 2
If  a(t) > m  then  m=a(t)
Next t
该程序段执行后，变量t的值是（   ）

A．14

B．15

C．16

D．17

   （加试题）小马正在看一本侦探小说，想了解其中一段案情的解析，却发现了一串字符“#2017-2018go:)”，并附有文字提示：①答案所在的页码是这串字符中最大数字字串（若值相同则取后面的数字字串）的起始位置*10+结束位置②答案所在行号是最大数值除以100的余数。例如：“#17a18#”字符串中，最大数字字串“18”，起始位置是5，结束位置是6，其页码是56，行号是18。小马编写了一个VB程序帮他寻找答案，程序运行界面如图所示。在文本框Text1中输入这段字符串s1，单击“揭秘”按钮Command1，在文本框Text2中输出页码，在Text3中输出行号。

实现上述功能的VB程序代码如下，但划线处代码有错，请改正。
Private Sub Command1_Click()
Dim s1 As String, s2 As String
Dim ch As String, ch2 As String
Dim max As Double
Dim n As Integer, page As Integer
Dim iAs Integer, j As Integer
s1=Text1.text: s2 = ""
n = Len(s1)
i = 1: max = 0
Do While i<= n
ch = Mid(s1, i, 1)
If ch>= "0" And ch<= "9" Then
j = i
ch2 = Mid(s1, j, 1)
Do While ch2 >= "0" And ch2 <= "9"
j = j + 1
ch2 = Mid(s1, j, 1)
Loop
s2 = Mid(s1, 1, j–i) '（1）改正：________________
If Val(s2) < max Then    '（2）改正：_______________
max = Val(s2)
page = i * 10 + j - 1
Text2.Text = Str(page)
Text3.Text = Str(max Mod 100)
End If
i = j
End If
i = i + 1
Loop
End Sub

   （加试题）货物搬运

平地上有两叠货物需要搬运到别处，期中一叠有a个货物，另一叠有b个货物(0<a≤5,0<b≤5）。每次只能从其中一叠搬走位于最上方的货物。小明编写了一个VB程序，用于计算搬运货物的方案数。小明请教了数学老师，得知方案数

运行界面如图所示：

随后，小明编写了如下程序段：
Private Sub calculate_Click()
Dim a As Integer
Dim b As Integer
Dim c As Long
a = Val(Text1.Text)
b = Val(Text2.Text)
c =fa(a, a + b)
_____①______
End Sub
Function fa(m As Integer, n As Integer) As Long
_____②_____
End Function
Function jc(x As Integer) As Long
If x = 1 Then
jc = 1
Else
jc = x * __ ___③__ ___
End If
End Function
（1）程序段Function jc部分主要采用了_______________算法；
（2）在程序画线①处应填入________________________；
在程序画线②处应填入________________________；
在程序画线③处应填入________________________。

（加试题）有如下VB程序段：
For i = 5 To 4 Step -1
k = i
For j = 6 - i To 1 Step -1
If a(j) < a(k) Then k = j
Next j
If i <> k Then
t = a(i): a(i) = a(k): a(k) = t
End If
Next i
数组元素a(1)到a(5)的值依次为“41，66，70，83，31”，经过该程序段“加工”后，数组元素a(1)到a(5)的值依次为( ）

A．31，41，66，83，70	B．83，70，66，41，31
C．83，66，70，41，31	D．31，41，66，70，83

   （加试题）小李编写 VB 程序，功能如下：单击“生成数组”按钮 Command1，则随机生成 13 个取值范围是 1～13 的正整数，分别存储到数组 a 中，对数组 a 的元素进行升序排列，并在标签label1 中显示；再单击“连续数”按钮 Command2，则在排序后的数组 a 中查找连续个数最多(忽略重复数值)的一组数值（即：连续数），若有两组连续数个数一样多，则取数值小的一组，

将连续数显示在标签 label2 中。运行界面如图所示。

若实现上述功能的程序如下，请在划线处填写合适代码，使程序正常运行。
Dim a(1 To 13) As Integer
Dim n As Integer
Private Sub Command1_Click()
Dim i As Integer, s As String, j As Integer
Randomize
n = 13
For i = 1 To n
a(i) = Int(Rnd * 13) + 1
Next i
For i = 1 To n - 1
For j = i + 1 To n
If a(j) < a(i) Then
t = a(j): a(j) = a(i): a(i) = t
End If
Next j
Next i
s = ""
For i = 1 To n
s = s + Str(a(i))
If ________　Then s = s + ","　
Next i
Label1.Caption = s
End Sub
Private Sub Command2_Click()
Dim i As Integer, j As Integer
Dim t As Integer, k As Integer
Dim max As Integer　'存储连续数个数最大值
Dim begin As Integer　'存储连续数开始的数值
k = 1
max = 1
For i = 2 To 13
If a(i) = a(i - 1) + 1 Or a(i) = a(i - 1) Then
If ____________　 Then k = k + 1
If k > max Then
max = k
begin = ____________　　
End If
Else
k = 1
End If
Next i
s = ""
For j = begin To begin + max - 1
s = s + Str(j)
Next j
Label2.Caption = s
End S

如果期中考试的满分为150分，并且学生的成绩已经输入到Excel工作表的成绩列中，若想使用“筛选”功能，选出分数不低于120分以及低于72分的学生( )

A．“大于120” 或“小于72”	B．“大于或等于120”或“小于72”
C．“大于或等于120”与“小于72   ”	D．“大于120”或“小于或等于72”

计算机能直接识别和处理的语言是（   ）。

A．汇编语言

B．自然语言

C．机器语言

D．高级语言

在VB集成开发环境中，有三种工作模式，可以单击工具栏上的按钮，可以________程序；单击工具栏上的进入中断模式；单击工具栏上的按钮结束运行。
绘制函数图像y=x²的VB源代码如下，请补充完整。
Private Sub Command1_Click() '按钮的单击事件
Dim x, y As Single '定义x,y两个变量
Picture1.Scale (-10, 25)-(10, -25)     '定义坐标系
Picture1.Line (-10, 0)-(10, 0), RGB(0, 0, 255)   '画横坐标轴，颜色为蓝色
Picture1.Line (0, 25)-(0, -25), RGB(0, 0, 255)   '画纵坐标轴，颜色为蓝色
For x = -10 To 10 Step 0.0001     'x值从-10变化到10，每次增量为0.0001
__________ '本行代码计算函数y=x²
Picture1.PSet (x, y), RGB(255, 0, 0) '根据x,y的值用红色描点
Next x '取下一个增量后的x值
End Sub

以上的VB计算机语言是__________语言。（已知计算机语言有：机器语言、汇编语言、高级语言）

下列关于Visual Basic 程序设计语言的叙述正确的是( )

A．Visual Basic 语言属于机器语言	B．Visual Basic 是一种高级语言
C．Visual Basic 是一种自然语言	D．应在代码窗口中输入Visual Basic 语言的程序代码

某模特培训学校打算将身高（H）超过1.75米且体重（W）不大于55千克作为招生条件，表示该条件的关系表达式为（ ）

A．（H＞＝1.75）And (W＜＝55)	B．（H＜＝1.75）Or (W＞＝55)
C．（H＞1.75）And (W＜＝55)	D．（H＞1.75）Or (W＜55)