如何在vb6.0中创建和使用文本资源文件
答案:1 悬赏:20 手机版
解决时间 2021-03-10 04:33
- 提问者网友：战皆罪
- 2021-03-09 04:22
如何在vb6.0中创建和使用文本资源文件
最佳答案
- 五星知识达人网友：迷人又混蛋
- 2021-03-09 04:46
1、创建文件
Private Sub Command1_Click()
‘创建一个文件text.txt,并写入"Hello world!"
Open "d:\test.txt" For Output As #1
Print #1, "Hello world!"
Close #1
End Sub
2、打开文件读取
Dim MyString
Private Sub Command1_Click() ’按钮事件
Open “d:\text.txt" For Input As #1 '打开文本文件，读取。
Do While Not EOF(1) '是否没到文件末尾
Input #1, MyString '读取文件内容
Loop
Close #1
End Sub
Private Sub Command1_Click()
‘创建一个文件text.txt,并写入"Hello world!"
Open "d:\test.txt" For Output As #1
Print #1, "Hello world!"
Close #1
End Sub
2、打开文件读取
Dim MyString
Private Sub Command1_Click() ’按钮事件
Open “d:\text.txt" For Input As #1 '打开文本文件，读取。
Do While Not EOF(1) '是否没到文件末尾
Input #1, MyString '读取文件内容
Loop
Close #1
End Sub
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯