易语言 如何用选择框改变编辑框内容,
例如:编辑框1里有"A,B,C,D,E"5个字母,对应有"1,2,3,4,5"五个选择框,如何勾选选择框1时编辑框里自动删除"A,"勾2时删除"B,",取消勾选时自动在原...
例如:编辑框1里有"A,B,C,D,E"5个字母,对应有"1,2,3,4,5"五个选择框,如何勾选选择框1时编辑框里自动删除"A,"勾2时删除"B,",取消勾选时自动在原位置加入原来的内容.
展开
1个回答
展开全部
.版本 2
.程序集 窗口程序集1
.程序集变量 ABCDE, 文本型, , "5"
.子程序 _选择框_1_被单击
.局部变量 文本, 文本型
.局部变量 计次, 整数型
.判断开始 (选择框_1.选中 = 假)
ABCDE [1] = “A”
.默认
ABCDE [1] = “”
.判断结束
.计次循环首 (5, 计次)
文本 = 文本 + ABCDE [计次]
.计次循环尾 ()
编辑框1.内容 = 文本
.子程序 _选择框_2_被单击
.局部变量 文本, 文本型
.局部变量 计次, 整数型
.判断开始 (选择框_2.选中 = 假)
ABCDE [2] = “B”
.默认
ABCDE [2] = “”
.判断结束
.计次循环首 (5, 计次)
文本 = 文本 + ABCDE [计次]
.计次循环尾 ()
编辑框1.内容 = 文本
.子程序 _选择框_3_被单击
.局部变量 文本, 文本型
.局部变量 计次, 整数型
.判断开始 (选择框_3.选中 = 假)
ABCDE [3] = “C”
.默认
ABCDE [3] = “”
.判断结束
.计次循环首 (5, 计次)
文本 = 文本 + ABCDE [计次]
.计次循环尾 ()
编辑框1.内容 = 文本
.子程序 _选择框_4_被单击
.局部变量 文本, 文本型
.局部变量 计次, 整数型
.判断开始 (选择框_4.选中 = 假)
ABCDE [4] = “D”
.默认
ABCDE [4] = “”
.判断结束
.计次循环首 (5, 计次)
文本 = 文本 + ABCDE [计次]
.计次循环尾 ()
编辑框1.内容 = 文本
.子程序 _选择框_5_被单击
.局部变量 文本, 文本型
.局部变量 计次, 整数型
.判断开始 (选择框_5.选中 = 假)
ABCDE [5] = “E”
.默认
ABCDE [5] = “”
.判断结束
.计次循环首 (5, 计次)
文本 = 文本 + ABCDE [计次]
.计次循环尾 ()
编辑框1.内容 = 文本
随便写了下 貌似有点白痴的感觉 要源码资料里找我
.程序集 窗口程序集1
.程序集变量 ABCDE, 文本型, , "5"
.子程序 _选择框_1_被单击
.局部变量 文本, 文本型
.局部变量 计次, 整数型
.判断开始 (选择框_1.选中 = 假)
ABCDE [1] = “A”
.默认
ABCDE [1] = “”
.判断结束
.计次循环首 (5, 计次)
文本 = 文本 + ABCDE [计次]
.计次循环尾 ()
编辑框1.内容 = 文本
.子程序 _选择框_2_被单击
.局部变量 文本, 文本型
.局部变量 计次, 整数型
.判断开始 (选择框_2.选中 = 假)
ABCDE [2] = “B”
.默认
ABCDE [2] = “”
.判断结束
.计次循环首 (5, 计次)
文本 = 文本 + ABCDE [计次]
.计次循环尾 ()
编辑框1.内容 = 文本
.子程序 _选择框_3_被单击
.局部变量 文本, 文本型
.局部变量 计次, 整数型
.判断开始 (选择框_3.选中 = 假)
ABCDE [3] = “C”
.默认
ABCDE [3] = “”
.判断结束
.计次循环首 (5, 计次)
文本 = 文本 + ABCDE [计次]
.计次循环尾 ()
编辑框1.内容 = 文本
.子程序 _选择框_4_被单击
.局部变量 文本, 文本型
.局部变量 计次, 整数型
.判断开始 (选择框_4.选中 = 假)
ABCDE [4] = “D”
.默认
ABCDE [4] = “”
.判断结束
.计次循环首 (5, 计次)
文本 = 文本 + ABCDE [计次]
.计次循环尾 ()
编辑框1.内容 = 文本
.子程序 _选择框_5_被单击
.局部变量 文本, 文本型
.局部变量 计次, 整数型
.判断开始 (选择框_5.选中 = 假)
ABCDE [5] = “E”
.默认
ABCDE [5] = “”
.判断结束
.计次循环首 (5, 计次)
文本 = 文本 + ABCDE [计次]
.计次循环尾 ()
编辑框1.内容 = 文本
随便写了下 貌似有点白痴的感觉 要源码资料里找我
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询