画图板.frm

基于Visual Basic 6.0的画图板设计

VERSION 5.00
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX"
Begin VB.Form Form1 
   Caption         =   "画图板"
   ClientHeight    =   8025
   ClientLeft      =   165
   ClientTop       =   735
   ClientWidth     =   8280
   LinkTopic       =   "Form1"
   ScaleHeight     =   8025
   ScaleWidth      =   8280
   StartUpPosition =   3  '窗口缺省
   Begin VB.Frame Frame3 
      Caption         =   "线宽"
      Height          =   1695
      Left            =   120
      TabIndex        =   26
      Top             =   4560
      Width           =   1215
      Begin VB.OptionButton Option2 
         Caption         =   "Option2"
         Height          =   255
         Index           =   3
         Left            =   120
         TabIndex        =   30
         Top             =   1320
         Width           =   255
      End
      Begin VB.OptionButton Option2 
         Caption         =   "Option2"
         Height          =   255
         Index           =   2
         Left            =   120
         TabIndex        =   29
         Top             =   960
         Width           =   255
      End
      Begin VB.OptionButton Option2 
         Caption         =   "Option2"
         Height          =   255
         Index           =   1
         Left            =   120
         TabIndex        =   28
         Top             =   600
         Width           =   255
      End
      Begin VB.OptionButton Option2 
         Caption         =   "Option2"
         Height          =   255
         Index           =   0
         Left            =   120
         TabIndex        =   27
         Top             =   240
         Width           =   255
      End
      Begin VB.Line Line4 
         BorderWidth     =   10
         X1              =   480
         X2              =   960
         Y1              =   1440
         Y2              =   1440
      End
      Begin VB.Line Line3 
         BorderWidth     =   6
         X1              =   480
         X2              =   960
         Y1              =   1080
         Y2              =   1080
      End
      Begin VB.Line Line2 
         BorderWidth     =   3
         X1              =   480
         X2              =   960
         Y1              =   720
         Y2              =   720
      End
      Begin VB.Line Line1 
         X1              =   480
         X2              =   960
         Y1              =   360
         Y2              =   360
      End
   End
   Begin MSComDlg.CommonDialog CommonDialog1 
      Left            =   7320
      Top             =   -120
      _ExtentX        =   847
      _ExtentY        =   847
      _Version        =   393216
   End
   Begin VB.PictureBox Picture1 
      BackColor       =   &H00FFFFFF&
      Height          =   5895
      Left            =   1560
      ScaleHeight     =   5835
      ScaleWidth      =   6435
      TabIndex        =   19
      Top             =   240
      Width           =   6495
   End
   Begin VB.Frame Frame2 
      Caption         =   "颜料盒"
      Height          =   1575
      Left            =   120
      TabIndex        =   1
      Top             =   6360
      Width           =   7935
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   15
         Left            =   7080
         TabIndex        =   18
         Top             =   960
         Width           =   615
      End
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   14
         Left            =   7080
         TabIndex        =   17
         Top             =   240
         Width           =   615
      End
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   13
         Left            =   2760
         TabIndex        =   16
         Top             =   960
         Width           =   615
      End
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   12
         Left            =   4920
         TabIndex        =   15
         Top             =   960
         Width           =   615
      End
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   11
         Left            =   2040
         TabIndex        =   14
         Top             =   960
         Width           =   615
      End
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   10
         Left            =   5640
         TabIndex        =   13
         Top             =   240
         Width           =   615
      End
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   9
         Left            =   3480
         TabIndex        =   12
         Top             =   240
         Width           =   615
      End
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   8
         Left            =   5640
         TabIndex        =   11
         Top             =   960
         Width           =   615
      End
      Begin VB.Label Label2 
         BorderStyle     =   1  'Fixed Single
         Height          =   735
         Left            =   480
         TabIndex        =   10
         Top             =   480
         Width           =   735
      End
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   7
         Left            =   6360
         TabIndex        =   9
         Top             =   960
         Width           =   615
      End
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   6
         Left            =   6360
         TabIndex        =   8
         Top             =   240
         Width           =   615
      End
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   5
         Left            =   3480
         TabIndex        =   7
         Top             =   960
         Width           =   615
      End
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   4
         Left            =   4200
         TabIndex        =   6
         Top             =   960
         Width           =   615
      End
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   3
         Left            =   4200
         TabIndex        =   5
         Top             =   240
         Width           =   615
      End
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   2
         Left            =   4920
         TabIndex        =   4
         Top             =   240
         Width           =   615
      End
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   1
         Left            =   2760
         TabIndex        =   3
         Top             =   240
         Width           =   615
      End
      Begin VB.Label Label1 
         BorderStyle     =   1  'Fixed Single
         Height          =   495
         Index           =   0
         Left            =   2040
         TabIndex        =   2
         Top             =   240
         Width           =   615
      End
   End
   Begin VB.Frame Frame1 
      Caption         =   "工具箱"
      Height          =   4335
      Left            =   120
      TabIndex        =   0
      Top             =   120
      Width           =   1215
      Begin VB.OptionButton Option1 
         Caption         =   "橡皮"
         Height          =   375
         Index           =   5
         Left            =   240
         Style           =   1  'Graphical
         TabIndex        =   31
         Top             =   2760
         Width           =   735
      End
      Begin VB.PictureBox Picture2 
         Height          =   735
         Left            =   120
         ScaleHeight     =   675
         ScaleWidth      =   915
         TabIndex        =   25
         Top             =   3360
         Width           =   975
      End
      Begin VB.OptionButton Option1 
         Caption         =   "画曲线"
         Height          =   375
         Index           =   4
         Left            =   240
         Style           =   1  'Graphical
         TabIndex        =   24
         Top             =   2280
         Width           =   735
      End
      Begin VB.OptionButton Option1 
         Caption         =   "画椭圆"
         Height          =   375