易语言取文本指定内容

如图,把编辑框中的数变为

求源码!编辑框中小数点(后面的)后可能有4位小数,也可能为3位!谢谢

.版本 2

.子程序 _按钮1_被单击
.局部变量 临时数组, 文本型, , "3"

临时数组 = 分割文本 (编辑框1.内容, “.”, )
编辑框1.内容 = 临时数组 [1] + “.” + 临时数组 [3]

临时数组 = 分割文本 (编辑框2.内容, “.”, )
编辑框2.内容 = 临时数组 [1] + “.” + 临时数组 [3]

临时数组 = 分割文本 (编辑框3.内容, “.”, )
编辑框3.内容 = 临时数组 [1] + “.” + 临时数组 [3]

这个也能实现你的要求,嗯,望采纳

追问

它提示“数组成员引用下标超出定义范围”

追答.版本 2

.子程序 _按钮1_被单击
.局部变量 临时数组, 文本型, , "0"

临时数组 = 分割文本 (编辑框1.内容, “.”, )
.如果真 (取数组成员数 (临时数组) > 1)
    编辑框1.内容 = 临时数组 [1] + “.” + 临时数组 [取数组成员数 (临时数组)]
.如果真结束

临时数组 = 分割文本 (编辑框2.内容, “.”, )
.如果真 (取数组成员数 (临时数组) > 1)
    编辑框2.内容 = 临时数组 [1] + “.” + 临时数组 [取数组成员数 (临时数组)]
.如果真结束

临时数组 = 分割文本 (编辑框3.内容, “.”, )
.如果真 (取数组成员数 (临时数组) > 1)
    编辑框3.内容 = 临时数组 [1] + “.” + 临时数组 [取数组成员数 (临时数组)]

你的要求有的时候不只是两个小数点对吧,我搞一个更好的,好了,这个应该无论你输了几个框,框里面内容对不对都行了吧,试试?

追问

可以了!但我忘了,还有一种情况

变成

这种没有小数点的呢!

谢谢

追答

这种情况?不好意思实在没看出来有什么用,但是你可以用
编辑框1.内容 = 取文本右边 (编辑框1.内容, 取文本长度 (编辑框1.内容) - 4)
实现它,详细的就自己摸索吧?

温馨提示:答案为网友推荐,仅供参考
第1个回答  2013-07-09

.版本 2

.子程序 _按钮1_被单击
.局部变量 前面的文本, 文本型
.局部变量 后面的文本, 文本型


前面的文本 = 取文本左边 (编辑框1.内容, 寻找文本 (编辑框1.内容, “.”, , 真) - 1)

后面的文本 = 取文本右边 (编辑框1.内容, 取文本长度 (编辑框1.内容) - 倒找文本 (编辑框1.内容, “.”, , 真))

编辑框2.内容 = 前面的文本 + “.” + 后面的文本

追问

谢谢你的回答!