VB.NET DataSet, DataReader

DataSet  - 한번 열면 여러번 사용가능

// 변수 선언

Dim dSet As New DataSet

Dim cmd As New SqlCommand(Me.txtSENDQURY.Text, adoCon)

Dim sqlAdapter As New SqlDataAdapter

// DB에 쿼리전송

sqlAdapter = New SqlDataAdapter(cmd)

//DataSet에 데이터 채우기

sqlAdapter.Fill(dSet, "MyTable")

DataReader - 한번 열면 한번만 사용가능

// 변수 선언

Dim cmd As New SqlCommand(Me.txtSENDQURY.Text, adoCon)

Dim dr As SqlDataReader = cmd.ExecuteReader()

Dim sqlAdapter As New SqlDataAdapter

// DB에 쿼리 전송

sqlAdapter = New SqlDataAdapter(cmd)

// 전송받은 데이터 메세지박스로 출력

If (dr.Read) Then

     MsgBox(dr.Item(0).ToString)

End If

출처: http://zzkissme.tistory.com/category/Programming/VB.Net [세상속에 날 가두고 살아가다.]