易语言如何判断某个文本型数据在不在数组中。如果在就弹出错误提示。不在就添加进那个文本。
谢谢1L。我再等1天。如果没有更高效率的回答我就采纳你了。
用计次循环命令用文本与数组每个成员进行比较,并在循环之前加一个逻辑型变量,在比较过程中增加一个判断,如果比较结果为真则弹出错误提示,赋值给逻辑变量=真,比较结果为假则赋值给逻辑变量=假,在循环尾判断该逻辑变量,如果逻辑变量=假则将文本加入数组。
.版本 2
.子程序 _按钮1_被单击
.局部变量 欲比较文本, 文本型
.局部变量 数组, 文本型, , "0"
.局部变量 n, 整数型
.局部变量 逻辑变量, 逻辑型
.计次循环首 (取数组成员数 (数组), n)
.如果 (欲比较文本 = 数组 [n])
信息框 (“错误提示”, 0, )
逻辑变量 = 真
.否则
逻辑变量 = 假
.如果结束
.计次循环尾 ()
.如果真 (逻辑变量 = 假)
加入成员 (数组, 欲比较文本)追问
.版本 2
.子程序 _按钮1_被单击
.局部变量 欲比较文本, 文本型
.局部变量 数组, 文本型, , "0"
.局部变量 n, 整数型
.局部变量 逻辑变量, 逻辑型
.计次循环首 (取数组成员数 (数组), n)
.如果 (欲比较文本 = 数组 [n])
信息框 (“错误提示”, 0, )
逻辑变量 = 真
.否则
逻辑变量 = 假
.如果结束
.计次循环尾 ()
.如果真 (逻辑变量 = 假)
加入成员 (数组, 欲比较文本)追问
那如果我是要对比两个数组呢?怎么改。
能教我么。谢谢。
温馨提示:答案为网友推荐,仅供参考
第1个回答 2011-03-11
楼上的那段代码有点问题,要在“逻辑变量=真”后面加上跳出循环。
第2个回答 2011-03-11
.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 文本数组1, 文本型, , "0"
.局部变量 n, 整数型
.局部变量 我要找的, 文本型
文本数组1 = 分割文本 (编辑框1.内容, #换行符, )
.计次循环首 (取数组成员数 (文本数组1), n)
我要找的 = 文本数组1 [n]
.计次循环尾 ()
.判断开始 (编辑框_你需要判断的文本.内容 ≠ 我要找的)
编辑框1.加入文本 (#换行符 + 编辑框_你需要判断的文本.内容)
信息框 (“你要的效果”, 0, )
.默认
.判断结束追问
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 文本数组1, 文本型, , "0"
.局部变量 n, 整数型
.局部变量 我要找的, 文本型
文本数组1 = 分割文本 (编辑框1.内容, #换行符, )
.计次循环首 (取数组成员数 (文本数组1), n)
我要找的 = 文本数组1 [n]
.计次循环尾 ()
.判断开始 (编辑框_你需要判断的文本.内容 ≠ 我要找的)
编辑框1.加入文本 (#换行符 + 编辑框_你需要判断的文本.内容)
信息框 (“你要的效果”, 0, )
.默认
.判断结束追问
感觉怪怪的。也许你没理解我的意思吧
我的意思是。a={1, 2, 3, 4} b=x
当b属于a时。提示"错误"
当b不属于a时。加入成员(a, b)
第3个回答 2011-03-11
就是1楼这样判断!