Create DataView From DataTable
Imports System Imports System.Data Imports System.Data.SqlClient public class MainClass Shared Sub Main() Dim thisConnection As New SqlConnection("server=(local)\SQLEXPRESS;" & _ "integrated security=sspi;database=MyDatabase") ' Sql Query Dim sql As String = "SELECT FirstName, LastName FROM Employee" Try ' Create Data Adapter Dim da As New SqlDataAdapter da.SelectCommand = New SqlCommand(sql, thisConnection) ' Create and fill Dataset Dim ds As New DataSet da.Fill(ds, "Employee") ' Get The Data Table Dim dt As DataTable = ds.Tables("Employee") ' Create Data View Dim dv As New DataView(dt, _ "FirstName = 'Joe'", _ "FirstName", DataViewRowState.CurrentRows) ' Display Data In Data View For Each row As DataRowView In dv For i As Integer = 0 To dv.Table.Columns.Count - 1 Console.Write(row(i).PadRight(20)) Next Console.WriteLine() Next Catch ex As SqlException ' Display error Console.WriteLine("Error: " & ex.ToString()) Finally ' Close Connection thisConnection.Close() Console.WriteLine("Connection Closed") End Try End Sub End Class