form3.frm

XP风格浮动工具条 和苹果风格按钮控件

VERSION 5.00
Begin VB.Form Form3 
   Caption         =   "浮动工具条窗口, 演示移动, 缩放, 最小化, 关闭功能"
   ClientHeight    =   6720
   ClientLeft      =   60
   ClientTop       =   450
   ClientWidth     =   7665
   Icon            =   "Form3.frx":0000
   LinkTopic       =   "Form3"
   ScaleHeight     =   6720
   ScaleWidth      =   7665
   StartUpPosition =   3  '窗口缺省
   Begin prjXPFrame.isButton isButton1 
      Height          =   450
      Left            =   60
      TabIndex        =   4
      Top             =   4770
      Width           =   1530
      _extentx        =   2699
      _extenty        =   794
      icon            =   "Form3.frx":038A
      style           =   8
      caption         =   "常数设置"
      iconalign       =   1
      inonthemestyle  =   0
      tooltiptitle    =   ""
      tooltipicon     =   0
      tooltiptype     =   0
      ttforecolor     =   0
      font            =   "Form3.frx":03A6
      iconvisible     =   0   'False
   End
   Begin prjXPFrame.xpFrame ToolWindow3 
      Height          =   1350
      Left            =   210
      TabIndex        =   3
      Top             =   2430
      Width           =   3120
      _extentx        =   5503
      _extenty        =   2381
      headertextfont  =   "Form3.frx":03CA
      footertextfont  =   "Form3.frx":03EE
      containertextfont=   "Form3.frx":0412
      expandable      =   -1  'True
      headertext      =   "曲线图"
      footertext      =   ""
      headertext      =   "曲线图"
      footertext      =   ""
      headerpicture   =   "Form3.frx":0438
      containerresizable=   -1  'True
      containermovable=   -1  'True
      closeable       =   -1  'True
   End
   Begin prjXPFrame.xpFrame ToolWindow4 
      Height          =   1350
      Left            =   4275
      TabIndex        =   2
      Top             =   2910
      Width           =   3120
      _extentx        =   5503
      _extenty        =   2381
      headertextfont  =   "Form3.frx":07D2
      footertextfont  =   "Form3.frx":07F6
      containertextfont=   "Form3.frx":081A
      expandable      =   -1  'True
      headertext      =   "保存资料"
      footertext      =   ""
      containershapestyle=   1
      headertext      =   "保存资料"
      footertext      =   ""
      headerpicture   =   "Form3.frx":0840
      containerresizable=   -1  'True
      containermovable=   -1  'True
      closeable       =   -1  'True
   End
   Begin prjXPFrame.xpFrame ToolWindow2 
      Height          =   1350
      Left            =   3990
      TabIndex        =   1
      Top             =   945
      Width           =   3120
      _extentx        =   5503
      _extenty        =   2381
      headertextfont  =   "Form3.frx":0BDA
      footertextfont  =   "Form3.frx":0BFE
      containertextfont=   "Form3.frx":0C2A
      expandable      =   -1  'True
      headertext      =   "打印文档"
      footertext      =   ""
      headertext      =   "打印文档"
      footertext      =   ""
      headerpicture   =   "Form3.frx":0C58
      containerresizable=   -1  'True
      containermovable=   -1  'True
      closeable       =   -1  'True
   End
   Begin prjXPFrame.xpFrame ToolWindow1 
      Height          =   1350
      Left            =   120
      TabIndex        =   0
      Top             =   225
      Width           =   3120
      _extentx        =   5503
      _extenty        =   2381
      headertextfont  =   "Form3.frx":0FF2
      footertextfont  =   "Form3.frx":1016
      containertextfont=   "Form3.frx":103A
      expandable      =   -1  'True
      headertext      =   "参数设置"
      footertext      =   ""
      containershapestyle=   1
      headertext      =   "参数设置"
      footertext      =   ""
      headerpicture   =   "Form3.frx":1060
      containerresizable=   -1  'True
      containermovable=   -1  'True
      closeable       =   -1  'True
   End
   Begin prjXPFrame.isButton isButton2 
      Height          =   450
      Left            =   60
      TabIndex        =   5
      Top             =   5235
      Width           =   1530
      _extentx        =   2699
      _extenty        =   794
      icon            =   "Form3.frx":1B52
      style           =   8
      caption         =   "打印文档"
      iconalign       =   1
      inonthemestyle  =   0
      tooltiptitle    =   ""
      tooltipicon     =   0
      tooltiptype     =   0
      ttforecolor     =   0
      font            =   "Form3.frx":1B6E
      iconvisible     =   0   'False
   End
   Begin prjXPFrame.isButton isButton3 
      Height          =   450
      Left            =   60
      TabIndex        =   6
      Top             =   5700
      Width           =   1530
      _extentx        =   2699
      _extenty        =   794
      icon            =   "Form3.frx":1B92
      style           =   8
      caption         =   "曲线图"
      iconalign       =   1
      inonthemestyle  =   0
      tooltiptitle    =   ""
      tooltipicon     =   0
      tooltiptype     =   0
      ttforecolor     =   0
      font            =   "Form3.frx":1BAE
      iconvisible     =   0   'False
   End
   Begin prjXPFrame.isButton isButton4 
      Height          =   450
      Left            =   60
      TabIndex        =   7
      Top             =   6165
      Width           =   1530
      _extentx        =   2699
      _extenty        =   794
      icon            =   "Form3.frx":1BD2
      style           =   8
      caption         =   "保存资料"
      iconalign       =   1
      inonthemestyle  =   0
      tooltiptitle    =   ""
      tooltipicon     =   0
      tooltiptype     =   0
      ttforecolor     =   0
      font            =   "Form3.frx":1BEE
      iconvisible     =   0   'False
   End
End
Attribute VB_Name = "Form3"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False

Option Explicit

Private Sub isButton1_Click()
    ToolWindow1.showMe
End Sub

Private Sub isButton2_Click()
    ToolWindow2.showMe
End Sub

Private Sub isButton3_Click()
    ToolWindow3.showMe
End Sub

Private Sub isButton4_Click()
    ToolWindow4.showMe
End Sub