Plug-Ins/MsgBoxcls.cls

VERSION 1.0 CLASS
BEGIN
  MultiUse = ‑1 'True
  Persistable = 0 'NotPersistable
  DataBindingBehavior = 0 'vbNone
  DataSourceBehavior  = 0 'vbNone
  MTSTransactionMode  = 0 'NotAnMTSObject
END
Attribute VB_Name = "MsgBoxcls"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = True
Option Explicit
'(c)2003, 2004 by Louis. View Project1 (in this directory) for further information.

Public Sub CreateMsgBox()
    'on error resume next
    MsgBox "PEACE FOR ALL", vbOKOnly + vbInformation
End Sub


[END OF FILE]