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

GDI/图象编程

开发平台:

Visual Basic

  1. VERSION 5.00
  2. Begin VB.UserControl AeroListBox 
  3.    ClientHeight    =   1425
  4.    ClientLeft      =   0
  5.    ClientTop       =   0
  6.    ClientWidth     =   2010
  7.    BeginProperty Font 
  8.       Name            =   "Segoe UI"
  9.       Size            =   9
  10.       Charset         =   0
  11.       Weight          =   400
  12.       Underline       =   0   'False
  13.       Italic          =   0   'False
  14.       Strikethrough   =   0   'False
  15.    EndProperty
  16.    KeyPreview      =   -1  'True
  17.    ScaleHeight     =   95
  18.    ScaleMode       =   3  'Pixel
  19.    ScaleWidth      =   134
  20.    ToolboxBitmap   =   "AeroListBox.ctx":0000
  21.    Begin AeroSuite.AeroScrollbar Bar 
  22.       Height          =   1455
  23.       Left            =   1680
  24.       TabIndex        =   0
  25.       Top             =   0
  26.       Width           =   255
  27.       _ExtentX        =   450
  28.       _ExtentY        =   2566
  29.    End
  30. End
  31. Attribute VB_Name = "AeroListBox"
  32. Attribute VB_GlobalNameSpace = False
  33. Attribute VB_Creatable = True
  34. Attribute VB_PredeclaredId = False
  35. Attribute VB_Exposed = True
  36. '--------------------------------------------------------------------------
  37. ' AeroListBox ActiveX Control
  38. ' Based on ucCoolList 1.2 by Carles P.V. [CodeId=29586]
  39. '--------------------------------------------------------------------------
  40. ' Copyright