【问题标题】:Pulling data from an Access subform: Run Time error 438从 Access 子窗体中提取数据:运行时错误 438
【发布时间】:2020-07-02 15:57:52
【问题描述】:

当我点击我的“计算总计”按钮(昨天工作)时,我得到了

运行时错误 438 对象不支持此属性或方法。

代码位于表单内的按钮单击事件上,并引用该表单内的几个不同的子表单。我尝试重建代码和主窗体。

Private Sub Command91_Click()

Me.Plates = Me.MealPlannerSubformsf!TotalMeals
Me.MealSubtotal = Me.Plates * Me.MealRate
Me.Sleeps = Me.LodgingDetailsSubformsf!TotSleepers
Me.LodgingSubtotal = Me.Sleeps * Me.LodgingRate
Me.ExpectedTotal = Me.MealSubtotal + Me.LodgingSubtotal + Me.ReservationFee

End Sub

【问题讨论】:

    标签: vba ms-access


    【解决方案1】:

    您必须通过子表单的 Form 属性来处理控件:

    Private Sub Command91_Click()
    
    Me.Plates = Me.MealPlannerSubformsf.Form!TotalMeals
    Me.MealSubtotal = Me.Plates * Me.MealRate
    Me.Sleeps = Me.LodgingDetailsSubformsf.Form!TotSleepers
    Me.LodgingSubtotal = Me.Sleeps * Me.LodgingRate
    Me.ExpectedTotal = Me.MealSubtotal + Me.LodgingSubtotal + Me.ReservationFee
    
    End Sub
    

    【讨论】:

      猜你喜欢
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      相关资源
      最近更新 更多