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]