随机数和除去随机数~~~help~!!

cchao2627

功能 逻辑型 xxxx()
整型 A,B,C,D,E,X,Y
A=8
B=7
C=6
D=5
E=4
X=转换.字符型转整型(编辑框.获得文本("编辑框0")  ,0)
循环(真)
Y=辅助.随机数(A,E)
如果(Y!=X)
辅助.消息框(转换.整型转字符型(Y))
跳出
如果结束
循环结束
返回 真
功能结束


第一步 A~I 中的随便一个不等于X的执行 功能1【辅助.消息框(转换.整型转字符型(Y))】
第二步 是想除去等于Y的 A~I   执行  功能2.【......】

现在卡在第二步。。应该怎么写？？求帮忙~！:yun

cchao2627

功能 逻辑型 xxxx()
整型 A,B,C,D,E,X,Y
A=8
B=7
C=6
D=5
E=4
X=转换.字符型转整型(编辑框.获得文本("编辑框0")  ,0)
循环(真)
Y=辅助.随机数(A,E)
如果(Y!=X)
辅助.消息框(转换.整型转字符型(Y))
跳出
如果结束
循环结束
如果(Y==B)
    辅助.消息框(转换.整型转字符型(A))
    辅助.消息框(转换.整型转字符型(C))
    辅助.消息框(转换.整型转字符型(D))
    辅助.消息框(转换.整型转字符型(E))
如果结束
如果(Y==C)
    辅助.消息框(转换.整型转字符型(A))
    辅助.消息框(转换.整型转字符型(B))
    辅助.消息框(转换.整型转字符型(D))
    辅助.消息框(转换.整型转字符型(E))
如果结束
如果(Y==D)
    辅助.消息框(转换.整型转字符型(A))
    辅助.消息框(转换.整型转字符型(B))
    辅助.消息框(转换.整型转字符型(C))
    辅助.消息框(转换.整型转字符型(E))
如果结束
如果(Y==E)
    辅助.消息框(转换.整型转字符型(A))
    辅助.消息框(转换.整型转字符型(B))
    辅助.消息框(转换.整型转字符型(C))
    辅助.消息框(转换.整型转字符型(D))
如果结束
返回 真
功能结束


上面是我刚写出来的。大家帮忙看下，有没有更简便的写法？？:?

cchao2627

求简单写法~~~

cchao2627

都每人捏？？

冷月无痕

第二步下面是我的思路

字符型 R=转换.整型转字符型(A)+转换.整型转字符型(B)+转换.整型转字符型(C)+转换.整型转字符型(D)+转换.整型转字符型(E)
辅助.消息框(字符串.修剪(R,转换.整型转字符型(Y)))

思路是把数值转成字符型并拼接成为一个字符串,然后用字符串.修剪命令把Y数值转成的字符修剪掉,得到的就是除去Y以后的数值字符型
你可以在需要的情况下再分割转换成整型

不知道能不能满足你的需要