数组a中的数据存放情况如下表，以下关系表达式成立的是（  ）。

a1	a2	a3	a4	a5	a6	a7	a8
1	3	4	12	8	6	5	7

 

A．aa3= 4

B．aa8= 8

C．a6>a5-aa1+1

D．aa2+a1<>a4

全国两会中有代表又提到了个人税金问题。代表提议将个税作以如下的调整：月收入在2万及以上的收10%，月收入在1万（含）至2万的收5%，月收入在5千（含）至1万的收2%，月收入少于5千的免收。
小明用VB设计了计算个税的程序，程序运行时界面如图1所示，在文本框Text1中输入月收入后，点击“开始计算”按钮后，在文本框Text2中显示该产品应征收的税金。

（1）为应用程序界面添加“开始计算”按钮，应使用图2中的____________（填写相应编号），并将图3所示中的“属性窗口”中，将________属性设置成“开始计算”。

（2）根据题意，将下列程序空格处补充完整。
Private Sub Command1_Click()
Dim x As Single, p As Single
x ＝ Val(Text1.Text)
If x >＝ 20000 Then
p ＝ 0.1 * x
Else If x >＝ 10000 Then
p ＝ 0.05 * x
Else If x >＝ 5000 Then
p ＝ 0.02 * x
Else
P ＝ 0
End If
___________＝ Str(p)
End Sub

解决上问题所用的算法是:（    ）

A．枚举法

B．解析法

C．顺序查找

D．选择法

编写VB程序，求最小公倍数。在文本框Text1和Text2中分别输入两个数，单击“计算”按钮Command1，求出这两个数的最小公倍数，并在标签Label3 中输出结果。界面如图所示：
 
第1图    第2图
（1）在设计程序界面时，应使用第19题－2图所示“控件工具箱”中的__________（填相应编号）添加标签控件。要让Command1显示为“计算”，需要在属性面板中修改___________的值为“计算”。
（2）程序代码如下：
Private Sub Command1_Click()
Dim a As Integer, b As Integer, r As Integer
Dim a1 As Integer, b1 As Integer, g As Integer
a1 = Val(Text1.Text)
b1 = Val(Text2.Text) 
a = a1
b = b1
Do While b <> 0
r =" a" Mod b
a = b
b = r
Loop
g =" a1" * b1 / a
    ①     
End Sub
完善此程序，则①处应填入_______________。

小李在学习汉字的编码后，了解到汉字区位码由2个字节组成，前面1个字节表示区码，后面1个字节表示位码，将区位码(十进制)分别加上160就得到了该汉字的内码。

小李编写了一个查看汉字区位码的VB程序，实现如下功能：在Text1中输入一个汉字，单击“查看”按钮Commandl，在Label2中显示该汉字的区位码。程序运行界面如图所示。
(1)程序編写调试后，生成如下相关文件：

A．zbc.frm/

B．zbc.vbp/

C．zbc.vbw/

D．zbc.exe，其中属于Windows系統可抗行文件的是__________(单选，填字母)。

(2)实现上述功能的VB程序如下，请在別画线处填入合适的代码。
Private Sub Commandl_Click()

Dim a As Long，h As Long，t As Long，v As Long，ch As Long

Dim s As String，x As String，y As String

s=""：t=0：v=0

h=65536 + Asc(Text1.Text)'将汉字的十进制内码赋值给h

Do While h〈〉0

a=h Mod 2

h=h\2

s=CStr(a)+s

Loop
x=___________
y=Mid(s，Len(s)-7，8)
For i=Len(x) To 1Step-1

ch=Va10Mid(x，i，1))

___________

Next i

Labe12.Caption="该汉字的区位码为："+Str(t-160)+"位码为："+Str(v-160)
End Sub
(3)若经过Do While循环后，s的值为“1010101111001100”，则画框处循环内的语句执行了________次。