ACC2000: Removing All Pages from Tab Control Removes the Control (200595)


The information in this article applies to:

  • Microsoft Access 2000
This article was previously published under Q200595
Moderate: Requires basic macro, coding, and interoperability skills.

This article applies to a Microsoft Access database (.mdb) and to a Microsoft Access project (.adp).

SYMPTOMS

When you modify a tab control in Microsoft Access, either manually or with Visual Basic for Applications code, if you delete the last page of the tab control, the control itself is also removed from the form.

RESOLUTION

If you programmatically remove all pages from a tab control so that you can rebuild them, after you remove the last page from the control, you can use the CreateControl method to create a new tab control with two pages on it. Then you can set the properties for the new control and manipulate its pages.

For more information about the CreateControl method, in the Visual Basic Editor, click Microsoft Visual Basic Help on the Help menu, type CreateControl, CreateReportControl methods in the Office Assistant or the Answer Wizard, and then click Search to view the topic.

MORE INFORMATION

Microsoft provides programming examples for illustration only, without warranty either expressed or implied. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. This article assumes that you are familiar with the programming language that is being demonstrated and with the tools that are used to create and to debug procedures. Microsoft support engineers can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific requirements. CAUTION: If you follow the steps in this example, you modify the sample database Northwind.mdb. You may want to back up the Northwind.mdb file and follow these steps on a copy of the database.

Steps to Reproduce Behavior

  1. Start Microsoft Access and open the sample database Northwind.mdb.
  2. Create a new form not based on any table or query in Design view.
  3. Click the Tab Control button on the Toolbox toolbar, and then click in the detail section of the form. A tab control containing two pages appears on the form.
  4. Set the Name property of the tab control to axTabCtl.
  5. Save the form as frmTestTab, but do not close the form.

    Note there are two pages on the tab control.
  6. Create a new module and type the following procedure:
    Function RemoveTabs(c as TabControl)

   Dim i as Integer
   For i = c.Pages.Count - 1 to 0 Step -1
      c.Pages.Remove
   Next i

End Function
  7. Save the module as basTestTab, and then close it.
  8. Press CTRL+G to open the Immediate window.
  9. Type the following line in the Immediate window, and then press ENTER:
    ?RemoveTabs(Forms![frmTestTab]![axTabCtl])
  10. On the File menu, click Close and Return to Microsoft Access.

    Note that the tab control is no longer on the form.

REFERENCES

For more information about the tab control, click Microsoft Access Help on the Help menu, type What is a tab control in the Office Assistant or the Answer Wizard, and then click Search to view the topics returned.
Modification Type:MajorLast Reviewed:6/23/2005
Keywords:kbdta kbprb KB200595
©2004 Microsoft Corporation. All rights reserved.