题库 高中信息

题干

某“数值提取”程序,实现如下功能:在文本框Text1中输入包含数字和其他非数字字符混合的原始数据,点击“数值提取”按钮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
Dim flag As Boolean
Dim tmp As String
dim ans As String
s = Text1. Text
s = s+ "."
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+ ","

tmps = ""

_________

End If
Next i
Text2. Text = ans
End Sub
(3)如图,若删除程序中的语句s=s+ ".",输入不变,则提取后的数字信息为_____。
上一题 下一题 0.99难度 None 更新时间:2020-03-18 09:42:20

答案(点此获取答案解析)