具体方法如下：

.子程序 _按钮1_被单击
.局部变量 b, 整数型
.局部变量 取查询值, 整数型
.局部变量 MySQL语句, 文本型
.局部变量 记录数量, 整数型
.局部变量 i, 整数型
.局部变量 姓名, 文本型
b ＝ 连接MySql (“120.26.*.*”, “root”, “123445”, “user”, 3306)
输出调试文本 (b)
MySQL语句 ＝ “select * from user_table”
执行SQL语句 (b, MySQL语句)
取查询值 ＝ 取记录集 (b)
记录数量 ＝ 取记录集行数 (取查询值)
输出调试文本 (记录数量)
.计次循环首 (记录数量, i)
读字段值 (取查询值, “username”, 姓名)
.如果 (姓名 ＝ “admin”)
信息框 (“已找到”, 0, , )
跳出循环 ()
.否则
.如果结束
' //输出调试文本 (姓名)
到下一行 (取查询值)
.计次循环尾 ()