vb读写txt实例

首页 >> 正文

vb读写txt实例

来源：baiyundou.net 日期：2024-09-20

周翠玛2932如何用VB判断读取TXT文本内容? -
汪管云18571751089 ______ dim s as string open ＂\tm.txt＂ for input as #1 input #1,s if right(s,1)=＂=＂ then msgbox ＂输出为空＂ else msgbox right(s,1) end if close #1

周翠玛2932VB怎么读取TXT文件的内容 -
汪管云18571751089 ______ 新建一个工程,然后写窗体代码如下:Option Explicit Private Sub Form_Click() Dim TextLine Open ＂记录.txt＂ For Input As #1 ' 打开文件. Do While Not EOF(1) ' 循环至文件尾. Line Input #1, TextLine ' 读入一行数据并将其赋予某变量. Debug.Print TextLine ' 在立即窗口中显示数据. Loop Close #1 ' 关闭文件.End Sub试试看吧,有什么问题欢迎追问.

周翠玛2932VB如何读取txt文件 -
汪管云18571751089 ______ 可以用下面的方法读取 Private Sub Command1_Click() Dim text Dim line Open App.Path & ＂\test.txt＂ For Input As #1 For i = 0 To 4 Line Input #1, line text = text & line & vbCrLf Next i Close #1 Text1.text = text End Sub测试工程见附件

周翠玛2932vb写入txt -
汪管云18571751089 ______ '覆盖内容写入 open txt文件 for output as #1 print #1,写入内容 close #1'在原文件尾部写入 open txt文件 for append as #1 print #1,写入内容 close #1

周翠玛2932VB如何读取TXT文件里面的内容到文本框
汪管云18571751089 ______ Private Sub Form_click() Dim a$ Open ＂c:\1.txt＂ For Input As #1 Do Input #1, a Text1.Text = Text1.Text & a & vbCrLf Loop Until EOF(1) Close #1 End Sub 貌似1楼的只能读取1行而已..

周翠玛2932如何用VB读取TXT中的信息, -
汪管云18571751089 ______ 定义TempFile为TXT文件 open TempFile for input as #1 do until eof(1) line input #1,TempString '读取每一行到TempString字符串变量 loop close #1

周翠玛2932如何用vb读取txt文件,指定的某行赋给字符串变量? -
汪管云18571751089 ______ '先在代码里加如下 Function Private Function GetTxt(TxtPath As String) As String Dim i As Integer: i = FreeFile Open TxtPath For Input As #i GetTxt = StrConv(InputB(LOF(i), i), vbUnicode) Close #i End Function'需要的时候: MsgBox Split(GetTxt(＂...

周翠玛2932如何编写在VB中读取TXT文件的语句? -
汪管云18571751089 ______ 顺序访问方式 Dim Lstr as String Open ＂C:\test.txt＂ For input As #1 Do While Not EOF(1) Line Input #1, Lstr Text1.Text = Text1.Text + Lstr Loop Close #1 二进制方式访问 Open ＂c:\test.txt＂ For Binary As #1 Text1.Text = Input(LOF(1), 1) Close #1 希望你够了吧?

周翠玛2932VB 怎样将文本框的数据读取和保存到文本文件中? -
汪管云18571751089 ______ VB将文本框的数据读取和保存到文本文件中,实际上就是VB对txt的读写操作.相关代码如下:1、vb读取txt文件内容,以下代码实现把电脑txt中的内容读取到程序文本框text1中.Private Sub Command1_Click() Open App.Path & ＂\123.txt＂ For...

周翠玛2932怎么让VB中的一个值写入到一个txt文件中? -
汪管云18571751089 ______ Open ＂文件路径＂ For Append As #1 Print #1, text1.text Close #1

（编辑：自媒体）