2. 计算机
  3. 窗体上有一个名为List1的列表框，其中已经输入了若干个项目(如图所示)； 还有两个文本框，名称分别为Text1、Text2，一个名称为Command1的命令按钮，并有以下程序： Private Sub Command1_Click()

窗体上有一个名为List1的列表框，其中已经输入了若干个项目(如图所示)； 还有两个文本框，名称分别为Text1、Text2，一个名称为Command1的命令按钮，并有以下程序： Private Sub Command1_Click()

admin2009-03-17  101
问题 窗体上有一个名为List1的列表框，其中已经输入了若干个项目(如图所示)；

还有两个文本框，名称分别为Text1、Text2，一个名称为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="没有匹配项目"        Else               Text2=str        End If    End Sub    程序运行时，在Text1中输入“京”，单击命令按钮，则在Text2中显示的内容是______。
选项 A、京
B、北京 南京
C、南京 北京
D、没有匹配的项目
答案C
解析 InStr([首字符位置]字符串1，字符串2[,n])用来在“字符串1”中查找“字符串2”，如果找到，则返回“字符串2”的第一个字符在“字符串广中的位置。ListCount属性表示组合框中项目的数量。ListCount-1表示组合框中最后一项的序号。程序中循环变量的初值是列表框中的最后一个项目，终值是列表框中的第一个项目，此循环的作用是从列表框的最后一个项目到第一个项目中，找出列表框项目中包含“京”的项目，并将内容显示在Text2中。
转载请注明原文地址:https://kaotiyun.com/show/gj1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)