VERSION 5.00
Begin VB.Form Form1 
   AutoRedraw      =   -1  'True
   Caption         =   "Form1"
   ClientHeight    =   6270
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   7695
   DrawStyle       =   5  'Transparent
   FillStyle       =   0  'Solid
   BeginProperty Font 
      Name            =   "隶书"
      Size            =   48
      Charset         =   134
      Weight          =   400
      Underline       =   0   'False
      Italic          =   0   'False
      Strikethrough   =   0   'False
   EndProperty
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   Picture         =   "v6j02-04.frx":0000
   ScaleHeight     =   6270
   ScaleWidth      =   7695
   StartUpPosition =   2  '屏幕中心
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub Form_Click()
   Caption = "鼠标单击"
   Print "欢迎使用VB"
End Sub

Private Sub Form_DblClick()
    Caption = "鼠标双击"
    Picture = LoadPicture("")
    Print "结束使用VB"
End Sub

Private Sub Form_Load()
    Caption = "装入窗体"
    Picture = LoadPicture(App.Path + "\window.jpg")
    FontSize = 48
    FontName = "隶书"
    Print "装入窗体"
End Sub
