RemoteBindableComponent (Clase) (2007 System)
Actualización: noviembre 2007
Proporciona una implementación predeterminada de la interfaz IBindableComponent para los controles host de las soluciones de Visual Studio Tools para Office.
Espacio de nombres: Microsoft.VisualStudio.Tools.Office
Ensamblado: Microsoft.Office.Tools.v9.0 (en Microsoft.Office.Tools.v9.0.dll)
Sintaxis
<PermissionSetAttribute(SecurityAction.Demand, Name := "FullTrust")> _
Public MustInherit Class RemoteBindableComponent _
Inherits RemoteComponent _
Implements IBindableComponent, IComponent, IDisposable
Dim instance As RemoteBindableComponent
[PermissionSetAttribute(SecurityAction.Demand, Name = "FullTrust")]
public abstract class RemoteBindableComponent : RemoteComponent,
IBindableComponent, IComponent, IDisposable
Comentarios
Los controles host que se pueden enlazar a datos se heredan de la clase RemoteBindableComponent. Esta clase no está pensada para utilizarse directamente desde el código.
Para obtener más información acerca de los controles de host, vea Información general sobre elementos y controles Host.
Ejemplos
En el ejemplo de código siguiente se agrega a la hoja de cálculo actual un único control NamedRange de celdas (que se deriva de RemoteBindableComponent), un objeto DataSet con una sola columna de nombres y un control Button. En el ejemplo se utiliza la propiedad DataBindings para enlazar DataSet a la propiedad Value2 de NamedRange. Cuando se hace clic en Button, el ejemplo utiliza la propiedad BindingContext para mostrar el nombre siguiente en NamedRange.
Private namedRange1 As Microsoft.Office.Tools.Excel.NamedRange
Private WithEvents button1 As Microsoft.Office.Tools.Excel.Controls.Button
Private customerNames As String() = _
{"Reggie", "Sally", "Henry", "Christine"}
Private ds As DataSet
Private Sub SetBindingContext()
namedRange1 = Me.Controls.AddNamedRange(Me.Range("A1", _
System.Type.Missing), "namedRange1")
' Create a button that scrolls through the data
' displayed in the NamedRange.
button1 = Me.Controls.AddButton(50, 20, 100, 20, "button1")
button1.Text = "Display next item"
' Create a data table with one column.
ds = New DataSet()
Dim table As DataTable = ds.Tables.Add("Customers")
Dim column1 As New DataColumn("Names", GetType(String))
table.Columns.Add(column1)
' Add the names to the table.
Dim row As DataRow
Dim i As Integer
For i = 0 To customerNames.Length - 1
row = table.NewRow()
row("Names") = customerNames(i)
table.Rows.Add(row)
Next i
' Create a new Binding that links the Value2 property
' of the NamedRange and the Names column.
Dim binding1 As New Binding("Value2", ds, "Customers.Names", True)
namedRange1.DataBindings.Add(binding1)
End Sub
' Displays the next data item in the NamedRange.
Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) _
Handles button1.Click
If Not (namedRange1.BindingContext Is Nothing) Then
Dim bindingManager1 As BindingManagerBase = _
namedRange1.BindingContext(ds, "Customers")
' Display the next item.
If bindingManager1.Position < bindingManager1.Count - 1 Then
bindingManager1.Position += 1
' Display the first item.
Else
bindingManager1.Position = 0
End If
End If
End Sub
private Microsoft.Office.Tools.Excel.NamedRange namedRange1;
private Microsoft.Office.Tools.Excel.Controls.Button button1;
private string[] customerNames =
{ "Reggie", "Sally", "Henry", "Christine" };
private DataSet ds;
private void SetBindingContext()
{
namedRange1 = this.Controls.AddNamedRange(
this.Range["A1", missing], "namedRange1");
// Create a button that scrolls through the data
// displayed in the NamedRange.
button1 = this.Controls.AddButton(50, 20, 100, 20,
"button1");
button1.Text = "Display next item";
button1.Click += new EventHandler(button1_Click);
// Create a data table with one column.
ds = new DataSet();
DataTable table = ds.Tables.Add("Customers");
DataColumn column1 = new DataColumn("Names", typeof(string));
table.Columns.Add(column1);
// Add the names to the table.
DataRow row;
for (int i = 0; i < customerNames.Length; i++)
{
row = table.NewRow();
row["Names"] = customerNames[i];
table.Rows.Add(row);
}
// Create a new Binding that links the Value2 property
// of the NamedRange and the Names column.
Binding binding1 = new Binding("Value2", ds, "Customers.Names", true);
namedRange1.DataBindings.Add(binding1);
}
// Displays the next data item in the NamedRange.
void button1_Click(object sender, EventArgs e)
{
if (namedRange1.BindingContext != null)
{
BindingManagerBase bindingManager1 =
namedRange1.BindingContext[ds, "Customers"];
// Display the next item.
if (bindingManager1.Position < bindingManager1.Count - 1)
{
bindingManager1.Position++;
}
// Display the first item.
else
{
bindingManager1.Position = 0;
}
}
}
Jerarquía de herencia
System.Object
Microsoft.VisualStudio.Tools.Office.RemoteComponent
Microsoft.VisualStudio.Tools.Office.RemoteBindableComponent
Microsoft.Office.Tools.Excel.Chart
Microsoft.Office.Tools.Excel.ListObject
Microsoft.Office.Tools.Excel.NamedRange
Microsoft.Office.Tools.Excel.XmlMappedRange
Microsoft.Office.Tools.Word.Bookmark
Microsoft.Office.Tools.Word.ContentControlBase
Microsoft.Office.Tools.Word.XMLNode
Seguridad para subprocesos
Todos los miembros static (Shared en Visual Basic) públicos de este tipo son seguros para la ejecución de subprocesos. No se garantiza que los miembros de instancias sean seguros para la ejecución de subprocesos.
Vea también
Referencia
RemoteBindableComponent (Miembros)
Microsoft.VisualStudio.Tools.Office (Espacio de nombres)