End Function

The End Function statement ends a program or a block of statements within a function. A CitectVBA function starts with the FUNCTION statement and finishes with the END FUNCTION statement. All other statements that lie between the FUNCTION and END FUNCTION statements will be executed by the function when called to do so.

Syntax

End {Function | Sub | If}

Related Functions

Call | Sub | End Sub | Exit

Example

Function GetColor2( c% ) As Long

	GetColor2 = c% * 25

	If c% > 2 Then

		GetColor2 = 255		' 0x0000FF - Red

	End If

	If c% > 5 Then

		GetColor2 = 65280	' 0x00FF00 - Green

	End If

	If c% > 8 Then

		GetColor2 = 16711680	' 0xFF0000 - Blue

	End If

End Function



Sub TestColor2

	Dim I as integer

	For I = 1 to 10

		Print GetColor2(I)

	Next I

End Sub