小明设计了如下一个查找数据的程序:在一组升序的数列当中,查找不小于k的最小数的位置,如果该值存在,则返回其第一次出现的位置,如果不存在,则返回0。程序运行界面如图所示,VB程序代码如下,请回答下列问题:
(1)若在 Text1中输入“8”,则 Text2、Text3中输出的分别为________。
(2)请在划线处填入合适的代码。
Dim a(1 To 10)As Integer
Function find (L As Integer, R As Integer, key As Integer) As IntegerIf L>R Then
find=0:Exit Function
ElseIf a(L)>=key Then
find=L:Exit Function
Else
_________
If a(m)<key Then
find=find(M+1,R,key)
Else If(2):__________Then
find=find(L,M-1,key)
Else
find=M
End If
End If
End Function
Private Sub Commandl_Click()Dim k As Integer
Dim p As Integer
k=Val(Text1.Text)
___________
Text2.Text=Str(a(p))
Text3.Text=Str(p)
If p=0 Then
Text2.Text="无"
End If.
End Sub
Private Sub Form_Load()a(1)=3:a(2)=3:a(3)=3:a(4)=4:a(5)=7:a(6)=7
a(7)=10:a(8)=13:a(9)=19:a(10)=21
For i=1 To 10
List1.AddItem Str(a(i))
Next i
End Sub