题目内容:
窗体上有1个名称为List1的列表框,其中已经输入了若干个项目(如图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序Private Sub Command 1 Click()
Dim str As String,S As String,k As Integer
s=Text1
str=“”
For k=List1.ListCount-1 To 0 Step-1
If InStr(List1.List(k),s)>0 Then
str=str&List1.List(k)&“ ”
End If
Next k
If str=“”Then
Text2=“没有匹配的项目”
Else
Text 2=str
End If
End Sub
程序运行时,在Text1中输入“京”,单击命令按钮,则在Text2中显示的内容是( ) A.京
B.北京南京
C.南京北京
D.没有匹配的项目
参考答案:
答案解析: