VB做的管理系统 使用前先注册一下SmartMenuXP.dll
源代码在线查看: frmsplash.frm
VERSION 5.00
Begin VB.Form frmSplash
BackColor = &H00FFFFFF&
BorderStyle = 1 'Fixed Single
ClientHeight = 4500
ClientLeft = 15
ClientTop = 15
ClientWidth = 6000
ControlBox = 0 'False
Icon = "frmSplash.frx":0000
KeyPreview = -1 'True
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
Moveable = 0 'False
Palette = "frmSplash.frx":1CFA
PaletteMode = 2 'Custom
Picture = "frmSplash.frx":1DAB6
ScaleHeight = 4500
ScaleWidth = 6000
StartUpPosition = 2 '屏幕中心
End
Attribute VB_Name = "frmSplash"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub Form_Click()
Unload Me
frmMain.Show
End Sub