vb.Net对文件指定字符串的修改

文本框 TextBox1

在康巴什等地区，都构建了全面的区域性战略布局，加强发展的系统性、市场前瞻性、产品创新能力，以专注、极致的服务理念，为客户提供成都网站制作、网站建设 网站设计制作按需求定制设计,公司网站建设,企业网站建设,品牌网站建设,成都营销网站建设,外贸网站制作,康巴什网站建设费用合理。

上一条 Button1

下一条 Button2

修改 Button3

Imports System.IO

Public Class Form1

Dim currIndex As Integer = 0

Dim s2 As List(Of String) = New List(Of String)

Dim s As String

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

s = File.ReadAllText(Application.StartupPath  "\txt.txt")

Dim s1 As String() = s.Split("@")

For i As Integer = 0 To s1.Length - 1

If s1(i).Trim()  "" Then

s2.Add("@"  s1(i))

End If

Next

TextBox1.Text = s2(0)

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

currIndex = currIndex + 1

If currIndex  s2.Count - 1 Then

MsgBox("已经是最后条了")

Return

End If

TextBox1.Text = s2(currIndex)

End Sub

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

currIndex = currIndex - 1

If currIndex  0 Then

MsgBox("已经是第一条了")

Return

End If

TextBox1.Text = s2(currIndex)

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

s2(currIndex) = TextBox1.Text

s = ""

For i As Integer = 0 To s2.Count - 1

s = s2(i)

Next

File.WriteAllText(Application.StartupPath  "\txt.txt", s)

End Sub

End Class

vb .net里的 查找替换功能里 ，我想把List 替换替换成fList List是单独的字符串。

变通的方法：

首先 把List 替换为一个其他的字符串如OOO,要全字匹配替换。然后替换List为fList,然后再把OOO替换为List。

VB.net里的查找和替换怎么写

TextBox 有 SelectionStart 和 SelectionLength 两个属性，分别代表选中字符（也就是查找之后高亮的那部分）的起始位置和长度。

string 类型本身有方法 IndexOf()，可以获取某个字符串第一次出现的位置，把这个值赋值给 SelectionStart，把这个字符串的 Length 赋值给 SelectionLength，这就是查找并高亮功能了。

替换的话就是 Replace() 方法。

VB.NET 2010 如何替换两个固定字符串之间的变量

这个简单，截取字符串就行了

TextBox1.Text = TextBox1.Text.Substring(0, 2) "BB" TextBox1.Text.Substring(4, 2)

vb.net字符串 替换

x="a[11dsfsf]b"

b=x.lastindexof("]")

a=x.indexof("[")

x=x.substring(0,a) "0" x.substring(b)

用VB.NET快速替换DLL文件中的字符串

将dll以文件方式以UTF-8的方式读入，然后接下来就替换字符串就可以了嘛

C#:

using System.IO;

...

string text;

text=File.ReadAllText(FilePath, Encoding.UTF8);

text.Replace("...","...");

...

-------------------------

还要谢谢你，不然我还不知道是UTF-8的编码格式，我有一个验证的问题可以解决了。

网站栏目：vb.net中替换字符串 vb 替换字符函数
文章路径：http://pwwzsj.com/article/dodidpp.html