Beginning Access™ 2007 VBA

13.5. Building the Standard Modules

In the previous section, you created the properties and methods for the Project and Contact objects. In this section, you begin writing the code in the standard modules that conduct a lot of the business logic and data access features for the application. Let's start with building the standard modules.

Try It Out: Building the modBusinessLogic and modDatabaseLogic Modules The modBusinessLogic module is one of two standard modules you will be creating. The other one is the modDatabaseLogic that will contain calls that are specific to the database. The modBusinessLogic module will not contain any database access calls because you want to keep the data access code in a separate module to make maintenance and future growth easier. You will now turn to the task of creating these modules. Insert a new standard module called modBusinessLogic. Add the following code to the General Declarations of the module: Option Compare Database Option Explicit Public intContactProjectLookup As Integer Public intContactProjectAdd As Integer Const BUS_LOGIC As String = "modBusinessLogic" Private Declare Function GetOpenFileName Lib "comdlg32.dll" Alias _ "GetOpenFileNameA" (pOpenfilename As OPENFILENAME) As Long Private Type OPENFILENAME lStructSize As Long hwndOwner As Long hInstance As Long lpstrFilter As String lpstrCustomFilter As String nMaxCustFilter As Long nFilterIndex As Long lpstrFile As String nMaxFile As Long lpstrFileTitle As String nMaxFileTitle As Long ...