Access VBA教程:BeforeRender事件

当指定的数据透视图视图中任意对象被提交之前,该事件会发生。

Private Sub Form_BeforeRender(ByVal drawObject As Object, ByVal chartObject As Object, ByVal Cancel As Object)

drawObject  对ChChartDraw对象的引用。使用返回对象的DrawType属性可以决定即将发生哪种类型的提交。

chartObject   即将提交的对象。使用 TypeName函数确定对象的类型。

Cancel   将该对象的 Value属性设为 True 可取消“数据透视图视图”对象的提交。

VBA示例

下面的示例显示了捕获 BeforeRender事件的子例程的语法。


Private Sub Form_BeforeRender( _
        ByVal drawObject As Object, _
        ByVal chartObject As Object, _
        ByVal Cancel As Object)
    Dim intResponse As Integer
    Dim strPrompt As String
    strPrompt = "Cancel render of current object?"
    intResponse = MsgBox(strPrompt, vbYesNo)
    If intResponse = vbYes Then
        Cancel.Value = True
    Else
        Cancel.Value = False
    End If
End Sub

上页:Access VBA教程:BeforeQuery事件 下页:Access VBA教程:BeforeScreenTip事件

Access VBA教程:BeforeRender事件

Access VBA教程:BeforeScreenTip事件 Access VBA教程:BeforeUpdate事件
Access VBA教程:BeginBatchEdit事件 Access VBA教程:Change事件
Access VBA教程:Click事件 Access VBA教程:Close事件
Access VBA教程:CommandBeforeExecute事件 Access VBA教程:CommandChecked事件
Access VBA教程:CommandEnabled事件 Access VBA教程:CommandExecute事件
Access VBA教程:Current事件 Access VBA教程:DataChange事件
Access VBA教程:DataSetChange事件 Access VBA教程:DblClick事件
Access VBA教程:Deactivate事件 Access VBA教程:Delete事件
Access VBA教程:Dirty事件 Access VBA教程:Enter事件
Access VBA教程:Error事件 Access VBA教程:Exit事件
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号