用VB編寫程序，在文本框Text1中輸入任意字符串s,統(tǒng)計(jì)s 中數(shù)字字符串的數(shù)值之和（如輸入字符串“st23udent55sch8”，則輸出86，即23+55+8=86），并在Label3輸出結(jié)果。程序設(shè)計(jì)界面如圖所示。
（1）代碼“Private Sub Command1_Click （　　）”中的Command1_Click （　?。┦?!--BA-->

C

C

（填字母：A．對象名/B．事件名/C．事件處理過程名/D．屬性名）。
（2）根據(jù)算法將下列程序補(bǔ)充完整。
Private Sub Command1_Click （　　）
Dim s As String,ch As String
Dim ch2 As String,sum As Double
Dim n As Integer,i As Integer
s=Text1．Text
①

n=Len（s）或n=Len（Text1．text）

n=Len（s）或n=Len（Text1．text）

i=1：sum=0
Do While i＜=n
ch=Mid（s,i,1）
If ch＞=“0“And ch＜=“9“Then
j=i
ch2=Mid（s,j,1）
Do While ch2＞=“0“And ch2＜=“9“
j=j+1
ch2=Mid（s,j,1）
Loop
sum=sum+②

Val（Mid（s,i,j-i））

Val（Mid（s,i,j-i））

i=j
End If
i=i+1
Loop
Label3．Caption=Str（sum）
End Sub