BindingSource.Current プロパティ

public:
 property System::Object ^ Current { System::Object ^ get(); };

[System.ComponentModel.Browsable(false)]
public object Current { get; }

[<System.ComponentModel.Browsable(false)>]
member this.Current : obj

Public ReadOnly Property Current As Object

プロパティ値

Object プロパティによって表される基になるリスト内の現在のアイテムを表すList。リストに項目がない場合はnull。

属性

BrowsableAttribute

例

次のコード例は、 Current プロパティを示しています。 この例を実行するには、コードをフォームに貼り付け、フォームの PopulateBindingSourceWithFonts イベント処理メソッドから Load メソッドを呼び出します。

  public BindingSource bindingSource1 = new BindingSource();
  TextBox box1 = new TextBox();

  private void PopulateBindingSourceWithFonts()
  {
      bindingSource1.CurrentChanged += new EventHandler(bindingSource1_CurrentChanged);
      bindingSource1.Add(new Font(FontFamily.Families[2], 8.0F));
      bindingSource1.Add(new Font(FontFamily.Families[4], 9.0F));
      bindingSource1.Add(new Font(FontFamily.Families[6], 10.0F));
      bindingSource1.Add(new Font(FontFamily.Families[8], 11.0F));
      bindingSource1.Add(new Font(FontFamily.Families[10], 12.0F));
      DataGridView view1 = new DataGridView();
      view1.DataSource = bindingSource1;
      view1.AutoGenerateColumns = true;
      view1.Dock = DockStyle.Top;
      this.Controls.Add(view1);
      box1.Dock = DockStyle.Bottom;
      box1.Text = "Sample Text";
      this.Controls.Add(box1);
      box1.DataBindings.Add("Text", bindingSource1, "Name");
      view1.Columns[7].DisplayIndex = 0;
  }

  void bindingSource1_CurrentChanged(object sender, EventArgs e)
  {
      box1.Font = (Font)bindingSource1.Current;
  }

 Private WithEvents bindingSource1 As New BindingSource()
 Private box1 As New TextBox()

 
 Private Sub PopulateBindingSourceWithFonts()
   
     bindingSource1.Add(New Font(FontFamily.Families(2), 8.0F))
     bindingSource1.Add(New Font(FontFamily.Families(4), 9.0F))
     bindingSource1.Add(New Font(FontFamily.Families(6), 10.0F))
     bindingSource1.Add(New Font(FontFamily.Families(8), 11.0F))
     bindingSource1.Add(New Font(FontFamily.Families(10), 12.0F))
     Dim view1 As New DataGridView()
     view1.DataSource = bindingSource1
     view1.AutoGenerateColumns = True
     view1.Dock = DockStyle.Top
     Me.Controls.Add(view1)
     box1.Dock = DockStyle.Bottom
     box1.Text = "Sample Text"
     Me.Controls.Add(box1)
     view1.Columns("Name").DisplayIndex = 0
     box1.DataBindings.Add("Text", bindingSource1, "Name")
     
 End Sub
  
 Sub bindingSource1_CurrentChanged(ByVal sender As Object, ByVal e As EventArgs) _
     Handles bindingSource1.CurrentChanged
     box1.Font = CType(bindingSource1.Current, Font)
 End Sub

注釈

Current プロパティを使用して現在のアイテムにアクセスしますが、List プロパティを使用してリスト全体を取得します。 現在のオブジェクトの型を確認するには、 GetTypeまたは ToString メソッドを使用します。

現在の項目を変更するには、 Position プロパティを新しい整数値に設定するか、 MoveNextなどのナビゲーション メソッドのいずれかを使用します。

こちらもご覧ください

• List
• Position
• Count