局域网图书资料查询系统VIP免费

局域网图书资料查询系统bsp;格控件名说明显示项groupboxgb_1------资料名称checkboxcbx_1checked：true作者checkboxcbx_2checked：true出版社checkboxcbx_3checked：true出版日期checkboxcbx_4checked：false类别checkboxcbx_5checked：true购买日期checkboxcbx_6checked：falseisbncheckboxcbx_7checked：false保管人checkboxcbx_8checked：true备注checkboxcbx_9checked：false全选checkboxcbx_10选择全部显示项检索pictureboxpb_1模糊查询检索插入pictureboxpb_2插入一条记录删除pictureboxpb_3删除一条记录检索pictureboxpb_4组合查询检索全部记录pictureboxpb_5检索全部记录退出pictureboxpb_6退出查询界面修改pictureboxpb_7进入编辑模式插入pictureboxpb_8插入一条查询条件删除pictureboxpb_9删除一条查询条件存盘pictureboxpb_10修改后的数据存盘打印pictureboxpb_11打印查询结果报表存为默认显示项pictureboxpb_12将显示项存为当前用户默认------singlelineeditsle_1查询内容输入（字符型）------editmaskem_1查询内容输入（日期型）------statictextst_1显示当前用户名------picturep_1修改按钮装饰------picturep_2gb_1显示装饰------picturep_3显示当前用户头像第1页共2页------dropdownlistboxddlb_1查询项选择------dropdownlistboxddlb_2查询操作符选择------tabcontroltab_1共有三个tabpage頁tabpage1：模糊查询tabpage2：组合查询tabpage3：更新打印------datawindowscontroldw_1对应数据窗口d_information图书信息检索------datawindowscontroldw_2对应数据窗口d_query_condition查询条件检索commandbuttoncb_2模糊查询操作符英－中转换表5－2查询模块控件信息表控件：w_main事件（event）：openscriptofopenstringmode，p，xs，headbooleanxs_item[10]integeridw_1.settransobject（sqlca）dw_1.retrieve//打开窗口显示全部记录sj_check=0//为检索窗口排序变量赋初值st_1.text=user//在查询窗口右上角显示当前用户名select"keeper"."display_item"，"keeper"."head_picture"into：xs，：headfrom"keeper"where"keeper"."name"=：user;//从用户表中读出当前用户的头像值及显示像值并分别赋值给变量file：//有头像的用户则显示在查询窗口右上角ifisnull（head）thenp_3.visible=falseelsep_3.picturename=headendif////将当前用户查询显示项变量读出并赋值给每个查询显示控件fori=1to8ifmid（xs，i，1）='0'thenxs_item[i]=falseelsexs_item[i]=trueendifendfor////给每xs_item[2]cbx_4.checked=xs_item[3]cbx_5.checked=xs_item[4]cbx_6.che第2页共2页