时间戳

首页 > 解决方案 > 从页面本身更新页面的标题

vba - 从页面本身更新页面的标题

问题描述

我需要更新 Access 中选项卡控件上的页面标题。我尝试了以下代码：

Private Sub tabName_AfterUpdate()
  MyTabControl.Pages(Me.MyTabControl.Value).Caption = Me.tabName
End Sub

这可以很好地设置标题，但是在字段中使用 Tab 或 Enter 并执行上述代码后，我最终会进入下一条记录。我该怎么做才能保持在同一页面上？

Private Sub tabName_AfterUpdate()
  MyTabControl.Pages(Me.MyTabControl.Value).Caption = Me.tabName
  Forms!frmMailing.Controls!MyTabControl = Me.MyTabControl.Value
End Sub

也导致下一个记录，而

Private Sub tabName_AfterUpdate()
  MyTabControl.Pages(Me.MyTabControl.Value).Caption = Me.tabName
  Forms!frmMailing.Controls!MyTabControl = Me.MyTabControl.Value-1
End Sub

将跳转到同一记录的上一页（如预期的那样）！

标签： vbams-accessms-access-forms

解决方案

请尝试以下代码示例：

Forms("dataimport").Command8.Caption = "test"
DoEvents

command8 = 以“dataimport”形式控制，也应打开该形式

推荐阅读