frmmsg.frm

经过几个月的设计和开发

VERSION 5.00
Begin VB.Form frmMsg 
   Appearance      =   0  'Flat
   AutoRedraw      =   -1  'True
   BackColor       =   &H00FFFFFF&
   BorderStyle     =   0  'None
   Caption         =   "友情提示"
   ClientHeight    =   2880
   ClientLeft      =   6090
   ClientTop       =   4320
   ClientWidth     =   4110
   Icon            =   "frmMsg.frx":0000
   LinkTopic       =   "Form8"
   ScaleHeight     =   192
   ScaleMode       =   3  'Pixel
   ScaleWidth      =   274
   ShowInTaskbar   =   0   'False
   Begin 计算机图书管理系统2008.xp_canvas Msgbox 
      Height          =   1575
      Left            =   0
      TabIndex        =   0
      Top             =   720
      Width           =   4095
      _ExtentX        =   7223
      _ExtentY        =   2778
      Begin VB.TextBox Text1 
         Appearance      =   0  'Flat
         BackColor       =   &H00C0FFFF&
         BorderStyle     =   0  'None
         ForeColor       =   &H00000000&
         Height          =   270
         Left            =   1080
         TabIndex        =   1
         Top             =   480
         Width           =   2175
      End
      Begin 计算机图书管理系统2008.xptopbuttons xptopbuttons1 
         Height          =   315
         Left            =   3600
         Top             =   120
         Width           =   315
         _ExtentX        =   556
         _ExtentY        =   556
      End
      Begin VB.Image info 
         Height          =   480
         Left            =   120
         Picture         =   "frmMsg.frx":0CCA
         Top             =   240
         Visible         =   0   'False
         Width           =   480
      End
      Begin VB.Image error 
         Height          =   480
         Left            =   120
         Picture         =   "frmMsg.frx":1994
         Top             =   240
         Visible         =   0   'False
         Width           =   480
      End
      Begin VB.Image notice 
         Height          =   480
         Left            =   120
         Picture         =   "frmMsg.frx":265E
         Top             =   240
         Visible         =   0   'False
         Width           =   480
      End
   End
   Begin VB.Image Image2 
      Height          =   675
      Left            =   0
      Picture         =   "frmMsg.frx":3328
      Top             =   0
      Width           =   7305
   End
   Begin VB.Image Image1 
      Height          =   1815
      Left            =   -720
      Picture         =   "frmMsg.frx":DEFA
      Top             =   2280
      Width           =   15750
   End
End
Attribute VB_Name = "frmMsg"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False


Private Sub xpcmdbutton1_Click()

End Sub

Private Sub xptopbuttons1_Click()
Unload Me
End Sub