题目

编写“数字提取”程序，实现如下功能：在文本框Text中输入包含数字和其他非数字字符混合的原始数据，点击“数字提取”按钮 Command1，将数据中的数字以“.”间隔输出到文本框Text2中。程序运行界面如图所示，VB代码如下。请回答以下问题： （1） 要使程序运行后，窗体 Form1标题立即自动显示为“数字提取”，可在（单选，填字母：A .Form Load/B .Form_Click/C .Command1_Click）事件过程中添加语句 Form1. Caption= “数字提取”。 （2） 实现上述功能的VB程序如下，请在划线处填入合适的代码。 Private Sub Command1 _Click( ) Dim s As String, ch As String, flag As Boolean Dim tmp As String, ans As String s= Text1.Text tmp = “.” Ans= “.” Flag= False For i =1 To Len(s)     ch=Mid (s, i, 1)     If ch > = “0” And ch < = “9” Then         tmp=   ①           flag = True     ElseIf flag = True Then         ans = ans +tmp + “.”             ②            flag =False     End If Next i Text2.Text ans End Sub ① ②  （3） 如上图所示，若删除程序中加框处语句“s=s+ “.”，输不变，则提取后的数字信息为。 答案： 【1】A 【1】tmp+ch或tmp&ch【2】tmp=”” 【1】86，1

查看本题答案和解析