.子程序 _按钮1_被单击
.局部变量 n, 整数型
.局部变量 n1, 整数型
内容 = 分割文本 (编辑框1.内容, #换行符, )
.计次循环首 (取数组成员数 (内容), n)
.计次循环首 (组合框1.取项目数 (), n1)
.如果真 (内容 [n] = 组合框1.取项目文本 (n1 - 1))
跳出循环 ()
.如果真结束
.计次循环尾 ()
.如果真 (n1 > 组合框1.取项目数 ())
组合框1.加入项目 (内容 [n], )
.如果真结束
.计次循环尾 ()
.版本2
.局部变量
文本s,
文本型,
,
"0"
.局部变量
文本,
文本型
.局部变量
循环变量,
整数型
文本
=
“11.12.13.14.15.6.17.18.19.20.21.22.23.24”
文本s
=
分割文本
(文本,
“.”,
)
.计次循环首
(取数组成员数
(文本s),
循环变量)
组合框1.加入项目
(文本s
[循环变量],
循环变量)
.计次循环尾
()
----------------------------------------------------------------------
用配置项[*.ini]
[sf]
广东=广州.佛山.深圳.惠州
*************************************
.版本
2
.局部变量
文本,
文本型
.局部变量
循环变量,
整数型
.局部变量
文本s,
文本型,
,
"0"
文本
=
读配置项
(取运行目录
()
+
“\你的配置项.ini”,
“sf”,
组合框1.取项目文本
(组合框1.现行选中项),
)
文本s
=
分割文本
(文本,
“.”,
)
.计次循环首
(取数组成员数
(文本s),
循环变量)
组合框1.加入项目
(文本s
[循环变量],
循环变量)
.计次循环尾
()
.版本 2.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.局部变量 文本, 文本型
.局部变量 数组, 文本型, , "0"
.局部变量 i, 整数型
文本 = “###.12332547|,3.txt,192.168.0.7”
数组 = 分割文本 (文本, “,”, )
.计次循环首 (取数组成员数 (数组), i)
列表框1.加入项目 (数组 [i], )
.计次循环尾 ()
如这样的。。组合框的跟这差不多。只是控件名改下而以
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)