Plug-Ins/Form1.frm

VERSION 5.00
Begin VB.Form Form1
   Caption         =   "Form1"
   ClientHeight    =   3075
   ClientLeft      =   60
   ClientTop       =   465
   ClientWidth     =   4695
   LinkTopic       =   "Form1"
   ScaleHeight     =   3075
   ScaleWidth      =   4695
   StartUpPosition =   3 'Windows‑Standard
   Begin VB.CommandButton Command1
      Caption         =   "use plug‑In MsgBox"
      Height          =   435
      Left            =   2580
      TabIndex        =   0
      Top             =   2580
      Width           =   2055
   End
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit
'(c)2003, 2004 by Louis.
'
'Downloaded from www.louis‑coder.com.
'
'This project (Project1.vbp, PlugInTest.vbp) demonstrates how easy plus‑ins can be created
'using Visual Basic. Just create an ActiveX dll, and set the project name to the name of
'the plug‑in (see PlugInTest.vbp, check also Project‑>Properties of PlugInTest.dll).
'The dll can be located in the directory of the app that uses the plug‑in.
'If this sample here does not work (CreateObject() fails), then please re‑compile the dll.

Private Sub Command1_Click()
    'on error resume next
    Dim TempObject As Object
    'begin
    Set TempObject = CreateObject("PlugInTest.MsgBoxcls") 'STRING passed, could be read out of a file (.inf‑file of plug‑in) or entered by user
    Call TempObject.CreateMsgBox
End Sub


[END OF FILE]