1.用数据块向导建立人员信息管理数据块。
2.建立控制块,指定块类型及名称。
3.为控制块上的项命名及选择类型(按钮和文本框)。
4.为按钮输入事件代码:
BEGIN
set_block_property('emp',default_where,
'deptno='||:control.dno);
go_block('emp');
execute_query;
END;
5.编译代码。
6.运行表单程序。
效果图如下:
![雇员信息查询](https://s1.51cto.com/attachment/201108/171705532.gif)
转载于:https://blog.51cto.com/2404712/628697