VB如何生成dat文件
比如说我要做个程序按下按钮后记录文本框中输入的东西下次打开的时候还是那东西代码我也有了虽然看不懂但主要是不知道dat文件怎么生成.谁知道告诉我下好么!...
比如说我要做个程序按下按钮后记录文本框中输入的东西下次打开的时候还是那东西代码我也有了虽然看不懂但主要是不知道dat文件怎么生成.谁知道告诉我下好么!
展开
展开全部
VB可通过Open 语句,用Print # 语句将格式化显示的批处理行命令数据写入顺序文件中。
Open 语句,能够对文件输入/输出 (I/O)。
Print # 语句,将格式化显示的数据写入顺序文件中。
Output关键字,如果 pathname 指定的文件不存在,那么,在用
Append、Binary、Output、或 Random
方式打开文件时,可以建立这一文件。实现代码,在D盘根目录生成一个将D盘根目录下的文件复制到E盘根目录的BAT批处理文件。
Private Sub Form_Click()
Open "D:\Copy.bat" For Output As #1
Print #1, "Copy D:\*.* E:\*.*"
Close #1
End Sub
展开全部
dat 文件并不是专门的文件格式,任意文件都可以以 dat 结尾
Private Sub Command1_Click()
Open App.Path & "\text.dat" For Output As #1
Print #1, Text1.Text
Close
End Sub
Private Sub Form_Load()
If Dir(App.Path & "\text.dat") <> "" Then
Open App.Path & "\text.dat" For Input As #1
Text1.Text = StrConv(InputB(LOF(1), 1), vbUnicode)
Close
End If
End Sub
Private Sub Command1_Click()
Open App.Path & "\text.dat" For Output As #1
Print #1, Text1.Text
Close
End Sub
Private Sub Form_Load()
If Dir(App.Path & "\text.dat") <> "" Then
Open App.Path & "\text.dat" For Input As #1
Text1.Text = StrConv(InputB(LOF(1), 1), vbUnicode)
Close
End If
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
dat 文件并不是专门的文件格式,任意文件都可以以 dat 结尾
Private Sub Command1_Click()
Open App.Path & "\text.dat" For Output As #1
Print #1, Text1.Text
Close
End Sub
Private Sub Form_Load()
If Dir(App.Path & "\text.dat") <> "" Then
Open App.Path & "\text.dat" For Input As #1
Text1.Text = StrConv(InputB(LOF(1), 1), vbUnicode)
Close
End If
End Sub
Private Sub Command1_Click()
Open App.Path & "\text.dat" For Output As #1
Print #1, Text1.Text
Close
End Sub
Private Sub Form_Load()
If Dir(App.Path & "\text.dat") <> "" Then
Open App.Path & "\text.dat" For Input As #1
Text1.Text = StrConv(InputB(LOF(1), 1), vbUnicode)
Close
End If
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
用文件写就可以了.
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("c:\testfile.dat", True)
a.WriteLine("This is a test.")
a.Close.dat
没有确定的含义, 什么数据结构都可以.
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("c:\testfile.dat", True)
a.WriteLine("This is a test.")
a.Close.dat
没有确定的含义, 什么数据结构都可以.
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你可以把代码放在文本里面啊
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询