タイトル : リストボックス表示 投稿日 : 2005/12/11(Sun) 15:27 投稿者 : ACG
[OSのVer]:Windows [VBのVer]:VB.NET データベースから条件に一致した項目をリストボックスに表示する方法がわかりません わかる方ご教授よろしくお願いします。 データベース:ACCESS 社員マスタの社員姓テーブルから「石田」を検索し、 リストボックスに、条件に一致した(石田)社員名を表示します。 社員マスタ構成 ・社員ID ・社員姓 ・社員名 <ソース> Dim oleCn As OleDb.OleDbConnection = New OleDb.OleDbConnection Dim oleDa As OleDb.OleDbDataAdapter Dim dtSet As DataSet = New DataSet("A") Dim dtTable As DataTable Dim dtRow As DataRow Private Sub RadioButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As oleCn.ConnectionString = _ "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=A.mdb;" & _ "Persist Security Info=False" '選択SQL文を作成してレコードを取得する oleDa = New OleDb.OleDbDataAdapter("SELECT * FROM 社員マスタ", oleCn) oleDa.Fill(dtSet, "社員マスタ") 'データセットからテーブルを取得する dtTable = dtSet.Tables("社員マスタ") oleDa = New OleDb.OleDbDataAdapter( _ "SELECT * FROM 社員マスタ " & _ "WHERE 社員姓 = '石田' ", oleCn) ' データ検索 Dim ds As New DataSet oleDa.Fill(ds) ------------------------------------------------------------------ ここから先でリストボックスに表示するところでつまってしまいました・・・ よろしくお願いします。 |