对vb登录界面的设计,是一个比较好的界面设计

				VERSION 5.00
				Begin VB.Form Form1 
				   BorderStyle     =   1  'Fixed Single
				   Caption         =   "成功！"
				   ClientHeight    =   3540
				   ClientLeft      =   45
				   ClientTop       =   330
				   ClientWidth     =   3810
				   Icon            =   "ok.frx":0000
				   KeyPreview      =   -1  'True
				   LinkTopic       =   "Form1"
				   MaxButton       =   0   'False
				   MinButton       =   0   'False
				   Moveable        =   0   'False
				   ScaleHeight     =   3540
				   ScaleWidth      =   3810
				   StartUpPosition =   2  '屏幕中心
				   Begin VB.PictureBox Picture1 
				      AutoSize        =   -1  'True
				      BorderStyle     =   0  'None
				      Height          =   2250
				      Left            =   720
				      Picture         =   "ok.frx":27A2
				      ScaleHeight     =   2250
				      ScaleWidth      =   2250
				      TabIndex        =   1
				      Top             =   240
				      Width           =   2250
				   End
				   Begin VB.Label Label2 
				      AutoSize        =   -1  'True
				      Caption         =   "按任意键进入！"
				      BeginProperty Font 
				         Name            =   "宋体"
				         Size            =   14.25
				         Charset         =   134
				         Weight          =   700
				         Underline       =   0   'False
				         Italic          =   0   'False
				         Strikethrough   =   0   'False
				      EndProperty
				      ForeColor       =   &H00FF0000&
				      Height          =   285
				      Left            =   840
				      TabIndex        =   2
				      Top             =   3120
				      Width           =   2115
				   End
				   Begin VB.Label Label1 
				      AutoSize        =   -1  'True
				      Caption         =   "密码正确!"
				      BeginProperty Font 
				         Name            =   "宋体"
				         Size            =   15.75
				         Charset         =   134
				         Weight          =   700
				         Underline       =   0   'False
				         Italic          =   0   'False
				         Strikethrough   =   0   'False
				      EndProperty
				      ForeColor       =   &H00FF0000&
				      Height          =   315
				      Left            =   1080
				      TabIndex        =   0
				      Top             =   2640
				      Width           =   1515
				   End
				End
				Attribute VB_Name = "Form1"
				Attribute VB_GlobalNameSpace = False
				Attribute VB_Creatable = False
				Attribute VB_PredeclaredId = True
				Attribute VB_Exposed = False
				Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
				End
				End Sub