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

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

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

三叶资源网 2019-05-18 09:12:19 易语言例程 1526 ℃ 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
文件搜索QQ空间文件分割器宫格数学题胡来网post注册bitmap文本处理贪吃蛇游戏枚举IE插件keep微信群发超文本浏览框支持库json是用来干嘛的Bass音频库云的多文档窗口界面支持库UDP源码微博降权自动售卡服务器组件Hook信息框
最新评论