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の各プロパティに設定していって使います。
初期化できるのでオブジェクトを節約できそうですね。