为编程爱好者分享易语言教程源码的资源网
好用的代理IP,游戏必备 ____广告位招租____ 服务器99/年 ____广告位招租____ ____广告位招租____ 挂机,建站服务器
好用的代理IP,游戏必备 ____广告位招租____ 服务器低至38/年 ____广告位招租____ ____广告位招租____ 挂机,建站服务器

网站首页 > 易语言相关 > 易语言例程 正文

列表框上下移动易语言源码

三叶资源网 2019-05-18 09:12:19 易语言例程 1522 ℃ 0 评论

列表框上下移动易语言源码

@热水哥

.版本 2

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

列表框1.现行选中项 = 0

.子程序 _按钮2_被单击
.局部变量 a, 文本型

.如果真 (列表框1.现行选中项 ≠ 列表框1.取项目数 () - 1)
    a = 列表框1.取项目文本 (列表框1.现行选中项 + 1)
    列表框1.置项目文本 (列表框1.现行选中项 + 1, 列表框1.取项目文本 (列表框1.现行选中项))
    列表框1.置项目文本 (列表框1.现行选中项, a)
    列表框1.现行选中项 = 列表框1.现行选中项 + 1
.如果真结束


.子程序 _按钮1_被单击
.局部变量 a, 文本型

.如果真 (列表框1.现行选中项 ≠ 0)
    a = 列表框1.取项目文本 (列表框1.现行选中项 - 1)
    列表框1.置项目文本 (列表框1.现行选中项 - 1, 列表框1.取项目文本 (列表框1.现行选中项))
    列表框1.置项目文本 (列表框1.现行选中项, a)
    列表框1.现行选中项 = 列表框1.现行选中项 - 1
文件下载

来源:三叶资源网,欢迎分享,公众号:iisanye,(三叶资源网⑤群:21414575

本文暂时没有评论,来添加一个吧(●'◡'●)

欢迎 发表评论:

百度站内搜索
关注微信公众号
三叶资源网⑤群:三叶资源网⑤群

网站分类
随机tag
RapidJSON整人小工具账号管理系统会员签到163邮箱登陆巨人拉车unicode字符DirectX例程商品条形码群号转链接社会网络酷Q Air监听wifi信号强度工厂模式窗口子类化彩虹秒赞网房天下post注册百度贴吧签到url编解码多功能管理器
最新评论