LOTUSSCRIPT /COM/OLE のクラス
Sub Click(Source As Button) Dim uiws As New NotesUIWorkspace If (uiws.IsInCompositeApp) Then Msgbox "This is a component in a composite application" Else Msgbox "This is not a component in a composite application" End If End Sub 関連項目