IBM Lotus Symphony
|
Forlad dialogbokseditoren i Lotus® Symphony™ Basic-vinduet for en dialogboks, du har oprettet, ved at klikke på fanen med navnet på det modul, dialogboksen er tilknyttet. Fanen med navnet findes nederst i vinduet.
Angiv følgende kode til en underrutine ved navn VisDialog1. I eksemplet bruges "Dialog1" som navnet på den dialogboks, du har oprettet:
Sub VisDialog1
BasicLibraries.LoadLibrary("Tools")
oDialog1 = LoadDialog("Standard", "Dialog1")
oDialog1.Execute()
End Sub
Du kan kalde koden på følgende måde uden at bruge "LoadDialog":
Sub VisDialog1
DialogLibraries.LoadLibrary( "Standard" )
oDialog1 = CreateUnoDialog( DialogLibraries.Standard.Dialog1 )
oDialog1.Execute()
End Sub
Når du udfører denne kode, vises "Dialog1". Klik på knappen Luk (x) på dialogboksens titellinje, når du vil lukke dialogboksen.