大家看看我的软件为什么不能保留信息

帝释天2017

我的软件创建了字段信息这个数据库，在软件添加了信息之后，我重新打开软件，软件的超级列表框的内容居然么有保留上次添加的信息，有点郁闷，大家看看我的代码吧！
1.rar (2.34 KB, 下载次数: 28)

2012-2-16 22:27 上传

点击文件名下载附件

29499531

1. .版本 2
   
2. .支持库 iext
   
3. 
   
4. .子程序 __启动窗口_创建完毕
   
5. .局部变量 行, 整数型
   
6. 
   
7. .如果真 (文件是否存在 (取运行目录 () ＋ “\txl.edb”) ＝ 假)
   
8.     字段信息 [1].名称 ＝ “姓名”
   
9.     字段信息 [1].类型 ＝ #文本型
   
10.     字段信息 [1].最大文本长度 ＝ 20
    
11. 
    
12.     字段信息 [2].名称 ＝ “QQ号码”
    
13.     字段信息 [2].类型 ＝ #文本型
    
14.     字段信息 [2].最大文本长度 ＝ 20
    
15. 
    
16.     字段信息 [3].名称 ＝ “已介绍代理”
    
17.     字段信息 [3].类型 ＝ #文本型
    
18.     字段信息 [3].最大文本长度 ＝ 20
    
19. 
    
20.     字段信息 [4].名称 ＝ “获利”
    
21.     字段信息 [4].类型 ＝ #文本型
    
22.     字段信息 [4].最大文本长度 ＝ 20
    
23. 
    
24.     创建 (取运行目录 () ＋ “\txl.edb”, 字段信息)
    
25. 
    
26. .如果真结束
    
27. 
    
28. .如果真 (打开 (取运行目录 () ＋ “\txl.edb”, “通讯录”, , , , , ) ＝ 假)
    
29.     信息框 (“打开用户库失败！”, 0, )
    
30.     返回 ()
    
31. .如果真结束
    
32. 
    
33. .判断循环首 (取反 (尾记录后 ()))
    
34.     行 ＝ 超级列表框1.插入表项 (, , , , , )
    
35.     超级列表框1.置标题 (行, 0, 读 (“姓名”))
    
36.     超级列表框1.置标题 (行, 1, 读 (“QQ号码”))
    
37.     超级列表框1.置标题 (行, 2, 读 (“已介绍代理”))
    
38.     超级列表框1.置标题 (行, 3, 读 (“获利”))
    
39.     跳过 ()
    
40. .判断循环尾 ()
    

复制代码

将楼主的启动事件修改为以上内容，加入了读取数据并列出

缘诚

你没在 __启动窗口_创建完毕 没有枚举出数据库中的信息

帝释天2017

怎么枚举啊。不懂

大家好呵呵

我 说能  你信吗？   反正 我信了