vb.net查找功能

RichTextBox1.SelectionStart = RichTextBox1.Text.IndexOf(string3,RichTextBox1.SelectionStart1)

成都创新互联公司是一家集网站建设,鹿泉企业网站建设,鹿泉品牌网站建设,网站定制,鹿泉网站建设报价,网络营销,网络优化,鹿泉网站推广为一体的创新建站企业，帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿，时刻以成就客户成长自我，坚持不断学习、思考、沉淀、净化自己，让我们为更多的企业打造出实用型网站。

这样可以查找多个重复的值.但是到最后没有的时候就会提示:InvalidArgument=“-1”的值对于“SelectionStart”无效。

参数名: SelectionStart

怎么搞定.查找就是这个问题不能解决,至于替换感谢你们提供的replace.

wuyazhe 朋友,你那个我不太懂啊.而且我也不需要太复杂.现在主要的问题是查找！

vb.net 如何用通配符查找文件

步骤如下：

窗体上添加2个列表框，一个按钮：

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim MyDir As String = "C:\123"

'搜索并显示子文件夹

ListBox1.Items.Clear()

For Each MySubDir As String In System.IO.Directory.GetDirectories(MyDir)

ListBox1.Items.Add(MySubDir)

Next

'搜索并显示文件

ListBox2.Items.Clear()

For Each MyFile As String In System.IO.Directory.GetFiles(MyDir)

ListBox2.Items.Add(MyFile)

Next

End Sub

End Class

vb.net查找文件问题

思路：

1，使用ListBox1控件来存放搜索到的文件名，然后ListBox1.SelectedItem就可以返回选中项的文本；

2，利用获得的选中项文本（即文件与路径），使用打开文本文件的方法，读取内容显示在文本框里。

vb.net 中如何使用SQL语句查询数据库中的数据

1、首先打开Visual Studio 2008代码窗口，添加引用。

2、输入以下代码：Public conn1  As SqlConnection = New SqlConnection 。

3、声明关键字 Public；（因为是全局变量，所以用Public 来声明）。

4、如果SQL 数据库就在本机，则用以下代码连接。

5、如果代码太长，影响可读性，可以用空格加"_"后，回车换行即可。

vb.net查找未使用的函数

您是想问vb.net查找未使用的函数方法吗？vb.net查找未使用的函数方法是：

1、在VS.NET中右键单击主RESX文件，然后从上下文菜单中选择FindUsages。

2、双击解决方案窗口中的每个匹配项，这将打开包含该资源的源代码窗口。

3、在源代码窗口中重命名此资源，它将弹出ReSharper的“重命名资源”对话框。

4、它将重命名资源和自动生成的C#包装器/访问类。

5、对"Usages“窗口中的所有资源重复上述步骤2、3和4。

6、在VisualStudio的资源编辑器中打开RESX文件，并选择所有不带前缀的文件。

7、您最终得到了一个RESX文件，其中有未使用的函数。

VB.NET遍历查找某个文件夹，并找出指定文件

解压密码：1299

假设路径为C:\abc

代码：

Public Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

Dim Files As ObjectModel.ReadOnlyCollection(Of String) = My.Computer.FileSystem.GetFiles("C:\abc")

Dim FileSize As Long, FileName As String = Nothing

Dim oFileSize As Long

For Each File As String In Files

oFileSize = My.Computer.FileSystem.GetFileInfo(File).Length

If oFileSize  FileSize Then

FileSize = oFileSize

FileName = File

End If

Next

Dim ListN As ListViewItem = New ListViewItem(My.Computer.FileSystem.GetName(FileName))

ListN.SubItems.Add(oFileSize  " byte")

ListN.SubItems.Add(My.Computer.FileSystem.GetFileInfo(FileName).Extension  " 文件")

ListN.SubItems.Add(FileName)

ListView1.Items.Add(ListN)

End Sub

End Class

详见源代码！！