查询综合应用
Access开发平台--双击记录弹出查看窗体界面
2009-07-24 08:41:09

(以报销教程里面的报销明细主窗体为例)

步  骤: 1、进入报销软件设计界面→进入报销明细主窗体即frmbxmx_child窗体的代码区   将下列代码复制到代码区最下方:

Private Sub viewData()'用只读方式打开frmbxmx_child_Edit窗体DoCmd.OpenForm "frmBxmx_child_Edit", acNormal, , , acFormReadOnlyForms!frmBxmx_child_Edit.Caption = "查看报销明细内容"End Sub

Private Sub 报销编号_DblClick(cancel As Integer)viewData

End SubPrivate Sub 员工姓名_DblClick(cancel As Integer)viewData

End Sub

2、保存并运行控制面板界面,双击"报销编号"字段的任意一条记录即可查看该数据情况,同理双击"员工姓名"也可

3、以上代码的绿色部分大家也可以换成是"类别名称",即双击"类别名称"就出现查看界面

4、如需要再增加其他字段实现该功能,请重新复制整个的倒数三行一段进行修改

另:如有需要双击任意一记录就可以实现修改功能的,请把以上代码里面红色部分的删除即可

注:   上述方法是用主窗体的数据源为查询进行设置的,如遇到主窗体数据源为表的,   即在设计过程中把以上代码里面的"报销编号"与"员工姓名"换成表里面的字段名称即可至此,该功能的实现同学们把方法学会了即可,现在就去运用到自己开发的软件上试试吧!