vb的一点知识总结适合初学者.docVIP

1）文件的打开 Open 文件名 for 模式 [#]文件号 ’文件号是1~255的整数 三种模式：1）Output (输出) 2）Input（输入） 3）Append （添加） Eg: Open ″D:\date.txt ″ For Input as #1 ’绝对路径 Open App.Path ″\date.txt ″ For Input as #1 ’相对路径 2）从txt文件中读取数据 (1) 将内容全部读取在文本框中 ① 一行行的读入： Dim InputDate as string Text1.text=“” Open d:\1.txt For Input As #1 (Open app.path \1.txt For Input As #1)(相对路径) Do while not EOF(1) ’EOF相当于end of file line Input #1,inputDate Text1.Text = Text1.Text + InputDate + vbCrLf（换行） Loop Close #1 一个字符一个字符的读入 Dim InputDate