猜密碼。電腦產(chǎn)生一個8位密碼，用戶輸入猜測的密碼，電腦判斷用戶所猜密碼的正確性，如果用戶輸入的密碼和電腦產(chǎn)生的密碼完全一致則輸出“恭喜你猜中了密碼！”，否則程序?qū)⑤敵鲇脩裘艽a和計算機產(chǎn)生密碼之間不同的字符數(shù)。電腦產(chǎn)生的8位密碼分別保存在數(shù)組pass的8個下標(biāo)變量pass（1）、pass（2）、…、pass（8）中。
程序界面如圖VB-1所示，用戶在文本框Text1中輸入密碼，單擊“密碼校驗”按鈕（Command1）后，程序在標(biāo)簽Label3中輸出密碼校驗結(jié)果。
解決此問題的算法流程圖如圖VB-2所示，相應(yīng)的程序如下，在程序①和②橫線處，填入適當(dāng)?shù)恼Z句或表達式，把程序補充完整。
Dim pass（1To 8）As Integer
Private Sub Command1_Click （　?。?br />Dim x（1To 8）As Integer,i As Integer,s As Integer
For i=1To 8
x（i）=Val（Mid（Text1．Text,i,1））'把文本框中數(shù)字逐個分割出來并轉(zhuǎn)化成數(shù)值
Next i
s=0'變量s保存不同字符的總數(shù)
For i=1To 8
If pass（i）＜＞x（i） Then     ①         
Next i
If      ②           Then
Label3．Caption=“恭喜你猜中了密碼！“
Else
Label3．Caption=“你輸入的密碼共有“+Str（s）+“個字符和密碼不符“
End If
End Sub
Private Sub Form_Load  （　?。?br />Dim i As Integer
For i=1To 8'產(chǎn)生8位密碼，每位一個非負整數(shù)，保存到數(shù)組pass
pass（i）=Fix（Rnd*10）
Next i
End Sub
程序中①橫線處應(yīng)填入

s=s+1

s=s+1

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

s=0

s=0