access vba develop a global variable code example

Example: excel vba how to declare a global variable

'In VBA, GLOBAL variables must be declared ABOVE all procedures in a module:

Public MyGlobalString As String				'<-- global to ALL modules
Private MyGlobalLong As Long				'<-- global to THIS module (Private)
Public Const HELP As String = "Press F1"	'<-- global to ALL modules

Sub Add(a, b)
	MyGlobalLong = a + b
End Sub

Call Add(7, 2)			
MsgBox MyGlobalLong		'<--displays: 9
MsgBox Help				'<--displays: Press F1

'
'
'