.版本 2
.局部变量 a, 文本型, , "10"
.局部变量 b, 整数型
.局部变量 文本, 文本型
文本 = “1”
.计次循环首 (取数组成员数 (a), b)
.如果真 (a [b] = 文本)
跳出循环 ()
.如果真结束
.计次循环尾 ()
.如果 (b > 取数组成员数 (a))
信息框 (“数组a中没有该文本!”, 0, )
.否则
信息框 (“数组a中有这个文本!”, 0, )
.如果结束
.版本 2
.局部变量 计次, 整数型
.计次循环首 (取数组成员数 (变量), 计次)
.如果真 (变量 [计次] = 编辑框1.内容)
信息框 (“是第” + 到文本 (计次) + “个变量!”, 0, )
跳出循环 ()
.如果真结束
.计次循环尾 ()