计算机
型—5,定价
—数值型
—5 —2
索引
: 书号 普通索引
■
图书馆管理与资源建
设
表
8 图书信息表
书 号书 名作 者出版社出版日期版 次定 价
8990数据库原理 陶宏才西南交通大学
2001年
9月第
1版
25
10001数据库系统原理王能斌北京大学
2001年
8月第
1版
16
—
105 —
. 1995-2005 Tsinghua Tongfang Optical Disc Co., Ltd. All rights reserved.
2004年
3月第
3期
March12004 No.3
31313 借阅信息表
借阅信息
:读者证号
—字符型
—
20 ,图书条码
—字符
型—
20 ,还书日期
—日期型
—
8
索引
:读者证号 普通索引
,图书条码 普通索引。
表
9 借阅信息表
读者证号图书条码还书日期
1999J110203 20020000480901 2003年
6月
28日
1999J110203 20020000480902 2003年
6月
20日
31314 表单设计
在
VFP中
,操作数据库的基本方式是表单操作。通过
表单设计器可以设计出非常友好的操作数据库的界面。
3131411 图书查询表单设计
■
功能要求
:从系统中检索出相关图书
,实现图书的快
速检索、查询。表单界面如图
1所示
:
图
1 图书查询表单
Form1的
Load事件
:
Public ss
ss = 0
Optiongroup1的
init事件
:
This. value = 0
Option1的
click事件
:
图
ss = 1
书Option2的
click事件
:
馆
ss = 2
管
理command1的
click事件
:
与close aLL
资
源
use图书信息
建
bh = trim(thisform. text1. value)
设
do case
case ss=1
browsefor at (bh,书名
)< >0
case ss=2
browsefor at (bh,作者
)< >0
endcase
use
command2的
click事件
:
thisform. release
3131412 读者查询表单设计
功能要求
:读者利用借书证号查询到所借图书信息和
还书日期。表单界面如图
2所示
:
command1的
click事件
:
close aLL
use读者信息
—
106 —
图
2 读者查询表单
bh = trim(thisform. text1. value)
locat for alltrim(读者信息
.证号
) = =trim(thisform.text1.value)
if found()
use借阅信息
locat for alltrim(借阅信息
.读者证号
) = =bh
if found()
SET VIEW TO dzcha
browse fields图书信息
.书号
,图书信息
.书名
,图书信
息.出版社
,;
图书信息
.出版日期
,图书信息
.版次
,图书信息
.定价
,
借阅信息
.还书日期
;
for alltrim(借阅信息
.读者证号
) = =bh
else
messagebox(没有借书记录”
)
“
thisform. setfocus
ret