Need some help on creating an addin using UsysRegInfo

[FancyPrairie]

I have created several different wizards using UsysRegInfo. And they all work fine. The problem they all have in common is that when I exit my Access Db, the wizard database (one that contains the table UsysRegInfo) continues to run. I have to use the task manager to kill the wizard database after one of the wizards run. I can see the database but can not exit out or do anything in it until I kill it. I've been dealing with this for quite some time, because the wizard had so many components I figured I was leaving something open some place. But it is too large to try to dig in to it. However, I have created another wizard that only opens a dialog form, then opens another form (hidden) that is specified by the user. The wizard than scans through all of the properties of the hidden form, saves the info and the hidden form is then closed. I then close the Wizard dialog form. I can exit the database that called the wizard but the wizard database continues to run. What am I missing?

Here is my UsysRegInfo table:

HKEY_CURRENT_ACCESS_PROFILE\Menu Add-Ins\my wizard 0
HKEY_CURRENT_ACCESS_PROFILE\Menu Add-Ins\my wizard 1 expression =myfunction()
HKEY_CURRENT_ACCESS_PROFILE\Menu Add-Ins\my wizard 1 Library |ACCDIR\MyWizardDb.accda

"myfunction" looks like this

Function myfunction(Optional var1 As Variant, Optional var2 As Variant, Optional var3 As Variant)

On Error Resume Next

DoCmd.OpenForm "frmMMCPCWz_AccessToWebConversion", , , , , acDialog

If (Err.Number <> 0) Then MsgBox Err.Number & vbCrLf & Err.Description

End Function