题目

有如下VB程序段： Dim a(1 To 10)As Integer Private Sub Form_Load() a(1)=2: a(2)=3: a(3)=3: a(4)=3: a(5)=3 a(6)=6: a(7)=7: a(8)=7: a(9)=8: a(10)=9 End Sub Private Sub Command1_Click() Dim key As Integer, i As Integer, j As Integer Dim m As Integer, p As Integer key=Val(Text1.Text) i=1: j=10 Do While i<=j m=(i+j)\2 If a(m)= key Then p=m j=m-1 ElseIf key<a(m)Then j=m-1 Else i=m+1 End If Loop Text2.Text=Str(p) End Sub 程序运行时，在文本框 Text1中输入3，单击按钮，文本框Text2中显示的内容是（ ） A . 2 B . 3 C . 4 D . 52．双曲线$\frac{{y}^{2}}{4}$-x2=1的一条渐近线的方程为（　　）A．y=2xB．y=4xC．y=$\frac{1}{2}$xD．y=$\frac{1}{4}$x