用VB编写的程序怎样能像大游戏一样有存储进度功能啊？

加入什么语言？在哪里加入？谢谢啦！
越详细越好，最好有实例！谢谢谢谢！

我的游戏代码中的一段给你截出来 ，自己研究一下吧。
which第几个存档
put储存变量的语句
'保存
Sub SaveGame(Which As Integer)
Open AppPath & "save\save" & Which & ".sav" For Binary Access Write Lock Write As #1
Put #1, 1, SMapInt
Put #1, , THour
Put #1, , TMin
Put #1, , TSec
Put #1, , Oldx
Put #1, , Oldy
Put #1, , CenterintX
Put #1, , CenterintY
Put #1, , Npcc1
Close #1
End Sub
'读取
Sub LoadGame(Which As Integer)
Dim i%
Dim Npcc1() As Npcc

Open AppPath & "save\save" & Which & ".sav" For Binary Access Read Lock Write As #1
Get #1, 1, SMapInt
Get #1, , THour
Get #1, , TMin
Get #1, , TSec
Get #1, , Oldx
Get #1, , Oldy
Get #1, , CenterintX
Get #1, , CenterintY
ReDim Npcc1(SMapInt.IntNpc)
Get #1, , Npcc1
Close #1

End Sub

可以保存为一个文件 例如 ini文件。 做游戏最好采用数据库储存。 保存场景信息角色信息等。 启动程序的时候就加载这个文件。读入信息。