n=0:i=1:j=8
Key=Val(Text1.Text)
Do While i<=j
m=(i+j)\2
If Key=d(m)Then Exit Do ‘Exit Do退出循环
If Key>d(m)Then
j=m-1:n=n-1
Else
i=m+1:n=n+1
End If
Loop
Label1.Caption=Str(n)
当输A不同的Key值,运行该程序段后,在标签Label1中显示的不同结果共有:( )
微信扫码预览、分享更方便