2、添加响应代码

（1）“确定”按钮的click事件

SELECT 借还书表.书号,书名,作者,出版社,价格,姓名,借书日期,还书日期,是否按期还书 FROM 图书信息表,借还书表,读者表 WHERE 读者表.读者编号=借还书表.读者编号;

AND 借还书表.书号=图书信息表.书号 AND;

ALLTRIM(书名)=ALLTRIM(thisform.text.value)into TABLE cxb书名 select cxb书名

LOCATE FOR ALLTRIM(书名)=ALLTRIM(thisform.text.value) thisform.grd.recordsourcetype=0

thisform.grd.recordsource="cxb书名" （2）“退出”按钮的click事件

yn=MESSAGEBOX("您确定退出吗？",4+32,"系统信息") IF yn=6

thisform.Release CLEAR EVENTS QUIT Endif

4.4.6 书号查询页面设计

在该界面下，用户可根据书名查询相关书籍的对应信息和借阅情况。 1、表单界面的设计与运行情况如下图所示

2、添加响相应代码

（1）“确定”按钮的click事件