在MS Access中打开缩放窗口

侯爵奇瓦瓦州

我在打开子窗体中的缩放窗口时遇到问题。

基本上,我创建了一个弹出窗口(窗体),假定该窗口在子窗体的备注字段中双击时出现,以使用户能够放大该字段并在输入长句子时更加轻松。

我认为问题与以下事实有关:我尝试创建缩放窗口的表单实际上是嵌入在表单中的子表单。我这样做的原因是由于这样的事实,当我单独打开子窗体并双击“放大”字段时,我的代码运行良好。

下面是代码。子窗体的名称为“ frmMasterListOfEventsDetails”,在子窗体中放大的控件/字段称为“ notes2”。弹出窗口(子窗体)的名称为“ frmZoom”,其控件(文本框)用于获取信息。输入的称为“ txtZoom”。

如果您有任何帮助,我们将不胜感激。谢谢

Private Sub Notes2_DblClick(Cancel As Integer)
    If Me.AllowEdits = False Then
        Messaggi.MessaggioExclamation
    Else
        Me.Refresh
        DoCmd.OpenForm "frmzoom", acNormal, , , , acDialog
    End If

End Sub


Private Sub Form_Close()
    Forms("frmMasterListOfEventsDetails")!Notes2 = Me.txtZoom
    Forms("frmMasterListOfEventsDetails").Refresh

End Sub

Private Sub Form_Open(Cancel As Integer)
    Me.txtZoom = Forms("frmMasterListOfEventsDetails")!Notes2
End Sub
Parakmiakos

我认为问题与以下事实有关:我尝试创建缩放窗口的表单实际上是嵌入在表单中的子表单

我相信你是对的。由于frmMasterListOfEventsDetails是子窗体,

Forms("frmMasterListOfEventsDetails") 

找不到它。您需要完成以下主要表格:

Forms("parentFormName").Form.frmMasterListOfEventsDetails.Form.Notes2 = Me.txtZoom

本文收集自互联网,转载请注明来源。

如有侵权,请联系 [email protected] 删除。

编辑于
0

我来说两句

0 条评论
登录 后参与评论

相关文章