用户
 找回密码
 立即注册
搜索

[求助] vb小问题?请指教!

[复制链接]

23

主题

128

帖子

43

积分

注册会员

Rank: 2

积分
43
发表于 2007-1-9 10:28:00
vb小问题?请指教!
请教一下各位达人,怎样保存文本框里用户输入的数值?

随便举个例:
现有text1和command1两个控件,怎样能一按command1,就能保存text1里新输入的东西,即使以后启动程序,看到的text1.text也是改动后的?

在下写了两行,突然发现不会写下去了……

Private Sub Command1_Click()
Dim t001
Text1.Text = t001
t001 = Text1.Text
End Sub
使用道具 举报 回复
发表于 2007-1-9 10:44:00
写到注册表、数据库、INI文件
使用道具 举报 回复 支持 反对
发表于 2007-1-9 11:20:00
Private Sub Form_Load()
Dim ls_Content() As String
Dim a As String, b As String

Open App.Path & "\setting.ini" For Input As #1
ls_Content = Split(StrConv(InputB(LOF(1), #1), vbUnicode), vbCrLf)
Close #1
   
a = ls_Content(0)
b = ls_Content(1)
Text1.Text = a
Text2.Text = b
End Sub

在同目录下建立一个setting.ini文件,第一行写入一串字符,回车写入第2行,窗体启动则将Text1.Text内容设置为第一行的,将Text2.Text设置为第二行的, 以次类推扩展。

当然在你按下command时可以将text1.text内容写入ini,方法类似
使用道具 举报 回复 支持 反对
发表于 2007-1-9 11:34:00
写文件里~~
使用道具 举报 回复 支持 反对
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则