Microsoft KB Archive/137116

From BetaArchive Wiki

Article ID: 137116

Article Last Modified on 10/11/2006



APPLIES TO

  • Microsoft Access 95 Standard Edition



This article was previously published under Q137116

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

IMPORTANT: This article contains information about modifying the registry. Before you modify the registry, make sure to back it up and make sure that you understand how to restore the registry if a problem occurs. For information about how to back up, restore, and edit the registry, click the following article number to view the article in the Microsoft Knowledge Base:

256986 Description of the Microsoft Windows Registry


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: If you use Registry Editor incorrectly, you may cause serious problems that may require you to reinstall your operating system. Microsoft cannot guarantee that you can solve problems that result from using Registry Editor incorrectly. Use Registry Editor at your own risk.

  1. Start the Registry Editor. To do so, click the Start button, click Run, and then type regedit in the Run dialog box. Click OK.
  2. In the Registry Editor dialog box, locate the following key:

    HKEY_CURRENT_USER

  3. 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.
  4. Under Name, type the following name for the new DWORD value:

    ExprsInToolbars

  5. Select the "ExprsInToolbars" DWORD, and right-click the Modify command.
  6. In the Edit DWORD Value box, enter 1 as the value data, and then click OK.
  7. Close the Registry Editor.

Creating the Visual Basic Function

To create the Visual Basic function, follow these steps:

  1. Start Microsoft Access and open any database.
  2. Create a module and type the following line in Declarations section if it's not already there:

    Option Explicit
                        
  3. Type the following procedure:

          Function Test()
             MsgBox "Hello!"
          End Function
                        
  4. Close and save the new module.

Creating the Custom Toolbar Button

To create the custom toolbar button, follow these steps:

  1. In the Database window, right-click the toolbar and click Customize.
  2. 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.
  3. Type the following expression in the Expression text box:

    Test()

    NOTE: Do not precede the expression with an equal sign (=).
  4. Drag the Expression text box to the toolbar.

    NOTE: The toolbar must be docked.
  5. 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.
  6. Close the Customize Toolbars box.
  7. 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

Keywords: kbhowto kbprogramming kbui KB137116