易语言 超级列表框 检查框 点击按钮选中某个检查框
展开全部
.版本 2
.支持库 iext
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
超级列表框1.是否有检查框 = 真
.子程序 _按钮1_被单击, , , 选中
.局部变量 n, 整数型
.计次循环首 (超级列表框1.取表项数 (), n)
超级列表框1.置状态图片 (n - 1, 1)
.计次循环尾 ()
.子程序 _按钮2_被单击, , , 取消选中
.局部变量 n, 整数型
.计次循环首 (超级列表框1.取表项数 (), n)
超级列表框1.置状态图片 (n - 1, 0)
.计次循环尾 ()
.子程序 _按钮3_被单击, , , 检查
.局部变量 n, 整数型
.局部变量 文本, 文本型
.计次循环首 (超级列表框1.取表项数 (), n)
.如果真 (超级列表框1.取当前状态图片 (n - 1) = 1)
文本 = 文本 + 到文本 (n - 1) + “,”
.如果真结束
.计次循环尾 ()
.如果 (文本 = “”)
信息框 (“没有选中”, 0, )
.否则
信息框 (“你当前选中项有:” + 文本, 0, )
.如果结束
.支持库 iext
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
超级列表框1.是否有检查框 = 真
.子程序 _按钮1_被单击, , , 选中
.局部变量 n, 整数型
.计次循环首 (超级列表框1.取表项数 (), n)
超级列表框1.置状态图片 (n - 1, 1)
.计次循环尾 ()
.子程序 _按钮2_被单击, , , 取消选中
.局部变量 n, 整数型
.计次循环首 (超级列表框1.取表项数 (), n)
超级列表框1.置状态图片 (n - 1, 0)
.计次循环尾 ()
.子程序 _按钮3_被单击, , , 检查
.局部变量 n, 整数型
.局部变量 文本, 文本型
.计次循环首 (超级列表框1.取表项数 (), n)
.如果真 (超级列表框1.取当前状态图片 (n - 1) = 1)
文本 = 文本 + 到文本 (n - 1) + “,”
.如果真结束
.计次循环尾 ()
.如果 (文本 = “”)
信息框 (“没有选中”, 0, )
.否则
信息框 (“你当前选中项有:” + 文本, 0, )
.如果结束
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询