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

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