combobox控件如何在运行时添加选项?

Question

也就是用户要追加选项用户

Answer 1

在command1中或者form_load()中写:dim i as integet
for i=0 to 10
    combo1.additem "2009_" & i
next

Answer 2

所需控件 Text1，Combo1，Command1直接把下面代码复制过去
Option Explicit
  Private Const TPath       As String = "C:\Program Files\Save.ini"  '"\Save.ini"  Private Sub Command1_Click()
          Combo1.AddItem Text1.Text
          SaveToFile TPath
  End Sub
    
  Private Sub Form_Load()
          On Error Resume Next
          ReadFromFile TPath
          Command1.Enabled = False
  End Sub
    
  Sub ReadFromFile(ByVal strPath As String)
          Dim strTemp     As String
          Open strPath For Input As #1
          Do While Not EOF(1)
                  Line Input #1, strTemp
                  Combo1.AddItem strTemp
          Loop
          Close #1
  End Sub
    
  Sub SaveToFile(ByVal strPath As String)
          Dim i     As Integer
          Open strPath For Output As #1
                  For i = 0 To Combo1.ListCount - 1
                          Print #1, Combo1.List(i)
                  Next
          Close #1
End Sub

Answer 3

要追加选项写在Text1，然后点击Command1即可

Answer 4

Combo1.Additem "新增项"

Answer 5

Remove 删除一项，Clear 全部删除

Answer 6

删除能具体点吗?如果我的保存还要带数据怎么搞呢?
比如:
选aaa   得1234
选bbb   得135
选ccc   得454

Answer 7

楼主需要好好补课啦，所问都是VB基础知识，建议买本《Visual Basic 控件高手》（北京希望电子出版社出版）看看。

Answer 8

不就判断语句吗？If Else或Select都可以

Answer 9

本软件公司急招VB开发人员，条件如下，待遇从优，工作地点：深圳市科技园。有意者请与我（开发部主管）联系：0755-260375756
1、年龄：25-35岁；
2、学历及专业：必须为正规全国统招全日制本科以上学历，计算机或相关专业，两年以上软件开发工作经验；
3、熟练使用VB开发语言，并能够熟练使用这种语言进行GUI/WinForm界面功能的开发；
4、精通SQL Server、ORACLE数据库应用程序的开发；精通数据库存储过程的开发；对数据库应用性能优化有丰富经验；
5、熟悉面向对象的分析设计技术和工具，包括UML建模、Rose应用；
6、了解CMMI软件过程方法。
7、有积极的工作态度，勤奋踏实，沟通和学习能力较好，能积极面对工作压力，善于和各种背景的人合作；
8、有企业管理软件开发经验者优先，有行业背景（如：制造业、财政、房地产等，）或业务知识（如：财务、HR、供应链等）尤佳。