保存文件的步骤为:
公司主营业务:网站制作、成都做网站、移动网站开发等业务。帮助企业客户真正实现互联网宣传,提高企业的竞争能力。成都创新互联是一支青春激扬、勤奋敬业、活力青春激扬、勤奋敬业、活力澎湃、和谐高效的团队。公司秉承以“开放、自由、严谨、自律”为核心的企业文化,感谢他们对我们的高要求,感谢他们从不同领域给我们带来的挑战,让我们激情的团队有机会用头脑与智慧不断的给客户带来惊喜。成都创新互联推出义马免费做网站回馈大家。
关闭流,特别是写入流搜兄桥
关闭并保存文件
示例代码如下:
Imports System.Windows.Forms
Imports System.IO
Imports System.Text
Sub SaveFileDemo()
'打开文件。如果文件不存在则创建新的文件
Dim myFile As New IO.FileStream("d:\data.txt", _
尘带 FileMode.OpenOrCreate, _
FileAccess.Write)
'在文件末尾添加一行
Dim 世猛tw As New StreamWriter(myFile)
myFile.Seek(0, SeekOrigin.End)
tw.WriteLine("白刃格斗英雄连英模部队方队亮相阅兵")
'关闭流
tw.Close()
'关闭文件并保存文件
myFile.Close()
End Sub
在游戏退出时将得分、哗行玩家名、关数、级别这些数值保存到一个
数据文件
,下次运行念仿时再读取这些数据就可以恢复上次游戏的状态。乱高哗
这个你可以消贺用 api操作ini文件来实让宴现。ini是windows系统的配置文件。
'首先声坦桥银明这两个api
Private Declare Function GetPrivateProfileInt Lib "kernel32" Alias "GetPrivateProfileIntA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal nDefault As Long, ByVal lpFileName As String) As Long
Private Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long
VB可以用任败和何格式保存文件数据不仅仅是注册表\XML\INI
甚至于蔽埋未知的格式。我教你命令:
open "C:\setup.safe"宏枯蚂 for output as #1
print #1,"object"
close #1
其中setup.safe就是一个文件,后缀为.safe,当然可以改成.dat包括其他任何后缀.
object就是你要写入setup.safe的内容.