VB.NET Sql Select Statement Source Code Example

Putting the Pieces of .NET Together - 8 Part Video Series By Wade Harvey
Introduction
Videos 1-4	1. Servers (3 minutes)	2. .NET Framework (10 minutes)	3. Security (8 minutes)	4. Monitoring Tools (10 minutes)
Videos 5-8	5. Web Servers (6 minutes)	6. SQL Server (6 minutes)	7. Software Develop Tools (10 minutes)	8. Languages (2 minutes)
Download PDF	Putting the Pieces of .NET Together - 48-page PDF

VB.NET Sql Select Statement Source Code

Purpose: – Illustrates using Sql Select Statement and writing to an output table.
Prerequistes:

1. Install Visual Basic (Express or Standard Edition)
2. Install SQL Server Express
3. Download Northwind Database
4. Attach Northwind Database to Databases in Sql Express

Notes:

• Console Application is used to simplify things, but Windows Forms or Web Forms could also be used
• You can build a library of syntax examples by using same project over and over and just commenting out what you do not want to execute in Module1.vb

Instructions:

1. Use VB 2008 (Express or Standard) Edition
2. Create new project; select Console Application; name of Project could be VBNET_Syntax.
3. Right-click project name in solution explorer; add new folder; name of folder could be DatabaseADONET
4. Right-click folder; add class; class name could be clsSqlSelect.vb
5. Copy code into clsSqlSelect.vb
6. Copy code into Module1.vb
7. Click green arrow to start with debugging

Step 1: Use View Plain to Cut-n-paste code into clsSqlSelect.vb

 Visual Basic | 
 copy code |
?
 
 
Imports System
Imports System.Data
Imports System.Data.SqlClient
 
 
Public Class clsSQLSelect
    Shared WithEvents con As SqlConnection
 
    Sub Main()
        con = New SqlConnection("Server=(local)\SQLEXPRESS;Initial Catalog=Northwind;Integrated Security=SSPI")
 
        ' Create the command object
        Dim str As String = "SELECT EmployeeID, FirstName, LastName FROM Employees"
        Dim cmd As New SqlCommand(str, con)
 
        Dim da As New SqlDataAdapter(cmd)
 
        Dim ds As New DataSet()
 
        da.Fill(ds, "Employees")
 
        Dim dc As DataColumn
        For Each dc In ds.Tables(0).Columns
            Console.Write("{0,15}", dc.ColumnName)
        Next
 
        Console.Write(vbCrLf)
 
        Dim dr As DataRow
        For Each dr In ds.Tables(0).Rows
            Dim i As Integer
            For i = 1 To ds.Tables(0).Columns.Count
                Console.Write("{0,15}", dr(i - 1))
            Next i
            Console.Write(vbCrLf)
        Next
        Console.ReadLine()
    End Sub
 
End Class

Step 2: Use View Plain to Cut-n-paste code into Module1.vb

 Visual Basic | 
 copy code |
?
 
Module Module1
 
    Sub Main()
        '***** DataBaseADONET *************
 
        Dim mySQLSelect As New clsSQLSelect
        mySQLSelect.Main()
 
 
 
    End Sub
 
End Module
 

Related posts:

1. C# Select Statement Source Code Example Source Code example shows how to use Sql Select in...
2. VB.NET Sql Command Delete Statement Source Code Example Example illustrates using VB.NET Sql Command Delete Statement and checking...
3. VB.NET Sql Parameters Source Code – Insert Statement Source code example that illustrates using SQL parameters with insert...
4. VB.NET Sql Command Update Statement Source Code Example VB.NET Source Code Example shows how to use Sql Command...
5. C# ASP.NET Sql Command Select Statement Source Code Example C# ASP.NET Sql Command Select Statement Source Code Example using...

Related posts brought to you by Yet Another Related Posts Plugin.