Question

vb中怎么保存文本框中的内容

就是单击一个按钮保存，关闭程序后再打开是修改后的内容，我以后要生成.exe文件，放别的电脑上也要能用，做毕业设计呢，急急急！要详细
补充一点，不涉及数据库

Answer 1

Private Sub Command1_Click()
Open "d:\fafa.dat" For Output As #1 '写入
Print #1, Text1
Close #1
End Sub

Private Sub Form_Load()
Command1.Caption = "保存"
If Dir("d:\fafa.dat") <> "" Then '读取
Open "d:fafa.dat" For Input As #1

Do Until EOF(1)
Line Input #1, fafa
Text1 = Text1 & fafa & vbCrLf
Loop
Close #1
End If
End Sub
‘哪里都有可以用，只要电脑上有D区

Answer 2

可以把你想存的东西放进注册表或者文件中，运行后再读取就可以了

给你一个例子参考吧，

: 我的程式中有一个设定画面,
: 其中有了slider及textbox让使用者调整叁数
: 如果希望调整完的结果,可以存起来,
: 不会每次重run就回到原始值,
: 该怎麽作?
: 是不是用property?
: --------------------------------

我想没有property可以这样做，不过您可以使用
SaveSetting, GetSetting DeleteSetting的方式来做

说穿了，也不过是将您执行的结果放到registry中，下次
执行时，再将之读出来而这些设定是放在:
HKEY_CURRENT_USER Software/VB and VBA Program Settings
但这Registry的运作只限於此，不能读写其他地方的值。

'以下程式存text1的资料，下回执行时会再从Registry中读回来
Private Sub Command1_Click()
' 移除所有的设定。
DeleteSetting "MyApp"
End Sub

Private Sub Command2_Click()
'存设定
SaveSetting "MyApp", "Text1", "value", Text1.Text
End Sub

Private Sub Form_Load()
Dim str5 As String
str5 = GetSetting(appname:="MyApp", section:="Text1", _
Key:="Value", Default:="25")
Text1.Text = str5
End Sub

Answer 3

不能写入一个ini文件或者txt文件保存设置么？
不涉及到数据库。
需要的话给你个小例子看。

Answer 4

可以用richtextbox控件，这个文本控件有载入和保存文档的函数，richtextbox1.loadfile,richtextbox1.savefile,
你可以到网上搜一下具体的用法