超市進(jìn)貨時(shí)會(huì)將每個(gè)商品的條形碼和價(jià)格輸入計(jì)算機(jī)，并對(duì)所有商品按照條形碼排序（從小到大），顧客付款時(shí)只要把條形碼輸入電腦，電腦即可根據(jù)條形碼找到該商品并顯示對(duì)應(yīng)的價(jià)格。下列程序的功能是根據(jù)條形碼查找對(duì)應(yīng)商品的價(jià)格，所有商品的條形碼和價(jià)格分別保存在數(shù)組a和b中（并且已經(jīng)按照條形碼從小到大排序），第i個(gè)商品的條形碼保存在a（i）中，對(duì)應(yīng)的價(jià)格保存在b（i）中，變量f是標(biāo)志變量，如果值為True則說明找到了商品，若為False則說明沒有找到。
程序界面如圖1所示，在文本框Text1中輸入商品的條形碼，單擊“開始查找”按鈕（Command1）后，對(duì)應(yīng)商品的價(jià)格在標(biāo)簽Label4中顯示出來，如果未找到則顯示“找不到該商品，請(qǐng)重新輸入條形碼”。
解決此問題的算法流程圖如圖2所示，相應(yīng)的程序如下，在程序①和②橫線處填入適當(dāng)?shù)恼Z句或表達(dá)式，將程序補(bǔ)充完整。
Private Sub Command1_Click （　?。?br />Dim x As String,i As Integer,j As Integer,m As Integer
Dim f As Boolean
x=Text1．Text
i=1：j=n：f=False'n保存總的商品數(shù)
Do While （i＜=j） And Not （f）
m=Fix（（i+j）/2）
If

a（m）=x

a（m）=x

 Then
f=True
ElseIf  x＜a（m） Then

j=m-1

j=m-1

Else
i=m+1
End If
Loop
If f Then
Label4．Caption=b（m）
Else
Label4．Caption=“找不到該商品，請(qǐng)重新輸入條形碼“
End If
End Sub
程序中①橫線處應(yīng)填入

a（m）=x

a（m）=x

程序中②橫線處應(yīng)填入

j=m-1

j=m-1