11.8 为菜单添加语句

11.8  为菜单添加语句

通过前面的步骤，已经做好了全部表单和报表，这些表单和报表都是要用菜单来调用的。在“项目管理器”窗口中，切换到“其他”选项卡下，选择“主菜单”项，然后单击“修改”按钮，打开“菜单管理器”窗口，然后分别给相应的菜单添加语句。

1．为“文件”菜单添加语句

（1）为“浏览库存表”命令添加语句。

打开菜单设计器，进入“文件”菜单的子菜单。单击“浏览库存表”菜单命令后面的“编辑”按钮，弹出代码输入窗口，在其中输入如下代码：

OPEN DATABASE 设备数据库

USE kucun

Set order to bianhao

Browse  Fields 编号,名称,产地,规格,数量,单价,包装,单位,入价

（2）为“清屏”命令添加语句：

Clear

（3）为“退出”命令添加语句：

Clear all

Close all

Clear events

（4）为“特殊浏览”下的“浏览库存表”命令添加语句：

Do Form  view1check

（5）为“特殊浏览”下的“浏览买入记录”命令添加语句：

Do Form  view1check2

（6）为“特殊浏览”下的“浏览卖出记录”命令添加语句：

Do Form  view1check3

（7）为“管理员功能”下的“修改密码”命令添加语句：

Do Form 密码管理

2．为“打印”菜单添加语句

（1）为“打印库存价格表”命令添加语句：

Report  Form  Kucun.FRX  To  Printer  Prompt

（2）为“特殊打印”下的“打印库存表”命令添加语句：

Do form view2check

（3）为“特殊打印”下的“打印买入记录”命令添加语句：

Do form view2check2

（4）为“特殊打印”下的“打印卖出记录”命令添加语句：

Do form view2check3

3．为“交易统计”菜单添加语句

（1）为“买入交易”命令添加语句：

Do Form injy

（2）为“卖出交易”命令添加语句：

Do Form outjy

4．为“库存检查”菜单添加语句

（1）为“所有库存”命令添加语句：

Do Form sykc

（2）为“条件查询”命令添加语句：

Do Form tjkc

5．为“买入登记”菜单添加语句

在“买入登记”菜单中，添加语句：

Do Form 入货表单

6．为“相关查询”菜单添加语句

（1）为“查询名称”命令添加语句：

Do Form hmcx

（2）为“查询号码”命令添加语句：

Do Form cxmc

（3）为“复杂查询”命令添加语句：

Do Form inquir2

7．为“购物查询”菜单添加语句

（1）为“模糊查询”命令添加语句：

OPEN DATABASE 设备数据库

USE MAICHU

PUBLIC TMAICHU

GO BOTT

TMAICHU=RECN()

DO FORM GWCX

（2）为“按首字查询”命令添加语句：

OPEN DATABASE 设备数据库

USE MAICHU

PUBLIC TMAICHU

GO BOTT

TMAICHU=RECN()

DO FORM GWCX1

（3）为“按尾字查询”命令添加语句：

OPEN DATABASE 设备数据库

USE MAICHU

PUBLIC TMAICHU

GO BOTT

TMAICHU=RECN()

DO FORM GWCX2