问题 单项选择题

窗体上有一个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有两个文本框,名称分别为Text1、Text2,一个名称为Command1的命令按钮,并有以下程序: Private Sub Command1_Click()Dim str As String,s As String,k As Integers=Text1str=""For k=List1.ListCount-1 To 0 Step-1 IfInStr(List1.List(k),s)>0 Thenstr=str&List1.List(k)&" " End IfNext kIf str="" ThenText2="没有匹配项目"ElseText2=strEnd If End Sub 程序运行时,在Text1中输入“京”,单击命令按钮,则在Text2中显示的内容是______。

A.京

B.北京 南京

C.南京 北京

D.没有匹配的项目

答案

参考答案:C

解析:[评析] InStr([首字符位置]字符串1,字符串2[,n])用来在“字符串1”中查找“字符串2”,如果找到,则返回“字符串2”的第一个字符在“字符串广中的位置。ListCount属性表示组合框中项目的数量。ListCount-1表示组合框中最后一项的序号。程序中循环变量的初值是列表框中的最后一个项目,终值是列表框中的第一个项目,此循环的作用是从列表框的最后一个项目到第一个项目中,找出列表框项目中包含“京”的项目,并将内容显示在Text2中。

单项选择题
单项选择题