SqlDataAdapterとSelectCommand VB.NET

      2017/07/13

SqlDataAdapterのSelectCommandについて書きます。

今まではコマンドにsql文とコネクションを繋いできました。
それをアダプターにコマンドを入れる感じですね。

Dim cmd As New SqlCommand("select * from meibo where number = @number", cn)
cmd.Parameters.Add(New SqlParameter("@number", TextBox1.Text))
Dim adapter As New SqlDataAdapter(cmd)
Dim table As New DataTable()
adapter.Fill(table)
DataGridView1.DataSource = table

今回はSqlDataAdapterのSelectCommandを使って書きます。

Imports System.Data.SqlClient
Public Class Form1
Dim cn As New SqlConnection(
"Data Source=(local)\SQL;" +
"Initial Catalog=ADO;" +
"Integrated Security=True;Pooling=False")
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim adapter As New SqlDataAdapter()
adapter.SelectCommand = New SqlCommand()
adapter.SelectCommand.CommandText = "select * from meibo where number = @number"
adapter.SelectCommand.Parameters.Add(New SqlParameter("@number", TextBox1.Text))
adapter.SelectCommand.Connection = cn

Dim table As New DataTable()
adapter.Fill(table)
DataGridView1.DataSource = table
End Sub
End Class

何となくわかりますか?
SelectCommandの各プロパティに設定していって使います。
初期化できるのでオブジェクトを節約できそうですね。

PR



 - ADO.NET

Translate »