VB.NET Sql Select Statement Source Code Example

Get 5 Hours of FREE PREMIUM Videos:

LearnVisualStudio.NET Free Preview

LearnVisualStudio Premium Videos

dotNetVideos Premium Video Catalog

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

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

Related posts:

1. VB.NET Sql Parameters Source Code – Insert Statement Source code example that illustrates using SQL parameters with insert...
2. C#: Sql Stored Procedure Source Code Example C# Sql Stored Procedure source code example with SqlDataReader...
3. C# – Sql Parameters – Insert Statement C# - Illustrates using Sql parameters with Insert Statement...
4. VB.NET: Sql Stored Procedure Source Code Example VB.NET Sql Stored Procedure Source Code Example...

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