怎样保存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
相关问答：
为什么C写的DLL文件C、PB能调用VB不能调用？
VB里为什么有的DLL直接通过引用可以使用？有的需要通过declare申明外部函数？这些DLL有什么差别？
1、为什么PB能通过DECLARE声明而VB不行？
2、如果这个dll中的 ......
C# code:
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
Private Type GUID
Data1 As Long
......
用vb的picture控件可以加载picture控件,例如
Set Picture1.Container = Picture3
这样就把Picture1加载到了Picture3上,那么怎么从Picture3卸载掉Picture1呢?
请各位朋友帮忙!谢谢!!
做了一个试验,将Pictur ......
function multi(a as integer,b as integer,optional third)
dim n as integer
n = a * b
if not ismissing (third) then
n = n * thid
end if
multi = n
end fu ......
Private Sub Command1_Click()
Dim m As Integer '接受文本框一的数值
Dim n As Integer '接受文本框二的数值
Dim k As Integ ......
