VB读写TXT文件
来源:互联网 发布:js动态删除table中的tr 编辑:程序博客网 时间:2024/05/01 19:07
Private Sub Command1_Click() '读文件
Open "d:a.txt" For Input As #1
Dim Lines As String
Dim NextLine As String
Dim i As Integer
Do While Not EOF(1)
On Error Resume Next
Line Input #1, NextLine
Lines = Lines & NextLine & Chr(13) & Chr(10)
Loop
Close #1
Text1.Text = Lines
End Sub
Private Sub Command2_Click() '写文件
Open "d:a.txt" For Output As #1
Print #1, Text1.Text
Close #1
End Sub
'如果要处理的是程序目录所在的a.txt那么应该是这样写:
'Open app.path+"/a.txt" For Input As #1
Open "d:a.txt" For Input As #1
Dim Lines As String
Dim NextLine As String
Dim i As Integer
Do While Not EOF(1)
On Error Resume Next
Line Input #1, NextLine
Lines = Lines & NextLine & Chr(13) & Chr(10)
Loop
Close #1
Text1.Text = Lines
End Sub
Private Sub Command2_Click() '写文件
Open "d:a.txt" For Output As #1
Print #1, Text1.Text
Close #1
End Sub
'如果要处理的是程序目录所在的a.txt那么应该是这样写:
'Open app.path+"/a.txt" For Input As #1
- VB读写TXT文件
- vb.net 读写TXT文件!
- VB循环读写TXT文件
- txt文件读写
- C#读写txt文件
- Java读写txt文件
- txt文件读写
- .Txt 文件读写
- DataGrid读写txt文件
- javascript 读写txt文件
- javascript 读写txt文件
- java读写txt文件
- js读写txt文件
- vs2010读写txt文件
- Android TXT文件读写
- java读写txt文件
- Unity3D 读写 txt 文件
- Unity3D 读写 txt 文件
- SQL常用命令使用方法
- JS代码小集合
- 史玉柱和郭广昌谈创业团队管理:两种类型的“孔雀王”
- 如何将文本框里的多行数据逐行记录在数组里
- sql注入
- VB读写TXT文件
- 删除a表中和b表相同的数据
- WideCharToMultiByte和MultiByteToWideChar函数的用法
- Html网页页面head区规范知识
- SQL核心语句(非常实用的几个技巧)
- 对web.config进行新增修改删除读取操作
- 动软.Net代码生成器Codematic (供大家分享)
- HTML中小meta的大作用
- 好东东,大家一起来分享(C#开发经验技巧宝典)