vue页面关闭是保存表单_如何在不保存任何子表单的更改的情况下关闭主表单

vue页面关闭是保存表单

介绍 :

本文涉及一个长期存在的问题(至少从Access 2.0开始),在该问题中,另一个(主)窗体的子窗体中使用的窗体将在主窗体打开和打开期间进行任何临时和临时的设计更改。在使用中,自动保存下来成为Form的新设计。 这是很少需要的,但是Access却为您提供了这种功能,而没有任何方式指定您不希望这样做。 通常,表单设计者希望保留表单,就像他们自己选择保存表单一样。 瞬态更改仅适用于当前使用的实例的生命周期,不应保存为表单的新设计。

例子 :

在这种情况下,典型的变更示例包括:

  1. 在“设计”视图中打开“表单”时窗口的大小(这对设计人员来说是很烦人的)。
  2. 数据的排序顺序。
  3. 过滤。
  4. 表单中任何控件的大小和位置。
  5. 用于说明特定情况的控件格式。
  6. 等等。
实际上,使用表单时可能发生的可能更改的数量仅限于其中使用的控件的数量和类型,以及每个控件的可更改属性的数量。 那,以及表单本身的属性。 解决方案:

我找到了一个似乎可行的解决方案,该解决方案是在主窗体关闭时从Subform控件中删除Form本身。 由于当时Access没有关联,否则Access会为您慷慨地保存它(即使您不需要它),因此不会保存任何设计更改,并且您可以放心地再次使用它,因为它与以前完全一样。最后保存在“设计”视图中。

支持代码:

可以在不知道对任何相关对象进行任何设计更改的情况下,意外地或通过Access的误导性,将以下代码通用地用于关闭任何Form或Report对象。

'CloseMe() closes the Form or Report.  No data or design changes are saved here.
Public Sub CloseMe(objMe As Object)
    Dim intType As Integer
    Dim ctlVar As Control 
    With objMe
        Select Case True
        Case TypeOf objMe Is Form
            intType = acForm
            Call .Undo
            For Each ctlVar In .Controls
                With ctlVar
                    If .ControlType = acSubform Then
                        Call .Form.Undo
                        .SourceObject = ""
                    End If
                End With
            Next ctlVar
        Case TypeOf objMe Is Report
            intType = acReport
        Case Else
            Exit Sub
        End Select
        Call DoCmd.Close(ObjectType:=intType _
                       , ObjectName:=.Name _
                       , Save:=acSaveNo)
    End With
End Sub
  • 第8行检测对象是否为Form。
  • 第9行至第15行清除所有未保存的数据更改,并从所有子表单中卸载表单。
  • 第16行至第17行对于报表而言更为直接。 只需将其标记为“报告”以备后用。
  • 第18-#19行忽略传递的任何其他类型的对象。
  • #21-#23行关闭主窗体,而不保存任何设计更改。

翻译自: https://bytes.com/topic/access/insights/951596-how-close-main-form-without-saving-changes-any-subforms

vue页面关闭是保存表单

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值