求VB程序的保存代码,以及保存文件名类型
我用的是控件command按钮制作保存要求保存的控件只有text1到text11共11个控件要求下次打开后返回最后保存前的数据...
我用的是控件command按钮制作保存要求保存的控件只有text1到text11共11个控件要求下次打开后返回最后保存前的数据
展开
3个回答
2013-07-14
展开全部
将你的textbox控件定义成数组控件,然后运行以下代码:Private Sub command1_click() '这个是保存Text1的内容到本身目录下.
Open App.Path & "\123.txt" For Append As #1
Print #1, Text1(0).Text
Print #1, Text1(1).Text
Print #1, Text1(2).Text
Close #1
End SubPrivate Sub Form_Load()
Dim i As Integer
Open App.Path & "\123.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, ss
Text1(i).Text = ss
i = i + 1
Loop
Close #1
End Sub
Open App.Path & "\123.txt" For Append As #1
Print #1, Text1(0).Text
Print #1, Text1(1).Text
Print #1, Text1(2).Text
Close #1
End SubPrivate Sub Form_Load()
Dim i As Integer
Open App.Path & "\123.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, ss
Text1(i).Text = ss
i = i + 1
Loop
Close #1
End Sub
2013-07-14
展开全部
不太明白你的意思,你要保存这个工程还是要保存控件的内容?
保存工程的话,请选择编译器左上角的文件,选择保存,选择路径,保存就可以了。如果是保存控件的内容,你应该建立相应的文件来读取写入。
保存工程的话,请选择编译器左上角的文件,选择保存,选择路径,保存就可以了。如果是保存控件的内容,你应该建立相应的文件来读取写入。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-07-14
展开全部
手机写代码实在不方便。把这些数据写入到记事本里,下次启动时再读取就可以了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询