vb.net查找功能

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

成都創(chuàng)新互聯(lián)公司是一家集網(wǎng)站建設,鹿泉企業(yè)網(wǎng)站建設,鹿泉品牌網(wǎng)站建設,網(wǎng)站定制,鹿泉網(wǎng)站建設報價,網(wǎng)絡營銷,網(wǎng)絡優(yōu)化,鹿泉網(wǎng)站推廣為一體的創(chuàng)新建站企業(yè)，幫助傳統(tǒng)企業(yè)提升企業(yè)形象加強企業(yè)競爭力?？沙浞譂M足這一群體相比中小企業(yè)更為豐富、高端、多元的互聯(lián)網(wǎng)需求。同時我們時刻保持專業(yè)、時尚、前沿，時刻以成就客戶成長自我，堅持不斷學習、思考、沉淀、凈化自己，讓我們?yōu)楦嗟钠髽I(yè)打造出實用型網(wǎng)站。

這樣可以查找多個重復的值.但是到最后沒有的時候就會提示:InvalidArgument=“-1”的值對于“SelectionStart”無效。

參數(shù)名: SelectionStart

怎么搞定.查找就是這個問題不能解決,至于替換感謝你們提供的replace.

wuyazhe 朋友,你那個我不太懂啊.而且我也不需要太復雜.現(xiàn)在主要的問題是查找！

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，利用獲得的選中項文本（即文件與路徑），使用打開文本文件的方法，讀取內(nèi)容顯示在文本框里。

vb.net 中如何使用SQL語句查詢數(shù)據(jù)庫中的數(shù)據(jù)

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

2、輸入以下代碼：Public conn1 ?As SqlConnection = New SqlConnection 。

3、聲明關鍵字 Public；（因為是全局變量，所以用Public 來聲明）。

4、如果SQL 數(shù)據(jù)庫就在本機，則用以下代碼連接。

5、如果代碼太長，影響可讀性，可以用空格加"_"后，回車換行即可。

vb.net查找未使用的函數(shù)

您是想問vb.net查找未使用的函數(shù)方法嗎？vb.net查找未使用的函數(shù)方法是：

1、在VS.NET中右鍵單擊主RESX文件，然后從上下文菜單中選擇FindUsages。

2、雙擊解決方案窗口中的每個匹配項，這將打開包含該資源的源代碼窗口。

3、在源代碼窗口中重命名此資源，它將彈出ReSharper的“重命名資源”對話框。

4、它將重命名資源和自動生成的C#包裝器/訪問類。

5、對"Usages“窗口中的所有資源重復上述步驟2、3和4。

6、在VisualStudio的資源編輯器中打開RESX文件，并選擇所有不帶前綴的文件。

7、您最終得到了一個RESX文件，其中有未使用的函數(shù)。

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

詳見源代碼！！