窗體上有一個(gè)名為L(zhǎng)ist1的列表框，其中已經(jīng)輸入了若干個(gè)項(xiàng)目(如圖所示)；

還有兩個(gè)文本框，名稱分別為Text1、Text2，一個(gè)名稱為Command1的命令按鈕，并有以下程序： Private Sub Command1_Click() Dim str As String,s As String,k As Integer s=Text1 str="" For k=List1.ListCount-1 To 0 Step-1 IfInStr(List1.List(k),s)＞0 Then str=str&List1.List(k)&" " End If Next k If str="" Then Text2="沒有匹配項(xiàng)目" Else Text2=str End If End Sub 程序運(yùn)行時(shí)，在Text1中輸入“京”，單擊命令按鈕，則在Text2中顯示的內(nèi)容是______。

A．京

B．北京 南京

C．南京 北京

D．沒有匹配的項(xiàng)目

C解析：InStr([首字符位置]字符串1，字符串2[,n])用來(lái)在“字符串1”中查找“字符串2”，如果找到，則返回“字符串2”的第一個(gè)字符在“字符串廣中的位置。ListCount屬性表示組合框中項(xiàng)目的數(shù)量。ListCount-1表示組合框中最后一項(xiàng)的序號(hào)。程序中循環(huán)變量的初值是列表框中的最后一個(gè)項(xiàng)目，終值是列表框中的第一個(gè)項(xiàng)目，此循環(huán)的作用是從列表框的最后一個(gè)項(xiàng)目到第一個(gè)項(xiàng)目中，找出列表框項(xiàng)目中包含“京”的項(xiàng)目，并將內(nèi)容顯示在Text2中。