通讯录软件可以帮助新手学习数据库操作

打开程序时就链接数据库，关程序时自动关闭，觉得这样比较合理。

findTxt ＝ 删首尾空 (编辑框5.内容)
.如果 (findTxt ＝ “”)
SQL命令 ＝ “select * from tsl”
.否则
SQL命令 ＝ “select * from tsl where name like '%” ＋ findTxt ＋ “%' or sex='” ＋ findTxt ＋ “' or tel like '%” ＋ findTxt ＋ “%' or addr like '%” ＋ findTxt ＋ “%'”
.如果结束
记录集1.打开 (SQL命令, #SQL语句, )
读记录 ()