某算法的部分流程图如图所示,执行这部分流程后,输出a,b的值分别是(   )
A.5,8B.4,8C.5,11D.4,11
当前题号:1 | 题型:选择题 | 难度:0.99
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程.

 

Private Sub Command1 Click() 

 Move  500,500 

 End Sub 

程序运行后,单击命令按钮,执行的操作为
A.命令按钮移动到距窗体左边界、上边界各500的位置
B.窗体移动到距屏幕左边界、上边界各500的位置
C.命令按钮向左、上方向各移动500
D.窗体向左、上方向各移动500
当前题号:2 | 题型:选择题 | 难度:0.99
PRINT    13 + ”AB”的运行结果是( )
A.出错
B.19
C.136
D.无输出
当前题号:3 | 题型:选择题 | 难度:0.99
第一个框架的默认名称是(____________________)
当前题号:4 | 题型:填空题 | 难度:0.99
VB中一行写多条语句时,用(________)号分隔。
当前题号:5 | 题型:填空题 | 难度:0.99
输入一个两位正整数,个位和十位交换后在LABEL1上和窗体上分别输出。
PRIVATE    SUB   FORM-CLICK(   )
DIM   X   AS   INTEGER, G  AS   INTEGER
DIM   S  AS    INTEGER , Y  AS   INTEGER
X=VAL(INPUTBOX(“请输入一个两位正整数”))
G=________    ‘个位
S=________    ‘十位
Y=________   ‘新数
________
________
END    SUB
当前题号:6 | 题型:填空题 | 难度:0.99
INPUTBOX函数的返回值是(_____________)型的。
当前题号:7 | 题型:填空题 | 难度:0.99
文本框中内容由(_______________)属性决定.
当前题号:8 | 题型:填空题 | 难度:0.99
为分析数组a中各元素依次变化的情况,进行如下定义:
变化段:数组中相邻两个元素构成一个变化段。变化段有上升段(a(i)>a(i-1))、下降段(a(i)<a(i-1))和持平段(a(i)=a(i-1))。数组a中的n个元素可构成n-1个依次排列的变化段。
波峰:从上升段转到下降段形成一个波峰。波峰的起点是峰顶前所有连续上升段中的第1个,终点是峰顶后所有连续下降段中的最后1个。
对称波峰:上升段与下降段个数相同的波峰称为对称波峰。
下图为一组数据的变化段及波峰示意图。

现要求统计数组a各元素依次变化过程中“对称波峰”的个数。小李依据上述描述设计如下VB程序。请回答下列问题:
(1)数组元素“1,4,3,3,2,6,8,7,9,3,4,7,9,6,3,1”依次变化过程中“对称波峰”的个数为_____。
(2)请在划线处填入合适的代码。
Const n = 20
Dim a(1 To n) As Integer
Private Sub Form_Load()
'读取数据,并存储到数组a中,代码略
End Sub
Private Sub Command1_Click()

Dim flag As Integer  '存储变化段的状态:1表示升,-1表示降,0表示平

Dim count As Integer '存储对称波峰段的个数

Dim steps As Integer

Dim i As Integer

flag = 0: steps = 0: count = 0

For i = ________ To n

If a(i) > a(i - 1) Then

If IsSymPeak(flag, steps) Then count = count + 1

If flag = 0 Or flag = -1 Then

_________

Else

steps = steps + 1

End If

flag = 1

ElseIf a(i) = a(i - 1) Then

If IsSymPeak(flag, steps) Then count = count + 1

steps = 0

flag = 0

Else

  steps = steps - 1

flag = -1

End If

Next i

If IsSymPeak(flag, steps) Then count = count + 1

Text1.Text = Str(count)

End Sub
Function IsSymPeak(flag As Integer, steps As Integer) As Boolean

If __________________ Then

IsSymPeak = True

Else

IsSymPeak = False

End If

End Function
当前题号:9 | 题型:填空题 | 难度:0.99
有如下程序段:
For i = 1 To 2

For j = 5 To i + 1 Step -1

If a(j) > a(i) Then

t = a(j): a(j) = a(i): a(i) = t

End If

Next j
Next i
数组元素a(1)到a(5)的值依次为“33,24,45, ,16,77”,经过该程序段“加工”后,数组元素a(1)到a(5)的值依次为(   )
A.77, 45, 33, 16, 24
B.77, 33, 45, 16, 24
C.77, 24, 45, 16, 33
D.77, 45, 33, 24, 16
当前题号:10 | 题型:选择题 | 难度:0.99