VB.NET CDec Example – Code Sample Syntax
VB.NET CDec Example – Code Sample Syntax
Purpose: – Illustrates using VB.NET CDec Code Example.
Description:
Converts positive and negative numbers into decimal data type
Syntax:
CDec(expression)
CDec(expression)
Parameters | Description | expression | +/-79,228,162,514,264,337,593,543,950,335 for zero-scaled numbers, i.e., numbers with no decimal places. For numbers with 28 decimal places, the range is +/-7.9228162514264337593543950335. The smallest possible non-zero number is 0.0000000000000000000000000001 (+/-1E-28). |
---|
Result Data Type | Description | decimal | returns decimal |
---|
Step 1: Click Visual Basic to Cut-n-paste code into clsCDec.vb
Public Class clsCDec Public Sub Main() '**************************************************************************************** ' Purpose: Converts positive and negative numbers into decimal data type ' ' Range: +/-79,228,162,514,264,337,593,543,950,335 for zero-scaled numbers, i.e., ' numbers with no decimal places. For numbers with 28 decimal places, ' the range is +/-7.9228162514264337593543950335. The smallest possible non-zero ' number is 0.0000000000000000000000000001 (+/-1E-28). ' ' Syntax: CDec(expression) ' ' Parameter1: expression - +/-79,228,162,514,264,337,593,543,950,335 for zero-scaled numbers, i.e., ' numbers with no decimal places. For numbers with 28 decimal places, ' the range is +/-7.9228162514264337593543950335. The smallest possible non-zero ' number is 0.0000000000000000000000000001 (+/-1E-28). ' ' Result: decimal - returns decimal ' ' '**************************************************************************************** ' This example is from http://idealprogrammer.com Console.WriteLine("Example #1: CDec(expression)") Dim decimal1 As Decimal = CDec(1.33) Console.WriteLine(decimal1) ' Returns 1.33 'write blank line to make output easier to read Console.WriteLine() Console.WriteLine("Example #2: CDec(expression)") Dim decimal2 As Decimal = CDec(-3.4) Console.WriteLine(decimal2) ' Returns -3.4 'write blank line to make output easier to read Console.WriteLine() Console.WriteLine("Example #3: CDec(expression)") Dim Decimal3 As Decimal = CDec(5) Console.WriteLine(CDec(Decimal3)) ' Returns 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 myclsCDec As New clsCDec myclsCDec.Main() End Sub End Module |
Prerequistes:
- Install Visual Basic (Express or Standard Edition)
- Install SQL Server Express
- Download Northwind and pubs Database
- Attach Northwind Database to Databases in Sql Express
- 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:
- Use Visual Basic 2010 Express or Standard Edition
- Create new project;
- Click File/New Project
- Select Console Application Template
- Select Visual Basic for Language
- name of project could be VBNET_Syntax.
- Add New folder named “Functions”
- Right-click project name in solution explorer;
- add new folder;
- name of folder could be: Functions
- Add New subfolder named “ConversionFunctions”
- Right-click Functions folder in solution explorer;
- add new folder;
- name of folder could be: ConversionFunctions
- Add New subfolder named “TypeConversionFunctions”
- Right-click ConversionFunctions folder in solution explorer;
- add new folder;
- name of folder could be: TypeConversionFunctions
- Add Class Named clsCDec to TypeConversionFunctions folder
- Right-click TypeConversionFunctions folder;
- add new item;
- Select class
- Class name could be clsCDec
- Click on Visual Basic in code in step 1 above to copy code into clsCDec.vb
- Click on Visual Basic in code in step 2 above to copy code into Module1.vb
- Click green arrow or press F5 to run program