共用方式為


Chart.MouseDown 事件 (2007 系統)

更新:2007 年 11 月

會在指標位於 Chart 控制項上時按下滑鼠按鈕時發生。

命名空間:  Microsoft.Office.Tools.Excel
組件:  Microsoft.Office.Tools.Excel.v9.0 (在 Microsoft.Office.Tools.Excel.v9.0.dll 中)

語法

Public Event MouseDown As ChartEvents_MouseDownEventHandler

Dim instance As Chart
Dim handler As ChartEvents_MouseDownEventHandler

AddHandler instance.MouseDown, handler
public event ChartEvents_MouseDownEventHandler MouseDown

範例

下列程式碼範例會建立 Chart,以及 MouseDown 事件的處理常式,當指標位於圖表上並按下滑鼠按鈕時,會在儲存格 D14 中顯示滑鼠指標的座標。

WithEvents MouseDownChart As Microsoft.Office.Tools.Excel.Chart

Private Sub DisplayMouseDown()
    Me.Range("A1", "A5").Value2 = 22
    Me.Range("B1", "B5").Value2 = 55

    MouseDownChart = Me.Controls.AddChart(Me.Range("D2", "H12"), _
        "MouseDownChart")
    MouseDownChart.SetSourceData(Me.Range("A1", "B5"), _
        Excel.XlRowCol.xlColumns)
    MouseDownChart.ChartType = Excel.XlChartType.xl3DColumn
End Sub

Sub MouseDownChart_MouseDown(ByVal Button As Integer, _
    ByVal Shift As Integer, ByVal x As Integer, _
    ByVal y As Integer) Handles MouseDownChart.MouseDown

    Me.Range("D14").Value2 = _
        "The chart was clicked at coordinates " _
        & x.ToString() & ", " & y.ToString()
End Sub
private void DisplayMouseDown()
{
    this.Range["A1", "A5"].Value2 = 22;
    this.Range["B1", "B5"].Value2 = 55;

    Microsoft.Office.Tools.Excel.Chart chart1 =
        this.Controls.AddChart(this.Range["D2", "H12"], 
        "chart1");
    chart1.SetSourceData(this.Range["A1", "B5"], 
        Excel.XlRowCol.xlColumns);
    chart1.ChartType = Excel.XlChartType.xl3DColumn;

    chart1.MouseDown +=
        new Excel.ChartEvents_MouseDownEventHandler(
        chart1_MouseDown);
}

void chart1_MouseDown(int Button, int Shift, int x, int y)
{
    this.Range["D14", missing].Value2 = "The chart was clicked at" +
        " coordinates " + x.ToString() + ", " + y.ToString();
}

使用權限

請參閱

參考

Chart 類別

Chart 成員

Microsoft.Office.Tools.Excel 命名空間