通过程序代码打开对话框

在创建的对话框所在的 LibreOffice BASIC 窗口中，单击该对话框所在模块的名称选项卡可以保留该对话框编辑器。名称选项卡位于窗口底部。

输入以下代码，生成名为 Dialog1Show 的子例行程序。在本例中，创建的对话框名为 "Dialog1"：

Sub Dialog1Show

    BasicLibraries.LoadLibrary("Tools")

    oDialog1 = LoadDialog("Standard", "Dialog1")

    oDialog1.Execute()

End Sub

如果不使用 "LoadDialog"，可以通过以下方法调用代码：

Sub Dialog1Show

    DialogLibraries.LoadLibrary("Standard")

    oDialog1 = CreateUnoDialog( DialogLibraries.Standard.Dialog1 )

    oDialog1.Execute()

End Sub

当执行此代码时，将打开 "Dialog1" 对话框。要关闭该对话框，请单击标题栏右上角的 x。