某簡單計(jì)算器功能如下：在文本框Text1中輸入一個加減算式，點(diǎn)擊“計(jì)算”按鈕Command1，計(jì)算結(jié)果在標(biāo)簽Label3上顯示，同時(shí)在列表框List1中記錄每次算式及結(jié)果。已知文本框Text1只包含正整數(shù)和“+”、“-”符號，同時(shí)以“=”結(jié)束。程序運(yùn)行界面如圖a所示，請回答下列問題。

（1）設(shè)計(jì)應(yīng)用程序界面時(shí)，為添加“計(jì)算”按鈕，應(yīng)使用圖b所示“控件工具箱”中的

4

4

（填寫相應(yīng)編號）控件，并在圖c所示的“屬性窗口”中，將

Caption

Caption

屬性的值設(shè)置為“計(jì)算”。
（2）要實(shí)現(xiàn)程序運(yùn)行時(shí)，單擊文本框Text1即可將文本框清空，則應(yīng)在

B

B

（選填字母：A．Command1_Click （　　）/B．Text1_Click （　?。?C．Form_Load （　?。┻^程中添加語句Text1．Text=““。
（3）實(shí)現(xiàn)上述功能的VB程序如下，請?jiān)跈M線處填入合適的代碼。
Private Sub Command1_Click

（　?。?/div>

（　　）

Dim s As String,ch As String
Dim fh As Integer,p As Integer,sum As Integer
s=Text1．Text：fh=1：p=0：sum=0
For i=1To Len（s）
ch=Mid（s,i,1）
If ①

ch＞=“0“Andch＜=“9“

ch＞=“0“Andch＜=“9“

 Then'判斷取出的字符是否為數(shù)字
p=p*10+Val（ch）
Else
sum=sum+p*fh
p=0
If ch=“-“Then
②

fh=-1

fh=-1

ElseIf ch=“+“Then
fh=1
End If
End If
Next i
Label3．Caption=Str（sum）
List1．AddItem ③

s&“=“&Str（sum）

s&“=“&Str（sum）

End Sub
（4）運(yùn)行程序，在文本框Text1中輸入“5+5-2”，單擊“計(jì)算“按鈕后，標(biāo)簽Label3上將顯示：

A

A

。（選填字母：A．10/B．8/C．程序出錯無法顯示）。