CodeWidgets.com: Online Source Code Library: C#, ASP, ASP.NET, VB, VB.NET, VB Script, Microsoft Access, Excel, JavaScript, J Script, XML, VBScript, Website Design, DevExpress Components, Reporting, Application and Website Templates.

Widget #CS0066

Centralized OpenForm Function for Microsoft Access 2000-2016

Format and License Info?

Free

Microsoft® Access 97, 2000, XP

Public Function OpenForm(ByVal FormName As String, ByVal Mode As AcFormOpenDataMode, Optional Criteria As String) As Boolean
On Error GoTo errTrap
DoCmd.OpenForm "FormName", , , Criteria, Mode
OpenForm = True
Exit Function
errTrap:
OpenForm = False
    MsgBox Err.Number & " " & Err.Description, vbOKOnly, "Sorry " & CurrentUser & " there was an error!"
End Function

Last Updated: 4/27/2018


Related Widgets 
Price 
# 
CS0002 Adding a Default value of zero in a lookup Query (SQL Server)$0.00Add To Cart
CS0055 Create a function that returns multiple values. VB.Net$0.00Add To Cart
CS0001 Universal Navigation Buttons (Microsoft® Access)$10.00Add To Cart

Recently Viewed Widgets 
Price 
# 
No data to display

Collapse/Expand
Format

Download

Online Purchase And Pickup

Collapse/Expand
License

License

PromoWare

Single Developer Licence.
Re-Distribution Permitted only as part of a compiled Application.This source code is provided to you "as is" without warranty.
CLICK HERE FOR TERMS OF USE
Copyright 2000-2018 CodeWidgets.com and Comrie Software Solutions

This website uses Cookies to store User information and Shopping Cart Items for the duration of your visit to CodeWidgets.com.

No Credit Card or Financial information is stored by CodeWidgets.com. Click Here For Our Complete Privacy Policy and Terms of Use.

I Understand