用VB编写程序,在文本框Text1中输入任意字符串s,统计s中数字字符串的数值和(如输入字符串“ab123dr34fg9de”,则输出166,即123+34+9=166。),并在Label3输出结果。程序设计界面如下:
根据算法将下列程序补充完整。
(1)
“Command1_Click”是(A .对象名;B .事件名; C .事件处理过程名;D .方法名)
(2)
根据算法将下列程序补充完整
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
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"
ch2 = Mid(s, j, 1)
Loop
sum = sum +
i = j
End If
i = i + 1
Loop
Label3.Caption = Str(sum)
End Sub
答案: 【1】C
【1】n = len(s)【2】J= J+1【3】Val(Mid(s,I,j-i))