HIRO's.NET

VB.NET, C#, PowerShell Tipsサイト

 VB.NET, C#, PowerShellを使用しているエンジニアのためのサイト。

 基本的な使用方法から開発で役立つTipsまで幅広く取り扱っています。

HIRO's.NET RSSHIRO's.NET RSS

VB.NET 2005の開発でお困りのことはありませんか？
そんな悩みは当サイトで解決！！

HOME > VB.NET 2005 Tips > コントロール > BindingSource Tips メニュー

05.レコード位置を取得する

UPDATE:2007/02/11 

<< 前のTips  次のTips >>

 

　BindingSourceが指し示す現在のレコード位置を取得するには、Positionプロパティを使用します。

　
サンプル
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    '変数の宣言
    Dim OleConn As OleDb.OleDbConnection = New OleDb.OleDbConnection
    Dim OleDA As OleDb.OleDbDataAdapter
    Dim dtSet As DataSet = New DataSet("PRODUCTS")

    '接続文字列の作成
    OleConn.ConnectionString = _
        "Provider=Microsoft.Jet.OLEDB.4.0;" & _
        "Data Source=C:\Work\Northwind.mdb;" & _
        "Persist Security Info=False"

    'データを取得するためのSQL文を作成する
    OleDA = New OleDb.OleDbDataAdapter("SELECT * FROM Products", OleConn)

    'データセットにデータを取得する
    OleDA.Fill(dtSet, "PRODUCTS")

    'データソースを連結する
    Me.BindingSource1.DataSource = dtSet
    Me.BindingSource1.DataMember = "PRODUCTS"
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    '現在位置を取得する
    MessageBox.Show(BindingSource1.Position)
End Sub