怎样保存VB的combobox的list值？
form1 中，我在Text1里输入1111111111
Dim str1 As String
Private Sub Command1_Click()
str1 = Me.Text1.Text
Combo1.AddItem str1
End Sub
点Command1，就写到Combo1的 下拉菜单里去了。
但退出form1后，再load form1, 下拉菜单里没有了1111111111。
请问怎样保存list值
加个 public collection 在 bas 里，记录 所有的 combo1的，
load form1 时，重新加。
你可以用數據表來存儲List值，當Load時，從數據表加載List內容。
你必須在窗體關閉時，把Combo的List項存儲下來，你可以存儲到數據表，也可以存放到文件中，然後在窗體加載時，再從存儲的地方加載這些List項。
Dim str1 As String
Private Sub Command1_Click()
str1 = Me.Text1.Text
Combo1.AddItem str1
'D在这里再增加代码保存str1至文件中,下次加载窗体时,再从文件中读出值增加到combo1中
End Sub
写到数据库里，每次从数据库里读
Dim cn As New ADODB.Connection
Dim rst As New ADODB.Recordset
Dim SqlStr As String
cn.CursorLocation = adUseClient
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb;Mode=ReadWrite;Persist Security Info=False;Jet OLEDB:Database
相关问答：
一个查询某信息的ASP网页，提交采用的是post方法，查找结果的网页必须右键点击“查看源文件”才能看到真正查询结果网页的源代码，用浏览器菜单看到的是查询前的源代码
用VB有什么办法可以获取到这个查询后的源代� ......
大家好，问个vb打印问题
printer.print "dsff"
.....
....
Printer.EndDoc
打印成功后我将执行
sqlstr = "update vc_yh set pr=' 已打印 ', ......
Private Sub cmdModify_Click()
Dim iRet As Integer
If dltUser.Text = "" Then
MsgBox "请选择要修改的用户！", vbOKOnly ......
Private Sub Command1_Click()
Dim m As Integer '接受文本框一的数值
Dim n As Integer '接受文本框二的数值
Dim k As Integ ......
一个程序，两个窗口，一个用来更改access表数据（Form1）,另一个窗口有个combo1用来显示数据(Form2)。form2有一个按钮(command1)用来打开form1。现在我先打开form2，combo1读取出数据，点击command1打开form1,更改数 ......
