我在打开子窗体中的缩放窗口时遇到问题。
基本上,我创建了一个弹出窗口(窗体),假定该窗口在子窗体的备注字段中双击时出现,以使用户能够放大该字段并在输入长句子时更加轻松。
我认为问题与以下事实有关:我尝试创建缩放窗口的表单实际上是嵌入在表单中的子表单。我这样做的原因是由于这样的事实,当我单独打开子窗体并双击“放大”字段时,我的代码运行良好。
下面是代码。子窗体的名称为“ 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
我认为问题与以下事实有关:我尝试创建缩放窗口的表单实际上是嵌入在表单中的子表单
我相信你是对的。由于frmMasterListOfEventsDetails是子窗体,
Forms("frmMasterListOfEventsDetails")
找不到它。您需要完成以下主要表格:
Forms("parentFormName").Form.frmMasterListOfEventsDetails.Form.Notes2 = Me.txtZoom
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句