易截截图软件、单文件、免安装、纯绿色、仅160KB

vb combo1

因为数据少,不想用数据库,请问能不用用combo1存储一段数据,能添加和删除,程序重启后仍然存在。比如combo1原来内容是空,添加了“1”,“2”,“3”之后,重启程序后仍然有“1”“2”“3”,删除点“1“后就剩下”2“”3“,不想要数据库操作,并且点”1“后按一个按钮可以进行1操作,请问怎么做,添加删除这些按钮尽量少如果能做到只有一个combo1加一个按钮最好,谢谢!
一定要有存储的,不用数据库,可以用文件。

用combo1存储一段数据 是不可能的,其实你在控件设计时加的数据,也是vb文件替你保存

Private Sub Form_Load()
Dim tmp As String

    If Dir(App.Path & "\myOptions.txt") > "" Then
        Open App.Path & "\myOptions.txt" For Input As #1
        Do Until EOF(1)
            Line Input #1, tmp
            Combo1.AddItem tmp
        Loop
        Close #1
    End If
End Sub

Private Sub Form_Unload()
Dim i As Integer

    Open App.Path & "\myOptions.txt" For Output As #1
    For i = 0 To Combo1.ListCount - 1
        Print #1, Combo1.List(i)
    Next i
    Close #1

End Sub



按钮都可以不要

Private Sub combo1_Click() <


相关问答:

vb.net 创建access数据表实现一数据库多个数据表?

请各位指点下:程序代码如下mingchen = "C:\文件路径\"
cat = New ADOX.Catalog
cat.Create("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & min ......

用VB编写TXT文档 - .NET技术 / VB.NET

我是VB的新成员,现在想用VB来做个TXT文档,请大家给我代码及介绍一下相应的控件!
非常感谢!!!!!!
可以用一些OFFICE控件

google上找一下吧,VB写入TXT,很多样例代码的

直接调查用就可以了

面对美女 ......

帮我改改这VB题 - VB / 基础类

帮我改改 我总觉得有问题
Type ID
  number As Single
  score As Integer
  name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
 i = 0
&nbs ......

Vb.net Access CrystalReport - .NET技术 / VB.NET

第一次接触CrystalReport
急寻找Vb.net Access 通过查询出的数据输出到CrystalReport的例子.
有的朋友麻烦发来学习.多谢!
跟你的要求差不多,参考一下:
http://topic.csdn.net/u/20090823/21/87af02d3-f4ca-480 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号