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