Simple dialog creates error, only the first time

[ChillWill]

I created a dialog box using the GUI (drawing the button and label box on the rectangle, etc.)

Here is the code that calls the dialog box:

[code]Sub ShowWarningDialog()
Dim oDialog as Object
oDialog = createUnoDialog(DialogLibraries.Standard.Dialog1)
oDialog.execute()
End sub [/code]

The first time the dialog gets called, this error message appears:

[code]BASIC runtime error.
An exception occurred
Type: com.sun.star.lang.WrappedTargetException
Message:
TargetException:
Type: com.sun.star.script.LibraryNotLoadedException
Message: .[/code]

The next time the dialog gets called, it works fine. I have tried adding various loadlibrary statements in Sub Main and in subShowWarningDialog (quoted above) but it's not working. For one thing, I don't know what library needs to be loaded.

Thanks for any ideas.