有问题就有答案
Q1：VB 怎么记忆COMBO的选择
将此代码添加到表单的UnLoad事件中，以记录组合选项1保存设置(程序名、项目名、键名、组合12文本)将此代码添加到窗体的加载事件中，以读取组合选项http://redoufu.com/。 Combo14Text=GetSetting(程序名、项目名、键名)，其中程序名、项目名和键名为字符串5
Q2：VB6.0 Combo1怎么记录程序上一次的记录
你在TEXT1的什么地方记录的数据？如果一个字段，Old_Record，被添加到数据库中，修改后的是New_Record，这样所有的数据都可以取出来，那么原来的显示在COMBO1中，新的显示在Text1中6如果是用TXT记录，用特殊符号分开New_Record|Old_Record，取出时拆分7
Q3：vb控件combo1使用方法
一：新建一个模块，保存以下代码8注意修改数据库路径/名/密码/Public Conn As New ADODB .公共连接作为新的ADODB .记录集公共Sql As StringPublic用户名As StringPublic用户限制As Integer "===================================="连接数据库==================公共函数数据库_链接()出错继续下一个Dim CnStr作为字符串暗淡的DBPath作为字符串，DBName作为字符串调暗数据库用户作为字符串，DBPsw作为字符串数据库路径=应用程序.路径"\"数据库地址"数据库名=数据库名"数据库文件名" DBPsw=DATABASE_PASSWORD "数据库密码CnStr="PROVIDER=Microsoft .喷气机9OLEDB.4.0数据源=" DBPath DBNamejet oledb :数据库密码=" DBPsw Conn . CursorLocation=adUseClient "必须设置客户端游标方式康恩10打开CnStrEnd函数"==========================="断开数据库====================公共函数数据库_关闭()出错时继续下一个Rs .关闭集合Rs=无连接11关闭集合连接=无结束功能二：窗体代码12私有子窗体_load()db_linksql="select *保存项目名称的那个表名set rs=conn.execute(sql)do，直到rs.eofcombo1.additem rs("项目名称所在列名)rs.movenextdb_closeend sub以上是添加到组合一的代码.后面你说的什么保存到用户信息表中什么的看不明白.需要帮忙的话给我发email:fender_x@163.com
Q4：VB6中如何给combo设置一个默认项？
可用AddItem 方法给Combo1中增加元素，之后放入初始值，然后设置Text属性，设置Style 属性为2，可仅允许从下拉式列表中选择13AddItem 方法，用于将项目添加到 ListBox 或 ComboBox 控件，或者将行添加到 MS Flex Grid 控件14Style 属性，返回或设置一个值，该值用来指示控件的显示类型和行为15Private Sub Form_Load() Combo1.AddItem "test" Combo1.Text = Combo1.List(0)End Sub 运行效果：
Q5：vb6中的combo控件怎么设置默认值？
实现思路：在Combo1中添加元素，然后放初始值，再设置text属性16参考代码如下：private subform _ load()combo 1 . additem " test " combo 1 . text=combo 1 . list(0)end sub17
Q6：vb中combo的详细用法
1、定义控件对应变量假定已经创建了一个Dialog，并且从控件工具箱将 Combo Box 控件拖放到上面18打开 Class Wizard，添加控件对应变量，如：CComboBoxm_cbExamble;在后面的代码中会不断使用这个变量192、在ComboBox控件属性的Data标签里面添加，一行表示ComboBox下拉列表中的一行20换行用ctrl+回车213、在程序初始化时动态添加如： //控件内容初始化CString strTemp;((CComboBox*)GetDlgItem(IDC_COMBO_CF))->ResetContent();//消除现有所有内容for(int i=1;iAddString(strTemp);}4、下拉的时候添加如： CString strTemp;intiCount=((CComboBox*)GetDlgItem(IDC_COMBO_CF))->GetCount();//取得目前已经有的行数if(iCountResetContent(); for(inti=1;iAddString(strTemp); }}5、取得Combo Box框内容取当前内容((CComboBox*)GetDlgItem(IDC_COMBO_CF))->GetWindowText(strTemp);取其他行内容((CComboBox*)GetDlgItem(IDC_COMBO_CF))->GetLBText(n,strTemp);