VB.net里的查找和替換怎么寫

TextBox 有 SelectionStart 和 SelectionLength 兩個屬性，分別代表選中字符（也就是查找之后高亮的那部分）的起始位置和長度。

創(chuàng)新互聯(lián)專注于企業(yè)全網(wǎng)整合營銷推廣、網(wǎng)站重做改版、西秀網(wǎng)站定制設(shè)計(jì)、自適應(yīng)品牌網(wǎng)站建設(shè)、HTML5、商城網(wǎng)站建設(shè)、集團(tuán)公司官網(wǎng)建設(shè)、外貿(mào)營銷網(wǎng)站建設(shè)、高端網(wǎng)站制作、響應(yīng)式網(wǎng)頁設(shè)計(jì)等建站業(yè)務(wù)，價格優(yōu)惠性價比高，為西秀等各大城市提供網(wǎng)站開發(fā)制作服務(wù)。

string 類型本身有方法 IndexOf()，可以獲取某個字符串第一次出現(xiàn)的位置，把這個值賦值給 SelectionStart，把這個字符串的 Length 賦值給 SelectionLength，這就是查找并高亮功能了。

替換的話就是 Replace() 方法。

大家好，請問vb.net如何將一個txt文本文件中指定位置的內(nèi)容替換掉？？

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

Dim txt As String = My.Computer.FileSystem.ReadAllText("c:\新建 文本文檔.txt", System.Text.Encoding.Default) '先讀取文本中所有內(nèi)容

My.Computer.FileSystem.WriteAllText("c:\新建 文本文檔.txt", "", False, System.Text.Encoding.Default) '清空原文本內(nèi)容

Dim AllLine() = Split(txt, vbCrLf) '按回車符號切割成數(shù)組

For i As Integer = 0 To UBound(AllLine) '循環(huán)數(shù)組

' AllLine(i) = Replace(AllLine(i), "000", "111") '如果所有行都是統(tǒng)一轉(zhuǎn)換則本條生效

If i = 5 Then '只轉(zhuǎn)換第六行 起始是0，所以5實(shí)際為第6行

AllLine(i) = Replace(AllLine(i), "000", "111")

End If

My.Computer.FileSystem.WriteAllText("c:\新建 文本文檔.txt", AllLine(i) vbCrLf, True, System.Text.Encoding.Default) '按行重新寫入

Next

End Sub

vb.net 替換word文本框中的字符 點(diǎn)擊替換按鈕時內(nèi)容中的a替換為b，c替換為d 怎么操作？ 需要代碼。

直接用Replace語句把：

Dim oldstr,newstr as string

oldstr="abcdeftgd"

newstr=replace(oldstr,"a","b")

newstr=replace(newstr,"c","d")

望采納。