超级列表框判断单条信息弹出信息

死心塌地跟爷走

  

子程序名	返回值类型	公开	备 注
_搜索_按键信息	逻辑型
参数名	类 型	参考	可空	数组	备 注
键代码	整数型
按键类型	整数型

变量名	类 型	静态	数组	备 注
会员卡号	文本型
性别	文本型
积分	双精度小数型
余额	双精度小数型
冻结	文本型
姓名	文本型
电话	文本型
累计消费	双精度小数型
发卡日期	文本型
出生日期	文本型
分店消费	文本型
地址	文本型
密码	文本型
是否储值卡	文本型
SQL语句	文本型
会员类型	文本型
置文本	文本型
n	整数型
i	整数型
到文本	整数型

如果 (键代码 ＝ #回车键 )
判断 (搜索.内容 ≠ “”)
如果 (记录集1.置连接 (数据库连接1))
SQL语句 ＝ “select cardid,kkhcode,mima,dzdh,kkhname,isdj,csrq,hylx,ljxfe,shouji,fdbs,is_czk,jifen,sex,zjm,callnum,idcard,shouji,ye from lscard where (kkhcode like '” ＋ 搜索.内容 ＋ “%'” ＋ “ or kkhname like '%” ＋ 搜索.内容 ＋ “%'” ＋ “or shouji like '%” ＋ 搜索.内容 ＋ “%')” ＋ “and isnull(isdj,'')<>'是' and beactive='是' ORDER BY is_czk”
调试输出 (SQL语句)
记录集1.打开 (SQL语句, #SQL语句, )
记录集1.到首记录 ()
超级列表框EX1.可视EX ＝ 假
判断循环首 (记录集1.尾记录后 ＝ 假)
n ＝ 超级列表框EX1.插入项目 (, , 真, )
记录集1.读文本 (“kkhname”, 姓名)
姓名 ＝ 删尾空 (姓名)
记录集1.读文本 (“kkhcode”, 会员卡号)
会员卡号 ＝ 删尾空 (会员卡号)
记录集1.读文本 (“sex”, 性别)
记录集1.读文本 (“is_czk”, 是否储值卡)
记录集1.读双精度 (“jifen”, 积分)
记录集1.读双精度 (“ye”, 余额)
记录集1.读文本 (“isdj”, 冻结)
记录集1.读文本 (“shouji”, 电话)
电话 ＝ 删尾空 (电话)
记录集1.读文本 (“mima”, 密码)
密码 ＝ 删尾空 (密码)
调试输出 (密码)
记录集1.读双精度 (“ljxfe”, 累计消费)
记录集1.读文本 (“fkrq”, 发卡日期)
记录集1.读文本 (“csrq”, 出生日期)
记录集1.读文本 (“dzdh”, 地址)
记录集1.读文本 (“fdbs”, 分店消费)
记录集1.读文本 (“hylx”, 会员类型)
会员类型 ＝ 删尾空 (会员类型)
记录集1.到下一条 ()
超级列表框EX1.置文本 (n, 1, 到文本 (n), 真)
超级列表框EX1.置文本 (n, 2, 会员卡号, 真)
超级列表框EX1.置文本 (n, 3, 姓名, 真)
超级列表框EX1.置文本 (n, 4, 性别, 真)
超级列表框EX1.置文本 (n, 5, 到文本 (余额), 真)
判断 (密码 ＝ “1”)
超级列表框EX1.置文本 (n, 6, 到文本 (密码), 真)
超级列表框EX1.置文本 (n, 6, 到文本 (“*****”), 真)
超级列表框EX1.置文本 (n, 7, 到文本 (积分), 真)
超级列表框EX1.置文本 (n, 8, 是否储值卡, 真)
超级列表框EX1.置文本 (n, 9, 分店消费, 真)
超级列表框EX1.置文本 (n, 10, 会员类型, 真)
超级列表框EX1.置文本 (n, 11, 到文本 (累计消费), 真)
超级列表框EX1.置文本 (n, 12, 出生日期, 真)
超级列表框EX1.置文本 (n, 13, 地址, 真)
超级列表框EX1.置文本 (n, 14, 冻结, 真)
超级列表框EX1.置文本 (n, 15, 电话, 真)
判断循环尾 ()
超级列表框EX1.刷新 ()
超级列表框EX1.可视EX ＝ 真
记录集1.关闭 ()
' 搜索.禁止EX ＝ 真
判断开始断 (透明标签7.标题 ＝ “1”)
' 延迟 (300)
' 透明标签7.标题 ＝ “1”
' 写日志 (“密码读取成功..”)
' 调试输出 (密码)
' 透明标签7.标题 ＝ “***********”
' 写日志 (“隐藏读取成功..”)
' 调试输出 (密码)




信息框X (“                                       error message”, “请输入会员卡号或手机号在按回车按钮”, “如果没有完善信息请先去后台完善信息才可以使用”, 2, 1, 假)

i支持库列表	支持库注释
exui	(未知支持库)
eDB	数据库操作支持库
spec	特殊功能支持库
iext	扩展界面支持库一

.版本 2<br /> .支持库 exui<br /> .支持库 eDB<br /> .支持库 spec<br /> .支持库 iext<br /> <br /> .子程序 _搜索_按键信息, 逻辑型<br /> .参数 键代码, 整数型<br /> .参数 按键类型, 整数型<br /> .局部变量 会员卡号, 文本型<br /> .局部变量 性别, 文本型<br /> .局部变量 积分, 双精度小数型<br /> .局部变量 余额, 双精度小数型<br /> .局部变量 冻结, 文本型<br /> .局部变量 姓名, 文本型<br /> .局部变量 电话, 文本型<br /> .局部变量 累计消费, 双精度小数型<br /> .局部变量 发卡日期, 文本型<br /> .局部变量 出生日期, 文本型<br /> .局部变量 分店消费, 文本型<br /> .局部变量 地址, 文本型<br /> .局部变量 密码, 文本型<br /> .局部变量 是否储值卡, 文本型<br /> .局部变量 SQL语句, 文本型<br /> .局部变量 会员类型, 文本型<br /> .局部变量 置文本, 文本型<br /> .局部变量 n, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 到文本, 整数型<br /> <br /> .如果 (键代码 ＝ #回车键)<br />     .判断开始 (搜索.内容 ≠ “”)<br />         .如果 (记录集1.置连接 (数据库连接1))<br />             SQL语句 ＝ “select cardid,kkhcode,mima,dzdh,kkhname,isdj,csrq,hylx,ljxfe,shouji,fdbs,is_czk,jifen,sex,zjm,callnum,idcard,shouji,ye from lscard where (kkhcode like '” ＋ 搜索.内容 ＋ “%'” ＋ “ or kkhname like '%” ＋ 搜索.内容 ＋ “%'” ＋ “or shouji like '%” ＋ 搜索.内容 ＋ “%')” ＋ “and isnull(isdj,'')<>'是' and beactive='是' ORDER BY is_czk”<br />             调试输出 (SQL语句)<br />             记录集1.打开 (SQL语句, #SQL语句, )<br />             记录集1.到首记录 ()<br />             超级列表框EX1.可视EX ＝ 假<br /> <br />             .判断循环首 (记录集1.尾记录后 ＝ 假)<br />                 n ＝ 超级列表框EX1.插入项目 (, , 真, )<br />                 记录集1.读文本 (“kkhname”, 姓名)<br />                 姓名 ＝ 删尾空 (姓名)<br />                 记录集1.读文本 (“kkhcode”, 会员卡号)<br />                 会员卡号 ＝ 删尾空 (会员卡号)<br />                 记录集1.读文本 (“sex”, 性别)<br />                 记录集1.读文本 (“is_czk”, 是否储值卡)<br />                 记录集1.读双精度 (“jifen”, 积分)<br />                 记录集1.读双精度 (“ye”, 余额)<br />                 记录集1.读文本 (“isdj”, 冻结)<br />                 记录集1.读文本 (“shouji”, 电话)<br />                 电话 ＝ 删尾空 (电话)<br />                 记录集1.读文本 (“mima”, 密码)<br />                 密码 ＝ 删尾空 (密码)<br />                 调试输出 (密码)<br />                 记录集1.读双精度 (“ljxfe”, 累计消费)<br />                 记录集1.读文本 (“fkrq”, 发卡日期)<br />                 记录集1.读文本 (“csrq”, 出生日期)<br />                 记录集1.读文本 (“dzdh”, 地址)<br />                 记录集1.读文本 (“fdbs”, 分店消费)<br />                 记录集1.读文本 (“hylx”, 会员类型)<br />                 会员类型 ＝ 删尾空 (会员类型)<br />                 记录集1.到下一条 ()<br />                 超级列表框EX1.置文本 (n, 1, 到文本 (n), 真)<br />                 超级列表框EX1.置文本 (n, 2, 会员卡号, 真)<br />                 超级列表框EX1.置文本 (n, 3, 姓名, 真)<br />                 超级列表框EX1.置文本 (n, 4, 性别, 真)<br />                 超级列表框EX1.置文本 (n, 5, 到文本 (余额), 真)<br />                 .判断开始 (密码 ＝ “1”)<br />                     超级列表框EX1.置文本 (n, 6, 到文本 (密码), 真)<br />                 .默认<br />                     超级列表框EX1.置文本 (n, 6, 到文本 (“*****”), 真)<br /> <br />                 .判断结束<br />                 超级列表框EX1.置文本 (n, 7, 到文本 (积分), 真)<br />                 超级列表框EX1.置文本 (n, 8, 是否储值卡, 真)<br />                 超级列表框EX1.置文本 (n, 9, 分店消费, 真)<br />                 超级列表框EX1.置文本 (n, 10, 会员类型, 真)<br />                 超级列表框EX1.置文本 (n, 11, 到文本 (累计消费), 真)<br />                 超级列表框EX1.置文本 (n, 12, 出生日期, 真)<br />                 超级列表框EX1.置文本 (n, 13, 地址, 真)<br />                 超级列表框EX1.置文本 (n, 14, 冻结, 真)<br />                 超级列表框EX1.置文本 (n, 15, 电话, 真)<br />             .判断循环尾 ()<br /> <br />             超级列表框EX1.刷新 ()<br />             超级列表框EX1.可视EX ＝ 真<br />             记录集1.关闭 ()<br /> <br /> <br />             ' 搜索.禁止EX ＝ 真<br /> <br /> <br />             .判断开始断 (透明标签7.标题 ＝ “1”)<br />                 ' 延迟 (300)<br />                 ' 透明标签7.标题 ＝ “1”<br />                 ' 写日志 (“密码读取成功..”)<br />                 ' 调试输出 (密码)<br />             .默认<br />                 ' 透明标签7.标题 ＝ “***********”<br />                 ' 写日志 (“隐藏读取成功..”)<br />                 ' 调试输出 (密码)<br />             .判断结束<br /> <br />         .否则<br /> <br /> <br />         .如果结束<br /> <br />     .默认<br />         信息框X (“                                       error message”, “请输入会员卡号或手机号在按回车按钮”, “如果没有完善信息请先去后台完善信息才可以使用”, 2, 1, 假)<br />     .判断结束

如果查询出数据出现多条内容. 弹出窗口进行选择.落到超级列表框里面. 如果单条 直接落到超级列表框里面

请问如何写~~~~  谢谢各位大神~~~~~

by626

判断取出来的数量》1就载入窗口1选择，（完全是多用功）直接无论多少个都落到超级列表框，然后选择不是一样的吗

死心塌地跟爷走

咋没人啦...