题目

小李用VB编写了一个VB程序，在文本框Text1中输入任意字串s，单击命令按钮Command1，统计s中以各连续数字字串为一因子的数字之和。如输入字符串 “ast23bcde567fg8”，则输出598，即23+567+8，并在Text2中输出结果。程序界面如图所示。代码如下： （1） 若要将文本框的默认值设为空，则应设置文本框的属性为空。 （2） 为实现上述功能的VB程序，请在划线处填写合适的代码。 Private Sub Command1_Click()  Dim s As String, a As String, b As String  Dim p As Integer, sum As Integer  s=Text1.Text + "e"  ′加一个结尾非数字字符  i=1  p=0  sum=0  Do While i<Len(s)   a=Mid(s,i,1)   b=Mid(s,i+1,1)   If (a>="0" And  a<="9") And (b>="0" And  b<="9") Then    p=p*10+Val(a)       p=p*10+Val(a)    sum=sum+p       i=i+1   End If   i=i+1  Loop  Text2.Text=Str(sum) End Sub （3） 若输入字符串是“a2b056789bc8”，则程序运行后显示的结果是：。 答案： 【1】Text 【1】ElseIf (a>=“0” And a<=“9”) And (b>“9” Or b<“0”) Then【2】p=0 【1】溢出

查看本题答案和解析