如何把VB程序运行的结果保存到本地文本文件中？

兄弟有没有人讲详细点的，我想说下，如何把VB程序运行的结果保存到本地文本文件中？

最新回答

雨季盛开的花

2024-05-14 01:13:29

Private Sub Command1_Click() '保存结果
Open "D:\1.txt" For Append As #1
Print #1, 你的结果
Close #1
End Sub

文件路径和文件名自己设置，如没有该文件则会自己创建

追问

运行结果为“变量未命名”，不知咋回事？

浅色夏沫

2024-05-14 08:47:54

Private Sub Command1_Click() '保存结果
Open "D:\1.txt" For Append As #1
Print #1, 你的结果
Close #1
End Sub
-------------------这个是系统编码的

Const adTypeText = 2
Set DST = CreateObject("ADODB.Stream")
With DST
.Open
.Charset = 输出编码
.Type = adTypeText
End With
DST.WriteText 输出文字
DST.SaveToFile (FullName), 2
DST.Close
Set DST = Nothing
-------------------这个是系统编码的

盛夏尉蓝

2024-05-14 00:12:57

要看你保存什么样的内容了，是什么数据格式，占用多大空间

追问

保存数字，最多30M吧。

追答

那就用binaray模式打开文件，用get取出数据，put写入数据

我要回答

匿名回答

如何把VB程序运行的结果保存到本地文本文件中？

您可能感兴趣问答

Collapsible

热门标签

热点问答