ListObject.BeforeRightClick 事件 (2007 system)
更新: 2008 年 7 月
当在默认的右击操作之前右击 ListObject 控件时发生。
命名空间: Microsoft.Office.Tools.Excel
程序集: Microsoft.Office.Tools.Excel.v9.0(在 Microsoft.Office.Tools.Excel.v9.0.dll 中)
语法
声明
Public Event BeforeRightClick As DocEvents_BeforeRightClickEventHandler
用法
Dim instance As ListObject
Dim handler As DocEvents_BeforeRightClickEventHandler
AddHandler instance.BeforeRightClick, handler
public event DocEvents_BeforeRightClickEventHandler BeforeRightClick
示例
下面的代码示例创建一个 ListObject 和一个 BeforeRightClick 事件处理程序。在右击列表对象时,会显示一条消息,指示列表对象是否绑定到数据。
此版本针对的是文档级自定义项。
WithEvents List3 As Microsoft.Office.Tools.Excel.ListObject
Private Sub ListObject_BeforeRightClick()
List3 = Me.Controls.AddListObject( _
Me.Range("A1", "C4"), "List3")
End Sub
Sub List3_BeforeRightClick(ByVal Target As _
Microsoft.Office.Interop.Excel.Range, _
ByRef Cancel As Boolean) Handles List3.BeforeRightClick
MessageBox.Show("Data binding is " & List3.IsBinding)
Cancel = True
End Sub
Microsoft.Office.Tools.Excel.ListObject list3;
private void ListObject_BeforeRightClick()
{
list3 = this.Controls.AddListObject(
this.Range["A1", "C4"], "list3");
list3.BeforeRightClick += new
Microsoft.Office.Interop.Excel.
DocEvents_BeforeRightClickEventHandler(
list3_BeforeRightClick);
}
void list3_BeforeRightClick(Microsoft.Office.Interop.Excel.Range
Target, ref bool Cancel)
{
MessageBox.Show("Data binding is " + list3.IsBinding);
Cancel = true;
}
此版本针对的是应用程序级外接程序。
WithEvents List3 As ListObject
Private Sub ListObject_BeforeRightClick()
Dim vstoWorksheet As Worksheet = CType( _
Me.Application.ActiveWorkbook.Worksheets(1), _
Excel.Worksheet).GetVstoObject()
List3 = vstoWorksheet.Controls.AddListObject( _
vstoWorksheet.Range("A1", "C4"), "List3")
End Sub
Sub List3_BeforeRightClick(ByVal Target As _
Microsoft.Office.Interop.Excel.Range, _
ByRef Cancel As Boolean) Handles List3.BeforeRightClick
System.Windows.Forms.MessageBox.Show("Data binding is " & List3.IsBinding)
Cancel = True
End Sub
ListObject list3;
private void ListObject_BeforeRightClick()
{
Worksheet vstoWorksheet = ((Excel.Worksheet)
this.Application.ActiveWorkbook.Worksheets[1]).GetVstoObject();
list3 = vstoWorksheet.Controls.AddListObject(
vstoWorksheet.Range["A1", "C4"], "list3");
list3.BeforeRightClick += new
Excel.DocEvents_BeforeRightClickEventHandler(
list3_BeforeRightClick);
}
void list3_BeforeRightClick(Microsoft.Office.Interop.Excel.Range
Target, ref bool Cancel)
{
System.Windows.Forms.MessageBox.Show("Data binding is " + list3.IsBinding);
Cancel = true;
}
权限
- 对直接调用方的完全信任。此成员不能由部分信任的代码使用。有关更多信息,请参见通过部分受信任的代码使用库。
另请参见
参考
Microsoft.Office.Tools.Excel 命名空间
修订记录
日期 |
修订记录 |
原因 |
---|---|---|
2008 年 7 月 |
添加了一个针对应用程序级外接程序的代码示例版本。 |
SP1 功能更改。 |