ACC95: How to Run a Function from a Custom Toolbar Button

ID: Q137116

The information in this article applies to:

Microsoft Access 7.0

IMPORTANT: This article contains information about editing the registry. Before you edit the registry, make sure you understand how to restore it if a problem occurs. For information about how to do this, view the "Restoring the Registry" Help topic in Regedit.exe or the "Restoring a Registry Key" Help topic in Regedt32.exe.

Advanced: Requires expert coding, interoperability, and multiuser skills.

SUMMARY

This article describes how to run a Visual Basic for Applications function or expression from a button on a custom toolbar. The method involves three general steps:

Modifying the Windows 95 Registry to allow expressions in custom toolbars.

Creating a Visual Basic function.

Creating a custom toolbar button that calls the function.

This article assumes that you are familiar with Visual Basic for Applications and with creating Microsoft Access applications using the programming tools provided with Microsoft Access. For more information about Visual Basic for Applications, please refer to the "Building Applications with Microsoft Access for Windows 95" manual.

MORE INFORMATION

Modifying the Windows 95 Registry

To modify the Windows 95 registry to allow expressions in custom toolbars, follow these steps.

WARNING: Using Registry Editor incorrectly can cause serious problems that may require you to reinstall your operating system. Microsoft cannot guarantee that problems resulting from the incorrect use of Registry Editor can be solved. Use Registry Editor at your own risk.

For information about how to edit the registry, view the "Changing Keys and Values" Help topic in Registry Editor (Regedit.exe) or the "Add and Delete Information in the Registry" and "Edit Registry Data" Help topics in Regedt32.exe. Note that you should back up the registry before you edit it. If you are running Windows NT, you should also update your Emergency Repair Disk (ERD).

Start the Registry Editor. To do so, click the Start button, click Run, and then type regedit in the Run dialog box. Click OK.

In the Registry Editor dialog box, locate the following key:

HKEY_CURRENT_USER

Double-click HKEY_CURRENT_USER; double click Software; double-click Microsoft; double-click Access; double-click 7.0; and then select Settings. Using the right mouse button (right-click), click Settings, point to New on the menu that appears, and then click DWORD value on the menu that appears.

Under Name, type the following name for the new DWORD value:

ExprsInToolbars

Select the "ExprsInToolbars" DWORD, and right-click the Modify command.

In the Edit DWORD Value box, enter 1 as the value data, and then click OK.

Close the Registry Editor.

Creating the Visual Basic Function

To create the Visual Basic function, follow these steps:

Start Microsoft Access and open any database.

Create a module and type the following line in Declarations section if it's not already there:


Option Explicit

Type the following procedure:


      Function Test()
         MsgBox "Hello!"
      End Function

Close and save the new module.

Creating the Custom Toolbar Button

To create the custom toolbar button, follow these steps:

In the Database window, right-click the toolbar and click Customize.

In the Customize Toolbar box, scroll through the list of categories and select Expression.

NOTE: If Expression does not appear in the list, please see the "Modifying the Windows Registry" section of this article for information on how to add this item to the list.

Type the following expression in the Expression text box:
Test()
NOTE: Do not precede the expression with an equal sign (=).

Drag the Expression text box to the toolbar.

NOTE: The toolbar must be docked.

If you want to change the button's icon, right-click the new button on the toolbar, and then click Choose Button Image. Select a different button, and then click OK.

Close the Customize Toolbars box.

Click the custom button on the toolbar. Note that you receive the "Hello!" message that you created in the Test() function.

REFERENCES

Microsoft Access "Building Applications with Microsoft Access for Windows 95," version 7.0, Chapter 1, "Creating an Application," pages 22-24

Additional query words:

Keywords : kbprg kbui kbdta AccCon
Version : WINDOWS:7.0
Platform : WINDOWS
Issue type : kbhowto