题目内容:
窗体上有1个名称为List的列表框,其中已经输入了若干个项目(如图所示):还有2个文本框,名称分别为Text1、Text2,1个名称为 Command1的命令按钮,并有以下程序 PrivateSubCommand1_Click()
DimstrAsString,sAsString,kAsInteger
s=Text1
Str=””
Fork=List1.ListCount-1to0Step-1
IfInStr(List.List(k),s)>0then
str=str&List.List(k)&””
EndIf
Nextk
Ifstr=””Then
Text2=”没有匹配的项目”
Else
Text2=str
EndIf
EndSub
程序运行时,在Text1中输入“京”,单击命令按钮,则在Text2中显示的内容是( )。 A.京
B.北京南京
C.南京
D.没有匹配的项目
参考答案:
答案解析: