展开全部
控件text1,text2,list1,作用，在text1中输入要在list1中查找的字符串，在text2中显示list1中只要含有text1的字符串。text2的mutiline设置为ture
Private Sub Command1_click()
For i = 0 To List1.ListCount - 1
If InStr(1, List1.List(i), Text1.Text) > 0 Then
Text2.Text = Text2.Text & List1.List(i) & vbCrLf
End If
Next
End Sub
Private Sub Command1_click()
For i = 0 To List1.ListCount - 1
If InStr(1, List1.List(i), Text1.Text) > 0 Then
Text2.Text = Text2.Text & List1.List(i) & vbCrLf
End If
Next
End Sub
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
TableDI
2024-07-18 广告
在上海悉息信息科技有限公司，我们经常使用Excel来处理和分析数据。其中，包含关键字匹配是Excel中一个非常实用的功能。它可以帮助我们快速在大量数据中找出包含特定关键字的单元格。通过这个功能，我们可以轻松筛选出符合特定条件的数据，从而进行...
点击进入详情页
本回答由TableDI提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
