Dim fs As New FileStream("D:\2.txt", FileMode.Open)
Dim sr As New StreamReader(fs)
Dim str As String
Dim temp As String
str = sr.ReadToEnd.ToString
MsgBox(str)
sr.Close()
fs.Close()
temp = str
temp.Replace("111", "22")
MsgBox(temp)
原来的txt文件里的内容是111,现在想从txt文件中读取内容,保存在一个字符串变量中,并替换。
如今的问题是能读出文件内容,但是无法替换,请求原因!
用VB读一个TXT文件当遇到16744639时替换成16744703,遇到5259392换成8466...
可以用脚本,解决简单问题省时省力,打个比方,用BAT脚本吧~echo off :abc set \/p str=<A.TXT if %str%==16744639 echo 16744703>A.TXT if %str%==5259392 echo 8455944>A.TXT goto abc
vb.net 如何获取txt1中 冒号 前的所有字符并做修改?
dim b as string a=InStr(1, juzi(i), ":")'查找冒号的位置为a b=mid(上面你给你字符串,1,a-1)用InStr函数可以查找“:”的位置,这样应该就可以了
vb.net如何在读取txt文本时,保留原有格式?(空格、换行符)
'教你一个高招(VB.NET 4)'因为Environment.NewLine.ToString是换行符,所以:'这是TextBox控件 TextBox1.Text &= "字符串" & Environment.NewLine.ToString '这是ListBox1控件 ListBox1.Itmes.add("字符串" & Environment.NewLine.ToString)...
VB.net 如果读取txt数据(或十进制dat数据)
vb.net虽也有input语句,但一次只能读取到一个变量中,可以用TextFieldParser类代替,但似乎没以前的方便。不过比以前的更灵活。写入文件Write还是可以用,在Microsoft.VisualBasic.FileIO中。Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click...
vb.net 如何复制一个txt文本里面的指定内容(例如某一行字段前面的所有内...
原来是分割字符串 vb专门有个分割字符串函数split 返回数组
vb.net文件读取txt
1、实现上传按钮方法代码。2、判断图片对象是否为空代码。3、取得数据库字段 dt.Rows(0)("Pic")方法代码。4、字节数组转换为Image类型方法代码。5、处理SQL中操作Image类型方法代码。6、实现的上传结果。
VB怎么实现记事本里替换的功能?
orstring=replace(orstring,i,rptxt(i))Doevents end if next replacea=orstring end function '比如text1.text="我看1次不行,得8次才能处理!"'调用 text1.text=replacea(text1.text)这样就可以了 参考资料:http:\/\/www.qdipc.net
vb.net 如何取出多行字符串中的指定的一行
第一个问题有个简单的方法,把字符串变量赋值到一个textbox里面,利用textbox.lines实现。如:dim a as string ="hh12345" & vbcrlf & "qdq123" & vbcrlf & "ddd244" & vbcrlf & "whw266" ’定义变量 textbox1.text=a ‘赋值 message.show(textbox1.lines(2).tostring) ‘显示第三行内容...
VB读取文本文件内字符串并赋值给变量
open "data.txt" for input as #1 'data.txt为存储数据的文件 do until EOF(1) = True '判断是否读到文件结尾 lineinput #1,tx '读入一行 array(a)=split(tx) '分割 for i=0 to ubound(a)b(j,i)=a(i) '赋值 next i j=j+1 loop close #1 '关闭文件 '输出b(,...
VB 如何修改TXT内容?
就用VB.NET来简单回答一下吧第一个问题:直接在写入文件时,使用Append参数就行了,比如 Dim vSW As New IO.StreamWriter("C:\\123.txt", True) vSW.Write("写入文件的内容") vSW.Close() 第二个问题,在读取TXT文件时,直接拆分到字符串数组就行了,这样你随便去修改、删除。 Dim vSR As New IO.StreamReade...