frmwelcome.frm

来自「VB 编写的"华成POS管理系统",代码全,没有进行测试,数据库全,有兴趣的朋友」· FRM 代码 · 共 33 行

VERSION 5.00
Begin VB.Form frmWelcome 
   BackColor       =   &H00FDFDFD&
   Caption         =   "欢迎使用本系统"
   ClientHeight    =   6570
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   8970
   ControlBox      =   0   'False
   Icon            =   "frmWelcome.frx":0000
   LinkTopic       =   "Form1"
   MDIChild        =   -1  'True
   Picture         =   "frmWelcome.frx":000C
   ScaleHeight     =   438
   ScaleMode       =   3  'Pixel
   ScaleWidth      =   598
   WindowState     =   2  'Maximized
End
Attribute VB_Name = "frmWelcome"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False

Private Sub Form_Load()
    Me.WindowState = 2
End Sub

Private Sub Form_Resize()
On Error Resume Next
    imgBack.Move (Width / 15 - imgBack.Width) / 2, (Height / 15 - imgBack.Height) / 2
End Sub