题库 高中信息

题干

某VB程序段如下所示:
Dim x As String
Private Sub Form_Load()
x = ""
End Sub
Private Sub Text1_Change()
Dim s As String, k As String
Dim i As Integer
s = "0123456789ABCDEF"
k = Text1.Text
For i = 1 To Len(s)
If Mid(s, i, 1) = k Then x = x + k
Next i
If x = "" Then x = "没有找到!"
Label1.Caption = x
End Sub
若在文本框Text1中依次输入“2”和“9”,则Label1上显示的内容为
A.11B.2C.9D.29
上一题 下一题 0.99难度 选择题 更新时间:2019-05-06 06:34:46

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