标签显示问题

旧梦博客

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
局_SQL语句	文本型
局_记录集句柄	整数型
局_代表	文本型
局_姓名	文本型
局_电话	文本型
局_时间	文本型
局_地址	文本型
局_索引	整数型
局_错误文本	文本型
局_产品	文本型
局_代收	文本型
局_总金额	文本型
局_单号	文本型
局_id	整数型
集_MySQL句柄	整数型
局_条件	文本型
b	整数型
c	整数型
n	整数型
数据	整数型

局_条件 ＝ “”
标签4.标题 ＝ “”
如果 (按钮1.标题 ＝ “搜索”)
如果真 (删首尾空 (编辑框1.内容) ＝ “”)
信息框 (“请输入姓名cha询条件。”, 0 ＋ #信息图标, “系统提示”, )
编辑框1.获取焦点 ()
返回 ()
如果 (局_条件 ＝ “”)
局_条件 ＝ “`客户姓名` LIKE '%” ＋ 删首尾空 (编辑框1.内容) ＋ “%'”
局_条件 ＝ 局_条件 ＋ 取空白文本 (1) ＋ “AND” ＋ 取空白文本 (1) ＋ “`姓名` LIKE '%” ＋ 删首尾空 (编辑框1.内容) ＋ “%'”
集_MySQL句柄 ＝ 连接MySql (“ip”, “ming”, “mi”, “hu”, 3306)
执行SQL语句 (集_MySQL句柄, “SET names GBK”)
局_SQL语句 ＝ “SELECT * FROM `1` ”
如果真 (局_条件 ≠ “”)
局_SQL语句 ＝ 局_SQL语句 ＋ 取空白文本 (1) ＋ “WHERE” ＋ 取空白文本 (1) ＋ 局_条件
调试输出 (局_SQL语句)
如果真 (执行SQL语句 (集_MySQL句柄, 局_SQL语句) ＝ 假)
取错误文本 (集_MySQL句柄, 局_错误文本)
调试输出 (局_错误文本)
返回 ()
局_记录集句柄 ＝ 取记录集 (集_MySQL句柄)
调试输出 (局_记录集句柄)
计次循环首 (取记录集行数 (局_记录集句柄), )
读字段值 (局_记录集句柄, “主键”, 局_id)
读字段值 (局_记录集句柄, “姓名”, 局_代表)
读字段值 (局_记录集句柄, “日期”, 局_时间)
读字段值 (局_记录集句柄, “客户姓名”, 局_姓名)
读字段值 (局_记录集句柄, “电话”, 局_电话)
读字段值 (局_记录集句柄, “地址”, 局_地址)
读字段值 (局_记录集句柄, “产品”, 局_产品)
读字段值 (局_记录集句柄, “代收金额”, 局_代收)
读字段值 (局_记录集句柄, “全款”, 局_总金额)
读字段值 (局_记录集句柄, “单号”, 局_单号)
标签1.标题 ＝ 局_姓名
标签2.标题 ＝ 局_电话
标签3.标题 ＝ 局_地址
标签4.标题 ＝ “开单时间” ＋ 局_时间 ＋ “--” ＋ “销售代表-----” ＋ 局_代表
如果 (标签3.标题 ＝ “”)
信息框 (“没有搜索到，坚持客户姓名是否错误”, 0, , )
标签5.标题 ＝ 到文本 (取记录集行数 (局_记录集句柄)) ＋ “条数据”

计次循环尾 ()
c ＝ 取记录集行数 (局_记录集句柄)
如果 (c ＝ 0)
信息框 (“查无此人”, 0, , )
标签4.标题 ＝ “”
如果 (c ＞ 1)
按钮1.标题 ＝ “下一个”




标签1.标题 ＝ 局_姓名
标签2.标题 ＝ 局_电话
标签3.标题 ＝ 局_地址
标签4.标题 ＝ “开单时间” ＋ 局_时间 ＋ “--” ＋ “销售代表-----” ＋ 局_代表
释放记录集 (局_记录集句柄)

i支持库列表	支持库注释
mysql	MySql支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 mysql<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 局_SQL语句, 文本型<br /> .局部变量 局_记录集句柄, 整数型<br /> .局部变量 局_代表, 文本型<br /> .局部变量 局_姓名, 文本型<br /> .局部变量 局_电话, 文本型<br /> .局部变量 局_时间, 文本型<br /> .局部变量 局_地址, 文本型<br /> .局部变量 局_索引, 整数型<br /> .局部变量 局_错误文本, 文本型<br /> .局部变量 局_产品, 文本型<br /> .局部变量 局_代收, 文本型<br /> .局部变量 局_总金额, 文本型<br /> .局部变量 局_单号, 文本型<br /> .局部变量 局_id, 整数型<br /> .局部变量 集_MySQL句柄, 整数型<br /> .局部变量 局_条件, 文本型<br /> .局部变量 b, 整数型<br /> .局部变量 c, 整数型<br /> .局部变量 n, 整数型<br /> .局部变量 数据, 整数型<br /> <br /> 局_条件 ＝ “”<br /> 标签4.标题 ＝ “”<br /> .如果 (按钮1.标题 ＝ “搜索”)<br />     .如果真 (删首尾空 (编辑框1.内容) ＝ “”)<br />         信息框 (“请输入姓名cha询条件。”, 0 ＋ #信息图标, “系统提示”, )<br />         编辑框1.获取焦点 ()<br />         返回 ()<br />     .如果真结束<br />     .如果 (局_条件 ＝ “”)<br />         局_条件 ＝ “`客户姓名` LIKE '%” ＋ 删首尾空 (编辑框1.内容) ＋ “%'”<br />     .否则<br />         局_条件 ＝ 局_条件 ＋ 取空白文本 (1) ＋ “AND” ＋ 取空白文本 (1) ＋ “`姓名` LIKE '%” ＋ 删首尾空 (编辑框1.内容) ＋ “%'”<br />     .如果结束<br />     集_MySQL句柄 ＝ 连接MySql (“ip”, “ming”, “mi”, “hu”, 3306)<br />     执行SQL语句 (集_MySQL句柄, “SET names GBK”)<br />     局_SQL语句 ＝ “SELECT * FROM `1` ”<br />     .如果真 (局_条件 ≠ “”)<br />         局_SQL语句 ＝ 局_SQL语句 ＋ 取空白文本 (1) ＋ “WHERE” ＋ 取空白文本 (1) ＋ 局_条件<br />     .如果真结束<br />     调试输出 (局_SQL语句)<br />     .如果真 (执行SQL语句 (集_MySQL句柄, 局_SQL语句) ＝ 假)<br />         取错误文本 (集_MySQL句柄, 局_错误文本)<br />         调试输出 (局_错误文本)<br />         返回 ()<br />     .如果真结束<br />     局_记录集句柄 ＝ 取记录集 (集_MySQL句柄)<br />     调试输出 (局_记录集句柄)<br />     .计次循环首 (取记录集行数 (局_记录集句柄), )<br />         读字段值 (局_记录集句柄, “主键”, 局_id)<br />         读字段值 (局_记录集句柄, “姓名”, 局_代表)<br />         读字段值 (局_记录集句柄, “日期”, 局_时间)<br />         读字段值 (局_记录集句柄, “客户姓名”, 局_姓名)<br />         读字段值 (局_记录集句柄, “电话”, 局_电话)<br />         读字段值 (局_记录集句柄, “地址”, 局_地址)<br />         读字段值 (局_记录集句柄, “产品”, 局_产品)<br />         读字段值 (局_记录集句柄, “代收金额”, 局_代收)<br />         读字段值 (局_记录集句柄, “全款”, 局_总金额)<br />         读字段值 (局_记录集句柄, “单号”, 局_单号)<br />         标签1.标题 ＝ 局_姓名<br />         标签2.标题 ＝ 局_电话<br />         标签3.标题 ＝ 局_地址<br />         标签4.标题 ＝ “开单时间” ＋ 局_时间 ＋ “--” ＋ “销售代表-----” ＋ 局_代表<br />         .如果 (标签3.标题 ＝ “”)<br />             信息框 (“没有搜索到，坚持客户姓名是否错误”, 0, , )<br />         .否则<br />             标签5.标题 ＝ 到文本 (取记录集行数 (局_记录集句柄)) ＋ “条数据”<br />         .如果结束<br /> <br />     .计次循环尾 ()<br />     c ＝ 取记录集行数 (局_记录集句柄)<br /> <br />     .如果 (c ＝ 0)<br />         信息框 (“查无此人”, 0, , )<br />         标签4.标题 ＝ “”<br />     .否则<br />         .如果 (c ＞ 1)<br />             按钮1.标题 ＝ “下一个”<br />         .否则<br /> <br />         .如果结束<br /> <br />     .如果结束<br /> <br /> .否则<br />     标签1.标题 ＝ 局_姓名<br />     标签2.标题 ＝ 局_电话<br />     标签3.标题 ＝ 局_地址<br />     标签4.标题 ＝ “开单时间” ＋ 局_时间 ＋ “--” ＋ “销售代表-----” ＋ 局_代表<br /> <br /> .如果结束<br /> 释放记录集 (局_记录集句柄)

如果搜索到两条或者多条数据的时候，标签会展示一条数据，按钮标题变成下一条，再点击一下，展示下一条时间，按钮标题是改变了，但是如何实现下一条数据.......，求大老

鹏书

感觉有点像分页cha询呢

旧梦博客

目前只能实现到这种地步，点击下一个，标签不显示

coolyanc

你这代码逻辑有问题，不管cha询到几条记录都使用的最后一条记录。要想实现你的功能，需要用个数组保存cha询到的记录，可以是全局、程序集或者局部静态数组。

黑暗法师

定义一个程序集或全局变量，cha询一条把数据库记录集位置赋值给变量，点下一条时，记录集跳到指定位置（集变量）

旧梦博客

黑暗法师 发表于 2023-5-13 20:03
定义一个程序集或全局变量，cha询一条把数据库记录集位置赋值给变量，点下一条时，记录集跳到指定位置（集 ...

膜拜大佬给个例子

lisher

楼主有没有考虑过,加个超级列表来存数据和展示数据呢. 这样你cha询出多条信息也不用点下一条了.全都展示在列表里

强盛科技

标签=标签+上一段的cha询的信息+#换行符