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

📄 formdemo.frm

📁 工具条演示程序 工具条演示程序
💻 FRM
📖 第 1 页 / 共 3 页
字号:
            Key             =   ""
         EndProperty
         BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FormDemo.frx":13BF2
            Key             =   ""
         EndProperty
         BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FormDemo.frx":1418C
            Key             =   ""
         EndProperty
         BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FormDemo.frx":15D86
            Key             =   ""
         EndProperty
         BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FormDemo.frx":17980
            Key             =   ""
         EndProperty
         BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FormDemo.frx":17F1A
            Key             =   ""
         EndProperty
         BeginProperty ListImage8 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FormDemo.frx":19B14
            Key             =   ""
         EndProperty
         BeginProperty ListImage9 {2C247F27-8591-11D1-B16A-00C0F0283628} 
            Picture         =   "FormDemo.frx":1B70E
            Key             =   ""
         EndProperty
      EndProperty
   End
   Begin VB.TextBox Textwelcome 
      Alignment       =   2  'Center
      Appearance      =   0  'Flat
      BackColor       =   &H000080FF&
      ForeColor       =   &H0000FFFF&
      Height          =   285
      Left            =   2280
      TabIndex        =   6
      Text            =   "测试"
      Top             =   240
      Width           =   3615
   End
   Begin VB.TextBox Text5 
      Appearance      =   0  'Flat
      Height          =   285
      Left            =   5160
      TabIndex        =   5
      Text            =   "测试"
      Top             =   5640
      Width           =   615
   End
   Begin VB.TextBox Text4 
      Appearance      =   0  'Flat
      Height          =   285
      Left            =   5160
      TabIndex        =   4
      Text            =   "测试"
      Top             =   5040
      Width           =   615
   End
   Begin VB.TextBox Text3 
      Appearance      =   0  'Flat
      Height          =   285
      Left            =   5160
      TabIndex        =   3
      Text            =   "测试"
      Top             =   2640
      Width           =   615
   End
   Begin VB.TextBox Text2 
      Appearance      =   0  'Flat
      Height          =   285
      Left            =   5160
      TabIndex        =   2
      Text            =   "测试"
      Top             =   2040
      Width           =   615
   End
   Begin VB.TextBox Text1 
      Appearance      =   0  'Flat
      Height          =   285
      Left            =   5160
      TabIndex        =   1
      Text            =   "测试"
      Top             =   1440
      Width           =   615
   End
   Begin VB.PictureBox Picture8 
      Appearance      =   0  'Flat
      ForeColor       =   &H80000008&
      Height          =   8805
      Left            =   0
      Picture         =   "FormDemo.frx":1F788
      ScaleHeight     =   8775
      ScaleWidth      =   2025
      TabIndex        =   0
      Top             =   0
      Width           =   2055
      Begin VB.PictureBox TGEColor 
         Appearance      =   0  'Flat
         BackColor       =   &H80000001&
         ForeColor       =   &H80000008&
         Height          =   255
         Left            =   960
         ScaleHeight     =   225
         ScaleWidth      =   825
         TabIndex        =   54
         Top             =   4800
         Width           =   855
      End
      Begin VB.OptionButton Option4 
         Caption         =   "结束"
         Height          =   255
         Left            =   120
         TabIndex        =   53
         Top             =   4800
         Width           =   735
      End
      Begin VB.PictureBox TGSColor 
         Appearance      =   0  'Flat
         BackColor       =   &H80000018&
         ForeColor       =   &H80000008&
         Height          =   255
         Left            =   960
         ScaleHeight     =   225
         ScaleWidth      =   825
         TabIndex        =   52
         Top             =   4440
         Width           =   855
      End
      Begin VB.OptionButton Option3 
         Caption         =   "开始"
         Height          =   255
         Left            =   120
         TabIndex        =   51
         Top             =   4440
         Width           =   735
      End
      Begin VB.CheckBox CheckShadow 
         Caption         =   "显示阴影"
         Height          =   255
         Left            =   480
         TabIndex        =   47
         Top             =   8400
         Width           =   1215
      End
      Begin VB.CheckBox CheckBalloon 
         Caption         =   "圆形气泡"
         Height          =   255
         Left            =   480
         TabIndex        =   25
         Top             =   8040
         Width           =   1215
      End
      Begin VB.PictureBox ShapeColor 
         Appearance      =   0  'Flat
         BackColor       =   &H80000005&
         ForeColor       =   &H80000008&
         Height          =   135
         Left            =   240
         ScaleHeight     =   105
         ScaleWidth      =   1545
         TabIndex        =   23
         Top             =   6720
         Width           =   1575
      End
      Begin VB.OptionButton Option2 
         Caption         =   "背景"
         Height          =   255
         Left            =   120
         TabIndex        =   14
         Top             =   4080
         Width           =   735
      End
      Begin VB.OptionButton Option1 
         Caption         =   "文本"
         Height          =   255
         Left            =   120
         TabIndex        =   13
         Top             =   3720
         Value           =   -1  'True
         Width           =   750
      End
      Begin VB.PictureBox TTextColor 
         Appearance      =   0  'Flat
         BackColor       =   &H80000012&
         ForeColor       =   &H80000008&
         Height          =   255
         Left            =   960
         ScaleHeight     =   225
         ScaleWidth      =   825
         TabIndex        =   12
         Top             =   3720
         Width           =   855
      End
      Begin VB.PictureBox TBackcolor 
         Appearance      =   0  'Flat
         BackColor       =   &H80000018&
         ForeColor       =   &H80000008&
         Height          =   255
         Left            =   960
         ScaleHeight     =   225
         ScaleWidth      =   825
         TabIndex        =   11
         Top             =   4080
         Width           =   855
      End
      Begin VB.PictureBox ColorPicker 
         AutoSize        =   -1  'True
         BackColor       =   &H000000C8&
         BorderStyle     =   0  'None
         Height          =   1395
         Left            =   60
         Picture         =   "FormDemo.frx":2118A
         ScaleHeight     =   93
         ScaleMode       =   3  'Pixel
         ScaleWidth      =   123
         TabIndex        =   10
         Top             =   5160
         Width           =   1845
      End
      Begin MSComctlLib.Slider SliderT 
         Height          =   375
         Left            =   240
         TabIndex        =   7
         Top             =   7440
         Width           =   1575
         _ExtentX        =   2778
         _ExtentY        =   661
         _Version        =   393216
         Max             =   100
         SelStart        =   100
         TickStyle       =   3
         Value           =   100
      End
      Begin MSComctlLib.Slider SliderTT 
         Height          =   375
         Left            =   240
         TabIndex        =   17
         Top             =   1920
         Width           =   1575
         _ExtentX        =   2778
         _ExtentY        =   661
         _Version        =   393216
         Max             =   200
         SelStart        =   25
         TickStyle       =   3
         Value           =   25
      End
      Begin MSComctlLib.Slider SliderTTT 
         Height          =   375
         Left            =   240
         TabIndex        =   19
         Top             =   2760
         Width           =   1575
         _ExtentX        =   2778
         _ExtentY        =   661
         _Version        =   393216
         Max             =   2000
         SelStart        =   500
         TickStyle       =   3
         Value           =   500
      End
      Begin VB.Label Label4 
         Alignment       =   2  'Center
         BackColor       =   &H008A4922&
         Caption         =   "自动关闭延时"
         ForeColor       =   &H0000FFFF&
         Height          =   195
         Left            =   0
         TabIndex        =   20
         Top             =   2520
         Width           =   1980
      End
      Begin VB.Label Label3 
         Alignment       =   2  'Center
         BackColor       =   &H008A4922&
         Caption         =   "弹出延时"
         ForeColor       =   &H0000FFFF&
         Height          =   195
         Left            =   0
         TabIndex        =   18
         Top             =   1680
         Width           =   1980
      End
      Begin VB.Label Label2 
         Alignment       =   2  'Center
         BackColor       =   &H008A4922&
         Caption         =   "透明度"
         ForeColor       =   &H0000FFFF&
         Height          =   195
         Left            =   0
         TabIndex        =   16
         Top             =   7080
         Width           =   1980
      End
      Begin VB.Label Label1 
         Alignment       =   2  'Center
         BackColor       =   &H008A4922&
         Caption         =   "颜色"
         ForeColor       =   &H0000FFFF&
         Height          =   195
         Left            =   0
         TabIndex        =   15
         Top             =   3240
         Width           =   1980
      End
   End
   Begin VB.Label Label13 
      AutoSize        =   -1  'True
      BackStyle       =   0  'Transparent
      Caption         =   "字体:"
      BeginProperty Font 
         Name            =   "宋体"
         Size            =   9
         Charset         =   134
         Weight          =   700
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00FFFFFF&
      Height          =   180
      Left            =   2520
      TabIndex        =   56
      Top             =   7920
      Width           =   585
   End
   Begin VB.Label Label12 
      AutoSize        =   -1  'True
      BackStyle       =   0  'Transparent
      Caption         =   "背景类型:"
      BeginProperty Font 
         Name            =   "宋体"
         Size            =   9
         Charset         =   134
         Weight          =   700
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00FFFFFF&
      Height          =   180
      Left            =   2520
      TabIndex        =   48
      Top             =   7200
      Width           =   975
   End
   Begin VB.Label Label10 
      AutoSize        =   -1  'True
      BackStyle       =   0  'Transparent
      Caption         =   "图标大小:"
      BeginProperty Font 
         Name            =   "宋体"
         Size            =   9
         Charset         =   134
         Weight          =   700
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00FFFFFF&
      Height          =   180
      Left            =   2520
      TabIndex        =   38
      Top             =   6510
      Width           =   975
   End
   Begin VB.Label LabelN 
      AutoSize        =   -1  'True
      BackStyle       =   0  'Transparent
      Caption         =   "http://www.mndsoft.com"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   8.25
         Charset         =   0
         Weight          =   700
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00FFFFFF&
      Height          =   195
      Index           =   1
      Left            =   5160
      TabIndex        =   9
      Top             =   8280
      Width           =   2460
   End
   Begin VB.Label LabelN 
      AutoSize        =   -1  'True
      BackStyle       =   0  'Transparent
      Caption         =   "http://www.vbDnet.com"
      BeginProperty Font 
         Name            =   "Verdana"
         Size            =   8.25
         Charset         =   0
         Weight          =   700
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H0000FFFF&
      Height          =   195

⌨️ 快捷键说明

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