AeroBasicForm.ctl
上传用户:jnjasmy
上传日期:2015-01-04
资源大小:637k
文件大小:37k
源码类别:

GDI/图象编程

开发平台:

Visual Basic

  1. VERSION 5.00
  2. Begin VB.UserControl AeroBasicForm 
  3.    Alignable       =   -1  'True
  4.    AutoRedraw      =   -1  'True
  5.    ClientHeight    =   3600
  6.    ClientLeft      =   0
  7.    ClientTop       =   0
  8.    ClientWidth     =   4800
  9.    BeginProperty Font 
  10.       Name            =   "Segoe UI"
  11.       Size            =   9
  12.       Charset         =   0
  13.       Weight          =   400
  14.       Underline       =   0   'False
  15.       Italic          =   0   'False
  16.       Strikethrough   =   0   'False
  17.    EndProperty
  18.    ScaleHeight     =   240
  19.    ScaleMode       =   3  'Pixel
  20.    ScaleWidth      =   320
  21.    ToolboxBitmap   =   "AeroBasicForm.ctx":0000
  22.    Begin VB.PictureBox pCaptionButtons 
  23.       AutoRedraw      =   -1  'True
  24.       BorderStyle     =   0  'None
  25.       Height          =   225
  26.       Left            =   1800
  27.       MousePointer    =   1  'Arrow
  28.       ScaleHeight     =   15
  29.       ScaleMode       =   3  'Pixel
  30.       ScaleWidth      =   88
  31.       TabIndex        =   2
  32.       Top             =   1320
  33.       Width           =   1320
  34.    End
  35.    Begin VB.CommandButton Command1 
  36.       Caption         =   "Aero Form"
  37.       Height          =   615
  38.       Left            =   0
  39.       TabIndex        =   1
  40.       Top             =   0
  41.       Width           =   615
  42.    End
  43.    Begin VB.PictureBox Picture1 
  44.       AutoRedraw      =   -1  'True
  45.       BackColor       =   &H00FFFFFF&
  46.       BorderStyle     =   0  'None
  47.       BeginProperty Font 
  48.          Name            =   "Segoe UI"
  49.          Size            =   9
  50.          Charset         =   0
  51.          Weight          =   700
  52.          Underline       =   0   'False
  53.          Italic          =   0   'False
  54.          Strikethrough   =   0   'False
  55.       EndProperty
  56.       ForeColor       =   &H00000000&
  57.       Height          =   375
  58.       Left            =   0
  59.       ScaleHeight     =   25
  60.       ScaleMode       =   3  'Pixel
  61.       ScaleWidth      =   206
  62.       TabIndex        =   0
  63.       Top             =   0
  64.       Visible         =   0   'False
  65.       Width           =   3090
  66.    End
  67. End
  68. Attribute VB_Name = "AeroBasicForm"
  69. Attribute VB_GlobalNameSpace = False
  70. Attribute VB_Creatable = True
  71. Attribute VB_PredeclaredId = False
  72. Attribute VB_Exposed = True
  73. '-----------------------------------------------------------------------------
  74. ' AeroBasicForm ActiveX Control
  75. '-----------------------------------------------------------------------------
  76. ' Copyright