EDB多条件查询模块_易语言_编程开发

EDB多条件查询模块

：：2.453KB ：2021-04-28 09:02:34

.如果 (寻找文本 (查询条件 [a1], “~”, 1, 假) ≠ -1)
a ＝取文本右边 (查询条件 [a1], 取文本长度 (查询条件 [a1]) －寻找文本 (查询条件 [a1], “~”, 1, 假))
a2 ＝取文本中间 (查询条件 [a1], 1, 寻找文本 (查询条件 [a1], “~”, 1, 假) － 1)
.如果 (a1 ＞ 1)
重定义数组 (c1, 假, 0)
c1 ＝ b
重定义数组 (b, 假, 0)
.计次循环首 (取数组成员数 (c1), b1)
跳到 (到数值 (c1 [b1]))
.计次循环首 (取文本长度 (到文本 (读 (a2))), c)
.如果真 (取文本中间 (到文本 (读 (a2)), c, 取文本长度 (a)) ＝ a)
加入成员 (b, c1 [b1])
跳出循环 ()
.如果真结束

.计次循环尾 ()
.计次循环尾 ()
.否则
到首记录 ()
.计次循环首 (取记录数 (), )
.计次循环首 (取文本长度 (到文本 (读 (a2))), c)
.如果真 (取文本中间 (到文本 (读 (a2)), c, 取文本长度 (a)) ＝ a)
加入成员 (b, 到文本 (取记录号 ()))
跳出循环 ()
.如果真结束

.计次循环尾 ()
跳过 ()
.计次循环尾 ()
.如果结束

.否则
信息框 (“查询条件不完整，请重新输入”, 0, )
易语言EDB多条件查询模块例子。

易语言创建数据库模块

注册表操作模块

同类最新

EDB多条件查询模块

同类资源