Public Function GetRegistryInt( _
   ByVal lpszSection As String, _
   ByVal lpszEntry As String, _
   ByVal nDefault As Long _
) As Long