VB.NET CSng Example – Code Sample Syntax

VB.NET CSng Example – Code Sample Syntax

Abstract: – Illustrates using .

Purpose:
Converts positive and negative numbers into Single data type

Syntax:
CSng(expression)

Parameters Description
expression -3.402823E+38 through -1.401298E-45 for negative values; 1.401298E-45
through 3.402823E+38 for positive values

Result Data Type Description
Single 32-bit (4-byte) single-precision floating-point numbers

Step 1: Click Visual Basic to Cut-n-paste code into clsCSng.vb

Public Class clsCSng
 
    Public Sub Main()
 
 
        '*****************************************************************************************
        ' Purpose: Converts positive and negative numbers into Single data type
        ' 
        ' Syntax: 	CSng(expression)
        ' 
        ' Parameter1: expression -  -3.402823E+38 through -1.401298E-45 for negative values; 1.401298E-45 
        ' through 3.402823E+38 for positive values
        '
        ' Result: Single - 32-bit (4-byte) single-precision floating-point numbers  
        '
        '
        '****************************************************************************************
        ' This example is from http://idealprogrammer.com
 
        Console.WriteLine("Example #1: 	CSng(expression)")
 
        Dim Single1 As Single = CSng(1.33)
 
        Console.WriteLine(Single1) ' Returns 1.33
 
        'write blank line to make output easier to read
        Console.WriteLine()
 
        Console.WriteLine("Example #2: 	CSng(expression)")
 
        Dim Single2 As Single = CSng(-3.4)
 
        Console.WriteLine(Single2) ' Returns -3.4
        'write blank line to make output easier to read
        Console.WriteLine()
 
        Console.WriteLine("Example #3: 	CSng(expression)")
 
        Dim Single3 As Single = CSng(5.5)
 
        Console.WriteLine(CSng(Single3)) ' Returns 5.5
 
        'Prevent console from closing before you press enter
        Console.ReadLine()
 
    End Sub
 
End Class

Step 2: Click Visual Basic to Cut-n-paste code into Module1.vb

Module Module1
 
    Sub Main()
 
 
        Dim myclsCSng As New clsCSng
        myclsCSng.Main()
 
 
 
    End Sub
 
End Module

Prerequistes:

  1. Install Visual Basic (Express or Standard Edition)
  2. Install SQL Server Express
  3. Download Northwind and pubs Database
  4. Attach Northwind Database to Databases in Sql Express
  5. Attach pubs 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:
VB.NET Syntax Functions CSng

  1. Use Visual Basic 2010 Express or Standard Edition
  2. Create new project;
    • Click File/New Project
    • Select Console Application Template
    • Select Visual Basic for Language
    • name of project could be VBNET_Syntax.
  3. Add New folder named “Functions”
    • Right-click project name in solution explorer;
    • add new folder;
    • name of folder could be: Functions
  4. Add New subfolder named “ConversionFunctions”
    • Right-click Functions folder in solution explorer;
    • add new folder;
    • name of folder could be: ConversionFunctions
  5. Add New subfolder named “TypeConversionFunctions”
    • Right-click ConversionFunctions folder in solution explorer;
    • add new folder;
    • name of folder could be: TypeConversionFunctions
  6. Add Class Named clsCSng to TypeConversionFunctions folder
    • Right-click TypeConversionFunctions folder;
    • add new item;
    • Select class
    • Class name could be clsCSng
  7. Click on Visual Basic in code in step 1 above to copy code into clsCSng.vb
  8. Click on Visual Basic in code in step 2 above to copy code into Module1.vb
  9. Click green arrow or press F5 to run program