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

（1）設計應用程序界面時，為添加“計算”按鈕，應使用圖b所示“控件工具箱”中的

4

4

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

Caption

Caption

屬性的值設置為“計算”。
（2）要實現程序運行時，單擊文本框Text1即可將文本框清空，則應在

B

B

（選填字母：A．Command1_Click （　　）/B．Text1_Click （　　）/C．Form_Load （　　））過程中添加語句Text1．Text=““。
（3）實現上述功能的VB程序如下，請在橫線處填入合適的代碼。
Private Sub Command1_Click

（　　）

（　　）

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'判斷取出的字符是否為數字
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）運行程序，在文本框Text1中輸入“5+5-2”，單擊“計算“按鈕后，標簽Label3上將顯示：

A

A

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