IBM Lotus Symphony
|
在所创建对话框的 Lotus® Symphony™ 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)。