把生成的单行卡密导入超级列表框

aifer666

随机生成了一些卡密，怎么导入第二列呢？要求第一列是序号，第二列是卡密。寻求大神帮助 1.txt (44.92 KB, 下载次数: 5)

2017-10-24 22:05 上传

点击文件名下载附件
卡密

mrzcpo

Demo.zip (1.52 KB, 下载次数: 7)

2017-10-24 22:34 上传

点击文件名下载附件

1. .版本 2
   
2. .支持库 EThread
   
3. .支持库 iext
   
4. 
   
5. .程序集 窗口程序集_启动窗口
   
6. 
   
7. .子程序 _按钮_导入卡密_被单击
   
8. 
   
9. 启动线程 (&S_导入线程, , )
   
10. 
    
11. 
    
12. .子程序 S_导入线程
    
13. .局部变量 L_文件号, 整数型
    
14. .局部变量 L_Tmp, 文本型
    
15. .局部变量 L_索引, 整数型
    
16. 
    
17. 按钮1.禁止 ＝ 真
    
18. .如果真 (通用对话框1.打开 ())
    
19.     L_文件号 ＝ 打开文件 (通用对话框1.文件名, 1, 1)
    
20.     移到文件首 (L_文件号)
    
21.     .循环判断首 ()
    
22.         .计次循环首 (10, )
    
23.             L_Tmp ＝ 读入一行 (L_文件号)
    
24.             .如果真 (L_Tmp ≠ “”)
    
25.                 跳出循环 ()
    
26.             .如果真结束
    
27. 
    
28.         .计次循环尾 ()
    
29.         .如果真 (L_Tmp ≠ “”)
    
30.             L_索引 ＝ 超级列表框1.插入表项 (, , , , , )
    
31.             超级列表框1.置标题 (L_索引, 0, 到文本 (L_索引 ＋ 1))
    
32.             超级列表框1.置标题 (L_索引, 1, L_Tmp)
    
33. 
    
34.         .如果真结束
    
35. 
    
36.     .循环判断尾 (L_Tmp ≠ “”)
    
37. .如果真结束
    
38. 按钮1.禁止 ＝ 假
    
39. 
    
40. 
    

复制代码

补充内容 (2017-10-24 22:37):
把 [S_导入线程] 里的 按钮1.禁止 ＝ 真  和  按钮1.禁止 ＝ 假 删掉

aifer666

状态那栏先不管

夜深海未眠

你里面的 卡密 都是一个挨着一个的 全部连一起了，没办法区分的

aifer666

mrzcpo 发表于 2017-10-24 22:05
补充内容 (2017-10-24 22:37):
把 [S_导入线程] 里的 按钮1.禁止 ＝ 真  和  按钮1.禁止 ＝ 假 删掉

多谢大神！完美运行了！！

mrzcpo

aifer666 发表于 2017-10-24 23:04
多谢大神！完美运行了！！

不用谢  把你剩下的12枚精币给我就行