personalinfo.frm

来自「Address Book implemented in VB 6,can be 」· FRM 代码 · 共 1,587 行 · 第 1/4 页

FRM
1,587 行
字号
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H00800000&
            Height          =   375
            Left            =   2160
            TabIndex        =   39
            Top             =   1440
            Width           =   255
         End
         Begin VB.Label Label5 
            BackStyle       =   0  'Transparent
            Caption         =   "1."
            BeginProperty Font 
               Name            =   "Arial"
               Size            =   12
               Charset         =   0
               Weight          =   700
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H00800000&
            Height          =   375
            Left            =   2160
            TabIndex        =   38
            Top             =   960
            Width           =   255
         End
         Begin VB.Label lblEmail2 
            BackStyle       =   0  'Transparent
            BeginProperty Font 
               Name            =   "MS Sans Serif"
               Size            =   12
               Charset         =   0
               Weight          =   700
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H00FF0000&
            Height          =   375
            Left            =   2520
            TabIndex        =   14
            Top             =   1440
            Width           =   4815
         End
         Begin VB.Label lblEmail3 
            BackStyle       =   0  'Transparent
            BeginProperty Font 
               Name            =   "MS Sans Serif"
               Size            =   12
               Charset         =   0
               Weight          =   700
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H00FF0000&
            Height          =   375
            Left            =   2520
            TabIndex        =   12
            Top             =   1920
            Width           =   4815
         End
         Begin VB.Label lblEmail1 
            BackStyle       =   0  'Transparent
            BeginProperty Font 
               Name            =   "MS Sans Serif"
               Size            =   12
               Charset         =   0
               Weight          =   700
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H00FF0000&
            Height          =   375
            Left            =   2520
            TabIndex        =   11
            Top             =   960
            Width           =   4815
         End
      End
      Begin VB.Frame Frame17 
         Height          =   4455
         Left            =   -74760
         TabIndex        =   35
         Top             =   480
         Width           =   8415
         Begin VB.Frame Frame14 
            Height          =   615
            Left            =   120
            TabIndex        =   36
            Top             =   120
            Width           =   8175
            Begin VB.Label Label19 
               BackStyle       =   0  'Transparent
               Caption         =   "E-mail Address"
               BeginProperty Font 
                  Name            =   "Arial"
                  Size            =   12
                  Charset         =   0
                  Weight          =   700
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               ForeColor       =   &H00000080&
               Height          =   375
               Left            =   120
               TabIndex        =   37
               Top             =   240
               Width           =   1815
            End
         End
         Begin VB.Label Label22 
            Alignment       =   2  'Center
            BackStyle       =   0  'Transparent
            Caption         =   "Copyright April 2005 Jessie Panerio Philippines"
            BeginProperty Font 
               Name            =   "La Bamba LET"
               Size            =   12
               Charset         =   0
               Weight          =   700
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H00C00000&
            Height          =   975
            Left            =   2880
            TabIndex        =   70
            Top             =   2160
            Width           =   2415
         End
      End
      Begin VB.Frame Frame13 
         Height          =   4695
         Left            =   -74880
         TabIndex        =   34
         Top             =   360
         Width           =   8655
      End
      Begin VB.Frame Frame3 
         Height          =   3135
         Left            =   5760
         TabIndex        =   31
         Top             =   360
         Width           =   3015
         Begin VB.PictureBox picimage 
            Appearance      =   0  'Flat
            AutoRedraw      =   -1  'True
            BackColor       =   &H00808080&
            ForeColor       =   &H80000008&
            Height          =   2775
            Left            =   120
            ScaleHeight     =   2745
            ScaleWidth      =   2745
            TabIndex        =   64
            Top             =   240
            Width           =   2775
            Begin VB.Label lblWanted 
               Alignment       =   2  'Center
               BackStyle       =   0  'Transparent
               BeginProperty Font 
                  Name            =   "Arial"
                  Size            =   15.75
                  Charset         =   0
                  Weight          =   700
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               ForeColor       =   &H000000FF&
               Height          =   375
               Left            =   120
               TabIndex        =   65
               Top             =   2280
               Width           =   2535
            End
            Begin VB.Image imgpic 
               BorderStyle     =   1  'Fixed Single
               Height          =   2775
               Left            =   0
               Stretch         =   -1  'True
               Top             =   0
               Width           =   2775
            End
         End
      End
      Begin VB.Frame Frame1 
         Height          =   4695
         Left            =   120
         TabIndex        =   19
         Top             =   360
         Width           =   5535
         Begin VB.Frame Frame2 
            Height          =   4455
            Left            =   120
            TabIndex        =   20
            Top             =   120
            Width           =   5295
            Begin VB.Label lblcivilstatus 
               BackStyle       =   0  'Transparent
               BeginProperty Font 
                  Name            =   "Arial"
                  Size            =   12.75
                  Charset         =   0
                  Weight          =   700
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               ForeColor       =   &H00FF0000&
               Height          =   375
               Left            =   2040
               TabIndex        =   67
               Top             =   3720
               Width           =   3135
            End
            Begin VB.Label Label16 
               BackStyle       =   0  'Transparent
               Caption         =   "MM / DD /  YYYY"
               BeginProperty Font 
                  Name            =   "Arial"
                  Size            =   6.75
                  Charset         =   0
                  Weight          =   700
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               ForeColor       =   &H000000FF&
               Height          =   255
               Left            =   2040
               TabIndex        =   63
               Top             =   2040
               Width           =   1335
            End
            Begin VB.Label lblReligion 
               BackStyle       =   0  'Transparent
               BeginProperty Font 
                  Name            =   "Arial"
                  Size            =   12.75
                  Charset         =   0
                  Weight          =   700
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               ForeColor       =   &H00FF0000&
               Height          =   375
               Left            =   2040
               TabIndex        =   62
               Top             =   2760
               Width           =   3015
            End
            Begin VB.Label lblCitizenship 
               BackStyle       =   0  'Transparent
               BeginProperty Font 
                  Name            =   "Arial"
                  Size            =   12.75
                  Charset         =   0
                  Weight          =   700
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               ForeColor       =   &H00FF0000&
               Height          =   375
               Left            =   2040
               TabIndex        =   60
               Top             =   3240
               Width           =   3135
            End
            Begin VB.Label lblGender 
               BackStyle       =   0  'Transparent
               BeginProperty Font 
                  Name            =   "Arial"
                  Size            =   12.75
                  Charset         =   0
                  Weight          =   700
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               ForeColor       =   &H00FF0000&
               Height          =   375
               Left            =   2040
               TabIndex        =   59
               Top             =   2280
               Width           =   3015
            End
            Begin VB.Label Label8 
               BackStyle       =   0  'Transparent
               Caption         =   "Civil Status"
               BeginProperty Font 
                  Name            =   "Arial"
                  Size            =   12
                  Charset         =   0
                  Weight          =   700
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               ForeColor       =   &H00800000&
               Height          =   375
               Left            =   240
               TabIndex        =   33
               Top             =   3720
               Width           =   1335
            End
            Begin VB.Label Label7 
               BackStyle       =   0  'Transparent
               Caption         =   "Citizenship"
               BeginProperty Font 
                  Name            =   "Arial"
                  Size            =   12
                  Charset         =   0
                  Weight          =   700
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               ForeColor       =   &H00800000&
               Height          =   375
               Left            =   240
               TabIndex        =   32
               Top             =   3240
               Width           =   1335
            End
            Begin VB.Label Label13 
               BackStyle       =   0  'Transparent
               Caption         =   "Religion"
               BeginProperty Font 
                  Name            =   "Arial"
                  Size            =   12
                  Charset         =   0
                  Weight          =   700
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               ForeColor       =   &H00800000&
               Height          =   375
               Left            =   240
               TabIndex        =   30
               Top             =   2760
               Width           =   1095
            End
            Begin VB.Label Label12 
               BackStyle       =   0  'Transparent
               Caption         =   "Gender"
               BeginProperty Font 
                  Name            =   "Arial"
                  Size            =   12
                  Charset         =   0
                  Weight          =   700
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               ForeColor       =   &H00800000&
               Height          =   375
               Left            =   240
               TabIndex        =   29
               Top             =   2280
               Width           =   975
            End
            Begin VB.Label lblBirthDay 
               BackStyle       =   0  'Transparent
               BeginProperty Font 
                  Name            =   "Arial"
                  Size            =   12.75
                  Charset         =   0
                  Weight          =   700
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               ForeColor       =   &H00FF0000&
               Height          =   375
               Left            =   2040
               TabIndex        =   28
               Top             =   1800
               Width           =   3015
            End
            Begin VB.Label lblMiddleName 
               BackStyle       =   0  'Transparent
               BeginProperty Font 
                  Name            =   "Arial"
                  Size            =   12.75
                  Charset         =   0
                  Weight          =   700
                  Underline       =   0   'False
                  Italic          =   0   'False

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?