VB.NET, C#, PowerShellを使用しているエンジニアのためのサイト。
基本的な使用方法から開発で役立つTipsまで幅広く取り扱っています。
DataViewのRowFilterプロパティを使用すると、現時点で格納されているDataViewのテーブルに対して条件を指定して抽出したレコードを格納することができます。Sortプロパティも併せて使用することができます。
手順
1)変数の宣言
2)接続文字列の作成
3)SELECT文の作成
4)SELECT用コマンドオブジェクトの作成
5)データアダプタの作成
6)データセットにデータを取得する
7)DataViewにDataSetのテーブルを連結する
8)条件を指定してレコードを抽出する
Imports System.Data.OracleClient : :省略 : Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click '1)変数の宣言 Dim OraConn As OracleConnection = New OracleConnection Dim OraDA As OracleDataAdapter Dim dtSet As DataSet = New DataSet("EMP") Dim dtView As New DataView Dim intRecCnt As Integer '2)接続文字列の作成 OraConn.ConnectionString = _ "user id=SCOTT;" & _ "password=TIGER;" & _ "Data Source=OracleServer" '3)SELECT文の作成 Dim strSelect As String strSelect = "SELECT * FROM EMP" '4)SELECT用コマンドオブジェクトの作成 Dim SelectCmd As New OracleCommand SelectCmd.Connection = OraConn SelectCmd.CommandText = strSelect '5)データアダプタの作成 OraDA = New OracleDataAdapter OraDA.SelectCommand = SelectCmd '6)データセットにデータを取得する OraDA.Fill(dtSet, "EMP_TBL") '7)DataViewにDataSetのテーブルを連結する dtView.Table = dtSet.Tables(0) '8)条件を指定してレコードを抽出する '「JOB」フィールドが「CLERK」のレコードを抽出してDataViewに格納 dtView.RowFilter = "JOB = 'CLERK'" End Sub