首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

关于combo控件的有关问题

2012-02-17 
关于combo控件的问题我设计了一个界面,往text控件里输入内容,单击按钮可以将text控件里的内容添加到combo

关于combo控件的问题
我设计了一个界面,往text控件里输入内容,单击按钮可以将text控件里的内容添加到combo控件的列表中,但是每重启一次程序,combo中添加的内容全部消失,问有什么办法可以是添加的新内容再下次启动的时候依旧存在、谢谢

[解决办法]
Private Sub Text1_LostFocus()
Dim s_filename As String
s_filename = App.Path & "\写入.txt"
Open s_filename For Append As #1
Print #1, Text1.Text
Close #1
Combo1.AddItem Text1
End Sub

这段代码实现当文本框失去焦点时,将文本框内容写入下拉列表框和“写入”文本文件
在VB6验证通过

热点排行