题型:单选题 题类:常考题 难易度:普通
浙江省嘉兴市2021届高三上学期信息技术9月教学测试
Private Sub Command1_Click( )
Const s1 = "tea"
s2="老师Happy Teacher's Day!":s3 = ""
For i=1 To Len(s2)
If bjiao(s1,Mid(s2, i, 1))Then s3=s3 + Str(i) + ","
Next i
Text1.Text = s3
End Sub
Function bijiao(x As String, y As String) As Boolean
bjiao = False
For i=1 To Len(x)
If y = Mid(x, i, 1) Then
bijiao = True:Exit Function
End If
Next i
End Function
执行上述程序段后,文本框Text1中显示的内容是( )
试题篮