题库 高中信息
题干
若字符串a是在字符串s的任意位置插入多个字符后构成的新字符串，则称字符串a为字符串 S的扩展字符串。判断扩展字符串的VB程序界面如图所示，在文本框Text1和Text2 中分别输入字符串s和a，单击“判断”按钮Command1，如果字符串a为字符串S的扩展字符串，则在文本框Text3中输出“是”和插入字符的内容，否则输出“否”。
①结合题意，窗体中属于TextBox类的对象共有_________个（填数字）。
②实现上述功能的VB程序如下，请在划线处填入合适代码。
Private Sub Commandl_Click()
Dim s As String，c As String，ss As String，cc As String
Dim i As Integer，As Integer，res As String
s= Text1.Text
c = Text2.Text
i=l：j=l：res =“”
Do While i <= Len(s)
If ②_________ Then
End Sub
（3）运行该程序，输入如第l4题图中所示的数据，程序执行结束时，变量j的值是____
①结合题意，窗体中属于TextBox类的对象共有_________个（填数字）。
②实现上述功能的VB程序如下，请在划线处填入合适代码。
Private Sub Commandl_Click()
Dim s As String，c As String，ss As String，cc As String
Dim i As Integer，As Integer，res As String
s= Text1.Text
c = Text2.Text
i=l：j=l：res =“”
Do While i <= Len(s)
ss = Mid(s, i, l)
cc = Mid(c, j, l)
If ss = cc Then i = i + l Else res = res + cc
①________
If j > Len (c) Then Exit Do ‘Exit Do 执行退出循环
LoopIf ②_________ Then
Text3.Text ="是，增加了：" + res + Mid( c，j，Len(c) -j+l)
ElseText3.Text = "否"
End IfEnd Sub
（3）运行该程序，输入如第l4题图中所示的数据，程序执行结束时，变量j的值是____
答案(点此获取答案解析）
