设计VB程序，该程序将输入的字符串中小写字母转换成大写字母后输出。在文本框Text1中输入一串字符（数字、字母均可），单击“转换”按钮Command1，在标签Label2中输出结果。（提示：Asc（x）：将字符x转换为ASCII码值；Chr（x）：将ASCII代码x转换为所对应的字符）该程序的设计界面如图所示,请根据算法将下列程序补充完整。

Private Sub Command1_Click()
Dim ch As String, s As String
Dim i As Integer, j As Integer
ch = Text1.Text
For i =" 1" To   （1） 
j =" Asc(Mid(ch," i, 1))
If j > 96 And j < 123 Then
s =" s" + Chr(j - 32)
Else
s =" s" + Chr(j)
End If
Next
    （2）    
End Sub

依照中华人民共和国《机动车驾驶员驾车时血液中酒精含量规定》，血液中酒精含量大于或等0.3mg/ml 驾驶机动车的属酒后驾车；大于或等于1.0mg/ml 驾驶机动车的属醉酒驾车。设计一个程序，帮助交警判定某人属酒后驾车、醉酒驾车还是没有违法。
解决此问题的流程图如图所示，
 
（1）该算法属于  （填：顺序/选择/循环）结构
（2）要在窗体Form1的标题栏内显示字符串“酒精测试”，需要更改的是 属性（填：name/caption/text）

（3）根据流程图编写的VB程序如下：
Private Sub Command1_Click( )
Dim x As Single
x =  Val(Text1.Text)  
If    ①   Then
Label2.Caption = "你属于醉酒驾车!"
 ②  x >=" 0.3" Then
Label2.Caption = "你属于酒后驾车!"
Else 
  ③  
End If   
End Sub
则划线处填入的语句为①  ②     ③ 。

已知有一组数据2, 3, 6, 9, 10, 17, 22, 25排列，若要对分查找数值22，需要查找3次，这3次查找中依次找到的数据是（    ）。

A．10 17 22

B．9 10 22

C．10 25 22

D．9 17 22

礼品分配问题：某班得到一件精美礼品，由于只有一件礼品，大家决定用下面方法来分配该礼品：n个同学围成一圈，按顺序从1到n进行编号。从第1个人开始报数，报到m的人退出，下一个人继续从1开始报数，报到m的人出圈┈┈，如此依次进行，直到留下的最后一个人得到该礼品。程序运行界面如图所示，单击“开始”按钮，将输出退出圈子的同学编号以及最后获得奖品的编号。

实现上述功能的VB程序如下，请回答下列问题。
(1)当班级总人数n＝15，m＝5的时候，获得礼品的同学编号是__________(填写数字)。
(2)在划线处填入合适的代码。
Private Sub Command1_Click()
Dim i As Integer, n As Integer, m As Integer
Dim num As Integer, t As Integer
Dim a(1 To 100) As Boolean
n = Val(Text1.Text)
m =Val(Text2.Text)
For i = 1 To n

a(i) = True

Next i
_____
Do While t > 1
For i = 1 To n
If a(i) = True Then _____
If num = m Then
_____
t = t -1
num = 0
Text3.Text = Text3.Text +Str(i)
End If
Next i
Loop
For i = 1 To n
If a(i)= TrueThen Label2.Caption = "获得礼品同学编号:" + Str(i)
Next i
End Sub

该流程图描述的是求实数a绝对值的算法。

在流程图的空白处应填入_____________。