高分求vb简单编程

来源:百度知道 编辑:UC知道 时间:2024/06/23 15:55:52
一定加30分
Dim data
data = Text1.Text
Open "d:\text1.txt" For Output As #1
Print #1, data
Close #1
answer = MsgBox("已经保存到d:\text1.txt中", 0, "友情提示")
Print answer
这是什么意思 一句一句解释 我不懂
谢谢啊 可是#1是什么意思 回答好了就加你

dim data后面怎么没有什么as ……

什么叫输出的方式

快餐保 分基本属于你了 但是………………
什么是输出的方式以output
为什么 dim data没有as啊

我上学了晚上回来看

Dim data '定义一个data的变量
data = Text1.Text '把text1的值赋给data这个变量
Open "d:\text1.txt" For Output As #1 '以输出方式打开路径为d:\text1.txt的文件,并设置文件号为#1
Print #1, data '是将data送入1号缓冲区.记住,是缓冲区,而非文件,但是缓冲的目的是为写入文件,之前你定义了open *** for *** as #1
缓冲后,有一定时间间隙,会自动写入你定义的文件,所以如果你不写上close #1便急急关闭了程序,你的文件中可能什么内容都没有哦
Close #1 '关闭对象
answer = MsgBox("已经保存到d:\text1.txt中", 0, "友情提示") '这个就简单啦,给出保存成功的提示。
Print answer '输出answer的内容
-----------------------------------------
# 代表文件编号 所以#1就是代表文件编号为1
-----------------------------------------
没有as什么表示默认定义,类型就默认为Variant
-----------------------------------------
#1可以这样理解,将要写入文本的内容暂时存在内存里,但是还没有写入文件。所以输出的方式其实也不用很深入的去理解,给个例子你去理解:
'以输出方式打开a.txt这里有路径问题参见 "c:\a.txt"就是指输出到哪个文件
'as #1 打开文件需要占用工作区的,所以以1号工作区打开该文件
'for append是指输出方式为追加方式
Open "C:\a.txt" For Append As #1
'在一号文件区打开