易语言在编辑框1输入指定数字 然后在编辑框2出现另外的指定数字
比如:如果编辑框1中输入数字0单击按钮之后在编辑框2中就出现00221155等数字在编辑框1中输入数字1单机按钮之后在编辑框2中就出现1122334455等数字在编辑框1...
比如:如果编辑框1中输入数字0 单击按钮之后 在编辑框2中就出现00 22 11 55等数字 在编辑框1中输入数字1 单机按钮之后 在编辑框2中就出现11 22 33 44 55等数字 在编辑框1中输入数字2 单击按钮之后 编辑框2中出现88 99 77 66 等数字。
还有在编辑框1中输入5个数字 单击按钮 在编辑框2中求出 5位数中后三位数的最大值减去最小值的差
比如:在编辑框1中输入(53648) 单击按钮 在编辑框2中出现数字(4)5位数的后三为648 最大值8减去最小值4等于4 编辑框2中出现数字4
望高手指导 展开
还有在编辑框1中输入5个数字 单击按钮 在编辑框2中求出 5位数中后三位数的最大值减去最小值的差
比如:在编辑框1中输入(53648) 单击按钮 在编辑框2中出现数字(4)5位数的后三为648 最大值8减去最小值4等于4 编辑框2中出现数字4
望高手指导 展开
3个回答
展开全部
.版本 2
.子程序 _按钮1_被单击
.判断开始 (编辑框1.内容 = “0”)
编辑框2.内容 = “00 22 11 55”
.判断 (编辑框1.内容 = “1”)
编辑框2.内容 = “11 22 33 44 55”
.判断 (编辑框1.内容 = “2”)
编辑框2.内容 = “88 99 77 66 ”
.默认
.判断结束
第二个题目暂时做不出来,思考中……
.子程序 _按钮1_被单击
.判断开始 (编辑框1.内容 = “0”)
编辑框2.内容 = “00 22 11 55”
.判断 (编辑框1.内容 = “1”)
编辑框2.内容 = “11 22 33 44 55”
.判断 (编辑框1.内容 = “2”)
编辑框2.内容 = “88 99 77 66 ”
.默认
.判断结束
第二个题目暂时做不出来,思考中……
追问
希望第二个题目能想出来啊 靠你了!!!!
追答
第二题源码
布局:两个编辑框,一个按钮
.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 排序数组, 整数型, , "3"
排序数组 [1] = 到数值 (取文本右边 (编辑框1.内容, 1))
排序数组 [2] = 到数值 (取文本中间 (编辑框1.内容, 4, 1))
排序数组 [3] = 到数值 (取文本中间 (编辑框1.内容, 3, 1))
数组排序 (排序数组, 真)
.如果 (取文本长度 (编辑框1.内容) ≠ 5)
信息框 (“输入的数字不是5位数,请重新输入!”, 0, )
.否则
编辑框2.内容 = 到文本 (排序数组 [3] - 排序数组 [1])
2012-06-03
展开全部
给个邮箱 发源码给你……
追问
870298711@qq.com
谢谢了
追答
已发送,注意查收……
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
简单的判断就可以了
追问
哦哦!!!原来是我想错了!!呵呵
第二个题目可以给源码吗?
追答
用得方法有点麻烦,不过只要预先把子程序写成模块的话就很简单了!希望对你有用!
.版本 2
.支持库 RegEx
.子程序 _按钮1_被单击
.局部变量 数值, 整数型, , "0"
正则 (数值)
数组_数值排序 (数值)
编辑框2.内容 = 到文本 (数值 [取数组成员数 (数值)] - 数值 [1])
.子程序 正则
.参数 搜索, 整数型, 数组
.局部变量 正则表达式, 正则表达式
.局部变量 搜索内容, 搜索结果, , "0"
.局部变量 n1, 整数型
.局部变量 数值, 整数型, , "0"
.局部变量 内容, 文本型
正则表达式.创建 (“(\d)”, )
内容 = 取文本右边 (编辑框1.内容, 3)
搜索内容 = 正则表达式.搜索全部 (内容)
.计次循环首 (取数组成员数 (搜索内容), n1)
加入成员 (数值, 到数值 (搜索内容 [n1].取子匹配文本 (内容, 1, )))
.计次循环尾 ()
搜索 = 数值
.子程序 数组_数值排序
.参数 数组, 整数型, 数组
.局部变量 n1, 整数型
.局部变量 n2, 整数型
.局部变量 数量, 整数型
.局部变量 数, 整数型
数量 = 取数组成员数 (数组)
.计次循环首 (数量, n1)
.计次循环首 (数量 - n1, n2)
.判断开始 (数组 [n1] > 数组 [n1 + n2])
数 = 数组 [n1]
数组 [n1] = 数组 [n1 + n2]
数组 [n1 + n2] = 数
.默认
.判断结束
.计次循环尾 ()
.计次循环尾 ()
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询