DataAdapter对象还可以通过4个属性传递数据,给4个属性赋值的对象必须是Command对象。
- 如果Command对象执行的是SELECT语句,必须将对象传递给SelectCornmand属性;
- 如果是UPDATE语句,则传递给UpdateCommand属性;
- 如果是INSERT语句,则传递给InsertCommand属性;
- 如果是DELETE语句,则传递给DeleteCommand对象。
默认情况下,当Connection对象执行Open方法的时候,DataAdapter对象将自动调用SelectCommand属性。除了SelectCommand属性,其他3个属性都需要使用“ExecuteNonQuery0”方法调用。
Imports System.Data.SqlClient
Public Class Form1
Dim conn As SqlConnection
Dim da As SqlDataAdapter
Dim ds As DataSet '必须加“NEW”关键字
Dim dt As DataTable
Private Function GetConnection() As SqlConnection
Return New SqlConnection(My.Settings.SalesConnectionString)
End Function
Private Sub DisplayData1(ByVal str As String) '用DataReader对象
DataGridView1.DataSource = Nothing
conn = GetConnection()
conn.Open()
Dim comm As New SqlCommand(str, conn)
Dim dr As SqlDataReader = comm.ExecuteReader
Dim dt As New DataTable