gpt4 book ai didi

VB打开与保存txt文件的方法

转载 作者:qq735679552 更新时间:2022-09-29 22:32:09 31 4
gpt4 key购买 nike

CFSDN坚持开源创造价值,我们致力于搭建一个资源共享平台,让每一个IT人在这里找到属于你的精彩世界.

这篇CFSDN的博客文章VB打开与保存txt文件的方法由作者收集整理,如果你对这篇文章有兴趣,记得点赞哟.

本文实例讲述了VB打开与保存txt文件的方法。分享给大家供大家参考。具体如下:

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Private Sub cmdsave_Click()
Dim filelocation As String
' loads save as box
   commondialog1.ShowSave
   filelocation = commondialog1.FileName
' append saves over file if it assists
   Open filelocation For Append As #1
     Print #1, text1.text
   Close #1
End Sub
Private Sub cmdopen_Click()
Dim filelocation As String
' show open box
   commondialog1.ShowOpen
   filelocation = commondialog1.FileName
' input files into text1.text 
   Open filelocation For Input As #1
Do Until EOF(1)
     Input #1, Data
     text1.text = text1.text + Data + vbNewLine
   EOF (1)
   Loop
   Close #1
End Sub

希望本文所述对大家的VB程序设计有所帮助.

最后此篇关于VB打开与保存txt文件的方法的文章就讲到这里了,如果你想了解更多关于VB打开与保存txt文件的方法的内容请搜索CFSDN的文章或继续浏览相关文章,希望大家以后支持我的博客! 。

31 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com