Writing VBA Function Procedures : Function « Language Basics « VBA / Excel / Access / Word

1.	Access
2.	Application
3.	Data Type
4.	Data Type Functions
5.	Date Functions
6.	Excel
7.	File Path
8.	Forms
9.	Language Basics
10.	Math Functions
11.	Outlook
12.	PowerPoint
13.	String Functions
14.	Windows API
15.	Word
16.	XML

Microsoft Office PowerPoint 2007 Tutorial

Microsoft Office Excel 2007 Tutorial

Microsoft Office Word 2007 Tutorial

VBA / Excel / Access / Word » Language Basics » Function

Writing VBA Function Procedures

 

Private Sub Main2()

    Dim num1 As Double

    Dim myRoot As Double

    num1 = 10

    myRoot = SqRoot(num1)

    myRoot = Format(myRoot, "#0.00")

    MsgBox "The square root of " & num1 & "is " & myRoot

End Sub

Public Function SqRoot(ByVal num1 As Double) As Double

    num1 = Sqr(num1)

    SqRoot = num1

End Function

Related examples in the same category

1.	A function returns a value to whomever called it. We can recast the previous sub into a function as follows:
2.	Call user-defined function in MsgBox
3.	Executing a Function Procedure from a Subroutine
4.	A function returns a value to whomever called it.
5.	One of simplest possible custom functions
6.	function takes two arguments's length and width's and calculates the total area by multiplying them together
7.	Convert Fahrenheit To Celsius
8.	Use ElseIf in a function
9.	Select Case in a function
10.	A function with one argument

java2s.com |

| Contact Us | Privacy Policy

All other trademarks are property of their respective owners.