通过

ChartSheet.BeforeDoubleClick 事件 (2007 system)

更新：2007 年 11 月

在双击 Microsoft.Office.Tools.Excel.ChartSheet 时，但在默认双击操作之前发生。

命名空间：  Microsoft.Office.Tools.Excel
程序集：  Microsoft.Office.Tools.Excel.v9.0（在 Microsoft.Office.Tools.Excel.v9.0.dll 中）

语法

声明
Public Event BeforeDoubleClick As ChartEvents_BeforeDoubleClickEventHandler
用法
Dim instance As ChartSheet
Dim handler As ChartEvents_BeforeDoubleClickEventHandler

AddHandler instance.BeforeDoubleClick, handler

public event ChartEvents_BeforeDoubleClickEventHandler BeforeDoubleClick

备注

DoubleClick 方法不会导致此事件发生。

示例

下面的代码示例演示 BeforeDoubleClick 事件的一个处理程序，该处理程序在双击当前 Microsoft.Office.Tools.Excel.ChartSheet 的轴时显示一个消息框。该示例还将事件处理程序的 Cancel 参数设置为 true，以便在用户双击轴时图表工作表不接收双击操作。

Private Sub DisallowDoubleClicksOnAxis()
    Globals.Sheet1.Range("A1", "A5").Value2 = 22
    Globals.Sheet1.Range("B1", "B5").Value2 = 55

    Me.SetSourceData(Globals.Sheet1.Range("A1", "B5"), _
        Excel.XlRowCol.xlColumns)
    Me.ChartType = Excel.XlChartType.xl3DColumn
End Sub

Sub ChartSheet1_BeforeDoubleClick(ByVal ElementID As Integer, _
    ByVal Arg1 As Integer, ByVal Arg2 As Integer, _
    ByRef Cancel As Boolean) Handles Me.BeforeDoubleClick
    If ElementID = Fix(Excel.XlChartItem.xlAxis) Then
        MsgBox("Formatting this axis is not allowed.")
        Cancel = True
    End If
End Sub

private void DisallowDoubleClicksOnAxis()
{
    Globals.Sheet1.Range["A1", "A5"].Value2 = 22;
    Globals.Sheet1.Range["B1", "B5"].Value2 = 55;

    this.SetSourceData(Globals.Sheet1.Range["A1", "B5"],
        Excel.XlRowCol.xlColumns);
    this.ChartType = Excel.XlChartType.xl3DColumn;

    this.BeforeDoubleClick +=
        new Excel.ChartEvents_BeforeDoubleClickEventHandler(
        ChartSheet1_BeforeDoubleClick);
}

void ChartSheet1_BeforeDoubleClick(int ElementID, int Arg1, 
    int Arg2, ref bool Cancel)
{
    if (ElementID == (int)Excel.XlChartItem.xlAxis)
    {
        MessageBox.Show("Formatting this axis is not allowed.");
        Cancel = true;
    }
}

权限

另请参见

参考

ChartSheet 类

ChartSheet 成员

Microsoft.Office.Tools.Excel 命名空间