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

📄 form1.frm

📁 几个不错的VB例子
💻 FRM
📖 第 1 页 / 共 4 页
字号:
         Appearance      =   0  'Flat
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   285
         Left            =   2625
         Locked          =   -1  'True
         TabIndex        =   15
         Top             =   945
         Width           =   735
      End
      Begin VB.TextBox txt3 
         Alignment       =   2  'Center
         Appearance      =   0  'Flat
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   285
         Left            =   2625
         Locked          =   -1  'True
         TabIndex        =   14
         Top             =   1365
         Width           =   735
      End
      Begin VB.TextBox txt4 
         Alignment       =   2  'Center
         Appearance      =   0  'Flat
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   285
         Left            =   2625
         Locked          =   -1  'True
         TabIndex        =   13
         Top             =   1785
         Width           =   735
      End
      Begin VB.Line Line18 
         X1              =   1365
         X2              =   2625
         Y1              =   2310
         Y2              =   2310
      End
      Begin VB.Line Line17 
         X1              =   945
         X2              =   2625
         Y1              =   1890
         Y2              =   1890
      End
      Begin VB.Line Line14 
         X1              =   1365
         X2              =   2625
         Y1              =   1470
         Y2              =   1470
      End
      Begin VB.Line Line12 
         X1              =   1260
         X2              =   2625
         Y1              =   1050
         Y2              =   1050
      End
      Begin VB.Line Line1 
         X1              =   1050
         X2              =   2625
         Y1              =   630
         Y2              =   630
      End
      Begin VB.Label Label27 
         Caption         =   "seconds"
         Height          =   255
         Left            =   3465
         TabIndex        =   26
         Top             =   1785
         Width           =   690
      End
      Begin VB.Label Label25 
         Caption         =   "seconds"
         Height          =   255
         Left            =   3465
         TabIndex        =   25
         Top             =   1365
         Width           =   690
      End
      Begin VB.Label Label24 
         Caption         =   "seconds"
         Height          =   255
         Left            =   3465
         TabIndex        =   24
         Top             =   945
         Width           =   690
      End
      Begin VB.Label Label5 
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "Simple Math"
         Height          =   195
         Left            =   210
         TabIndex        =   23
         Top             =   2205
         Width           =   1050
      End
      Begin VB.Label lblSeconds 
         Caption         =   "seconds"
         Height          =   255
         Left            =   3465
         TabIndex        =   21
         Top             =   525
         Width           =   690
      End
      Begin VB.Label label1 
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "Addition"
         Height          =   195
         Left            =   210
         TabIndex        =   20
         Top             =   525
         Width           =   705
      End
      Begin VB.Label Label2 
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "Subtraction"
         Height          =   195
         Left            =   210
         TabIndex        =   19
         Top             =   945
         Width           =   990
      End
      Begin VB.Label Label3 
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "Multiplication"
         Height          =   195
         Left            =   210
         TabIndex        =   18
         Top             =   1365
         Width           =   1140
      End
      Begin VB.Label Label4 
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "Division"
         Height          =   195
         Left            =   210
         TabIndex        =   17
         Top             =   1785
         Width           =   660
      End
   End
   Begin VB.Frame frInformation 
      Caption         =   "System Information"
      Height          =   1590
      Left            =   105
      TabIndex        =   6
      Top             =   525
      Width           =   4635
      Begin VB.TextBox txtproc2 
         Alignment       =   2  'Center
         Appearance      =   0  'Flat
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   285
         Left            =   2940
         Locked          =   -1  'True
         TabIndex        =   11
         Top             =   1050
         Width           =   1470
      End
      Begin VB.TextBox Text3 
         Alignment       =   2  'Center
         Appearance      =   0  'Flat
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   285
         Left            =   105
         Locked          =   -1  'True
         TabIndex        =   10
         Top             =   420
         Width           =   4335
      End
      Begin VB.TextBox txt2k 
         Alignment       =   2  'Center
         Appearance      =   0  'Flat
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   285
         Left            =   1470
         Locked          =   -1  'True
         TabIndex        =   9
         Top             =   1050
         Width           =   1290
      End
      Begin VB.TextBox Text5 
         Alignment       =   2  'Center
         Appearance      =   0  'Flat
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   285
         Left            =   105
         Locked          =   -1  'True
         TabIndex        =   8
         Top             =   735
         Width           =   4335
      End
      Begin VB.TextBox Text4 
         Alignment       =   2  'Center
         Appearance      =   0  'Flat
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   285
         Left            =   105
         Locked          =   -1  'True
         TabIndex        =   7
         Top             =   1050
         Width           =   1155
      End
      Begin VB.Line Line16 
         X1              =   2835
         X2              =   2835
         Y1              =   1260
         Y2              =   1050
      End
      Begin VB.Line Line15 
         X1              =   1365
         X2              =   1365
         Y1              =   1260
         Y2              =   1050
      End
   End
   Begin VB.PictureBox imgLogo 
      Appearance      =   0  'Flat
      BackColor       =   &H80000005&
      BeginProperty Font 
         Name            =   "MS Sans Serif"
         Size            =   8.25
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H80000008&
      Height          =   330
      Left            =   0
      Picture         =   "Form1.frx":0442
      ScaleHeight     =   300
      ScaleWidth      =   11220
      TabIndex        =   4
      Top             =   0
      Width           =   11250
      Begin VB.Label lblBeta 
         AutoSize        =   -1  'True
         BackStyle       =   0  'Transparent
         Caption         =   "v2.1"
         ForeColor       =   &H00000000&
         Height          =   195
         Left            =   8550
         TabIndex        =   81
         Top             =   75
         Width           =   360
      End
      Begin VB.Label lblMinimize 
         Appearance      =   0  'Flat
         AutoSize        =   -1  'True
         BackColor       =   &H80000005&
         BackStyle       =   0  'Transparent
         Caption         =   "6"
         BeginProperty Font 
            Name            =   "Webdings"
            Size            =   8.25
            Charset         =   2
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ForeColor       =   &H80000008&
         Height          =   255
         Left            =   9150
         TabIndex        =   80
         Top             =   0
         Width           =   165
      End
      Begin VB.Label lblstatus 
         Appearance      =   0  'Flat
         BackColor       =   &H80000005&
         BackStyle       =   0  'Transparent
         Caption         =   "

⌨️ 快捷键说明

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