⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 addnew.frm

📁 Address Book implemented in VB 6,can be use for storing person information
💻 FRM
📖 第 1 页 / 共 5 页
字号:
               TabIndex        =   25
               Top             =   480
               Width           =   1695
            End
            Begin VB.Label lblContactNoMobile 
               Alignment       =   1  'Right Justify
               BackStyle       =   0  'Transparent
               Caption         =   "Mobile Phone #"
               BeginProperty Font 
                  Name            =   "Arial"
                  Size            =   12
                  Charset         =   0
                  Weight          =   700
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               ForeColor       =   &H00800000&
               Height          =   255
               Left            =   120
               TabIndex        =   24
               Top             =   1560
               Width           =   1815
            End
            Begin VB.Label Label9 
               Alignment       =   1  'Right Justify
               BackStyle       =   0  'Transparent
               Caption         =   "Landline #"
               BeginProperty Font 
                  Name            =   "Arial"
                  Size            =   12
                  Charset         =   0
                  Weight          =   700
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               ForeColor       =   &H00800000&
               Height          =   255
               Left            =   720
               TabIndex        =   23
               Top             =   1080
               Width           =   1215
            End
         End
      End
      Begin VB.Frame Frame1 
         BeginProperty Font 
            Name            =   "Arial"
            Size            =   9
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   4695
         Left            =   120
         TabIndex        =   16
         Top             =   360
         Width           =   8655
         Begin VB.Frame Frame2 
            Height          =   4455
            Left            =   120
            TabIndex        =   42
            Top             =   120
            Width           =   8415
            Begin VB.Frame Frame7 
               Height          =   2055
               Left            =   4200
               TabIndex        =   54
               Top             =   2280
               Width           =   4095
               Begin Project1.lvButtons_H cmdAddPicture 
                  Height          =   1215
                  Left            =   2640
                  TabIndex        =   9
                  Top             =   480
                  Width           =   975
                  _ExtentX        =   1720
                  _ExtentY        =   2143
                  Caption         =   "&Add Picture"
                  CapAlign        =   2
                  BackStyle       =   7
                  BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
                     Name            =   "Arial"
                     Size            =   9.75
                     Charset         =   0
                     Weight          =   700
                     Underline       =   0   'False
                     Italic          =   0   'False
                     Strikethrough   =   0   'False
                  EndProperty
                  cFore           =   65280
                  cFHover         =   65535
                  cBhover         =   255
                  LockHover       =   3
                  cGradient       =   0
                  Gradient        =   3
                  Mode            =   0
                  Value           =   0   'False
                  ImgAlign        =   4
                  Image           =   "AddNew.frx":165A
                  ImgSize         =   32
                  cBack           =   16711680
               End
               Begin VB.PictureBox picimage 
                  Appearance      =   0  'Flat
                  AutoRedraw      =   -1  'True
                  BackColor       =   &H00808080&
                  ForeColor       =   &H80000008&
                  Height          =   1695
                  Left            =   120
                  ScaleHeight     =   1665
                  ScaleWidth      =   1860
                  TabIndex        =   62
                  Top             =   240
                  Width           =   1890
                  Begin MSComDlg.CommonDialog jessiepanerio 
                     Left            =   8760
                     Top             =   1080
                     _ExtentX        =   847
                     _ExtentY        =   847
                     _Version        =   393216
                  End
                  Begin MSComDlg.CommonDialog jjessiepanerio 
                     Left            =   8760
                     Top             =   600
                     _ExtentX        =   847
                     _ExtentY        =   847
                     _Version        =   393216
                  End
                  Begin VB.Image imgpic 
                     BorderStyle     =   1  'Fixed Single
                     Height          =   1635
                     Left            =   0
                     Stretch         =   -1  'True
                     Top             =   0
                     Width           =   1875
                  End
               End
               Begin VB.TextBox txtPictureName 
                  Height          =   285
                  Left            =   480
                  Locked          =   -1  'True
                  TabIndex        =   61
                  Top             =   840
                  Width           =   1095
               End
               Begin Project1.lvButtons_H cmdChangePicture 
                  Height          =   1215
                  Left            =   2640
                  TabIndex        =   66
                  Top             =   480
                  Visible         =   0   'False
                  Width           =   975
                  _ExtentX        =   1720
                  _ExtentY        =   2143
                  Caption         =   "Change &Picture"
                  CapAlign        =   2
                  BackStyle       =   7
                  BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
                     Name            =   "Arial"
                     Size            =   9.75
                     Charset         =   0
                     Weight          =   700
                     Underline       =   0   'False
                     Italic          =   0   'False
                     Strikethrough   =   0   'False
                  EndProperty
                  cFore           =   65280
                  cFHover         =   65535
                  cBhover         =   255
                  LockHover       =   3
                  cGradient       =   0
                  Gradient        =   3
                  Mode            =   0
                  Value           =   0   'False
                  ImgAlign        =   4
                  Image           =   "AddNew.frx":1F34
                  ImgSize         =   32
                  cBack           =   16711680
               End
            End
            Begin VB.Frame Frame6 
               Height          =   2175
               Left            =   4200
               TabIndex        =   50
               Top             =   120
               Width           =   4095
               Begin VB.TextBox txtCitizenship 
                  BeginProperty Font 
                     Name            =   "Arial"
                     Size            =   11.25
                     Charset         =   0
                     Weight          =   400
                     Underline       =   0   'False
                     Italic          =   0   'False
                     Strikethrough   =   0   'False
                  EndProperty
                  Height          =   375
                  Left            =   1800
                  MaxLength       =   18
                  TabIndex        =   7
                  Top             =   960
                  Width           =   2175
               End
               Begin VB.TextBox txtCivilStatus 
                  BeginProperty Font 
                     Name            =   "Arial"
                     Size            =   11.25
                     Charset         =   0
                     Weight          =   400
                     Underline       =   0   'False
                     Italic          =   0   'False
                     Strikethrough   =   0   'False
                  EndProperty
                  Height          =   375
                  Left            =   1800
                  MaxLength       =   18
                  TabIndex        =   8
                  Top             =   1560
                  Width           =   2175
               End
               Begin VB.TextBox txtReligion 
                  BeginProperty Font 
                     Name            =   "Arial"
                     Size            =   11.25
                     Charset         =   0
                     Weight          =   400
                     Underline       =   0   'False
                     Italic          =   0   'False
                     Strikethrough   =   0   'False
                  EndProperty
                  Height          =   375
                  Left            =   1800
                  MaxLength       =   18
                  TabIndex        =   6
                  Top             =   360
                  Width           =   2175
               End
               Begin VB.Label Label21 
                  Caption         =   "Citizenship"
                  BeginProperty Font 
                     Name            =   "Arial"
                     Size            =   11.25
                     Charset         =   0
                     Weight          =   700
                     Underline       =   0   'False
                     Italic          =   0   'False
                     Strikethrough   =   0   'False
                  EndProperty
                  Height          =   255
                  Left            =   240
                  TabIndex        =   53
                  Top             =   1080
                  Width           =   1335
               End
               Begin VB.Label Label22 
                  Caption         =   "Civil Status"
                  BeginProperty Font 
                     Name            =   "Arial"
                     Size            =   11.25
                     Charset         =   0
                     Weight          =   700
                     Underline       =   0   'False
                     Italic          =   0   'False
                     Strikethrough   =   0   'False
                  EndProperty
                  Height          =   255
                  Left            =   240
                  TabIndex        =   52
                  Top             =   1680
                  Width           =   1335
               End
               Begin VB.Label Label20 
                  Caption         =   "Religion"
                  BeginProperty Font 
                     Name            =   "Arial"
                     Size            =   11.25
                     Charset         =   0
                     Weight          =   700
                     Underline       =   0   'False
                     Italic          =   0   'False
                     Strikethrough   =   0   'False
                  EndProperty
                  Height          =   255
                  Left            =   240
                  TabIndex        =   51
                  Top             =   480
                  Width           =   975
               End
            End
            Begin VB.Frame Frame11 
               Height          =   4215
               Left            =   120
               TabIndex        =   43
               Top             =   120
               Width           =   3975
               Begin VB.TextBox txtCover 
                  BeginProperty Font 
                     Name            =   "Arial"
                     Size            =   11.25
                     Charset         =   0
                     Weight          =   400
                     Underline       =   0   'False
                     Italic          =   0   'False
                     Strikethrough   =   0   'False
                  EndProperty
                  Height          =   375
                  Left            =   1680
                  Locked          =   -1  'True
                  TabIndex        =   57
                  Top             =   2760
                  Width           =   1575
               End
               Begin MSMask.MaskEdBox MaskEdBoxBirthDay 
                  Height          =   375
                  Left            =   1680
                  TabIndex        =   4
                  Top             =   2760
                  Width           =   1575
                  _ExtentX        =   2778
                  _ExtentY        =   661
                  _Version        =   393216
                  BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
                     Name            =   "Arial"
                     Size            =   11.25
                     Charset         =   0
                     Weight          =   400
                     Underline       =   0   'False
                     Italic          =   0   'False
                     Strikethrough   =   0   'False
                  EndProperty
                  PromptChar      =   "_"
               End
               Begin VB.ComboBox cmbGender 
                  BeginProperty Font 
                     Name            =   "Arial"
                     Size            =   11.25
                     Charset         =   0
                     Weight          =   400

⌨️ 快捷键说明

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