VB.NET Acos Example – Code Sample Syntax
VB.NET Acos Example – Code Sample Syntax
Purpose: – Illustrates using VB.NET Acos Code Example.
Purpose:
takes a cosine as double data type number and returns
a double value that represents the angle in radians (you can convert
the radians to degrees by multiplying them by Math.PI/180)
Syntax:
Acos(double)
Acos(double)
Parameters | Description | double | Any valid System.Double data type number between -1 and +1 – this represents the cosine that is to be converted into radians for an angle. if number < -1 or > 1, NaN is returned – NaN stands for Not a Number |
---|
Result Data Type | Description | double | an angle measured in radians. The angle must be between 0 and pie. |
---|
Step 1: Click Visual Basic to Cut-n-paste code into clsAcos.vb
Imports System.Math Public Class clsAcos Public Sub Main() '******************************************************************************** ' Purpose: takes a cosine as double data type number and returns ' a double value that represents the angle in radians (you can convert ' the radians to degrees by multiplying them by Math.PI/180) ' ' Range: Any valid System.Double data type number between -1 and +1 ' if number < -1 or > 1, NaN is returned - NaN stands for Not a Number ' ' Syntax: Acos(double) ' ' Parameter1: double - Any valid System.Double data type number between -1 and +1 ' - this represents the cosine that is to be converted into radians for an angle. ' if number < -1 or > 1, NaN is returned - NaN stands for Not a Number ' ' Result: double - an angle measured in radians. The angle must be between 0 and pie. ' ' '******************************************************************************** ' This example is from http://idealprogrammer.com Console.WriteLine("Example #1: Acos(double)") Console.WriteLine(Acos(90)) ' Returns NaN 'write blank line to make output easier to read Console.WriteLine() Console.WriteLine("Example #2: Acos(double)") Console.WriteLine(Acos(-3.4)) ' Returns NaN 'write blank line to make output easier to read Console.WriteLine() Console.WriteLine("Example #3: Acos(double)") Dim Integer3 As Integer = Acos(-0) Console.WriteLine(Acos(-0)) ' Returns 1.5707963267949 '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 myclsAcos As New clsAcos myclsAcos.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 “MathFunctions”
- Right-click Functions folder in solution explorer;
- add new folder;
- name of folder could be: MathFunctions
- Add Class Named clsAcos to MathFunctions folder
- Right-click MathFunctions folder;
- add new item;
- Select class
- Class name could be clsAcos
- Click on Visual Basic in code in step 1 above to copy code into clsAcos.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