FrameXp.ctl
上传用户:eleven0727
上传日期:2009-12-26
资源大小:124k
文件大小:20k
源码类别:

Tab控件

开发平台:

Visual Basic

  1. VERSION 5.00
  2. Begin VB.UserControl Xp_Frame 
  3.    Alignable       =   -1  'True
  4.    Appearance      =   0  'Flat
  5.    AutoRedraw      =   -1  'True
  6.    BackColor       =   &H80000005&
  7.    ClientHeight    =   315
  8.    ClientLeft      =   0
  9.    ClientTop       =   0
  10.    ClientWidth     =   930
  11.    ControlContainer=   -1  'True
  12.    ScaleHeight     =   21
  13.    ScaleMode       =   3  'Pixel
  14.    ScaleWidth      =   62
  15.    ToolboxBitmap   =   "FrameXp.ctx":0000
  16.    Begin VB.Image img 
  17.       Height          =   300
  18.       Left            =   0
  19.       Picture         =   "FrameXp.ctx":0312
  20.       Top             =   0
  21.       Visible         =   0   'False
  22.       Width           =   330
  23.    End
  24.    Begin VB.Label lbl 
  25.       Alignment       =   2  'Center
  26.       Appearance      =   0  'Flat
  27.       AutoSize        =   -1  'True
  28.       BackColor       =   &H80000005&
  29.       Caption         =   " Frame1"
  30.       ForeColor       =   &H00FF0000&
  31.       Height          =   195
  32.       Left            =   360
  33.       TabIndex        =   24
  34.       Top             =   0
  35.       Width           =   570
  36.    End
  37.    Begin VB.Label dot 
  38.       BackStyle       =   0  'Transparent
  39.       Caption         =   "."
  40.       ForeColor       =   &H8000000B&
  41.       Height          =   255
  42.       Index           =   0
  43.       Left            =   9000
  44.       TabIndex        =   23
  45.       Top             =   240
  46.       Width           =   135
  47.    End
  48.    Begin VB.Label dot 
  49.       BackStyle       =   0  'Transparent
  50.       Caption         =   "."
  51.       ForeColor       =   &H8000000B&
  52.       Height          =   255
  53.       Index           =   1
  54.       Left            =   9000
  55.       TabIndex        =   22
  56.       Top             =   0
  57.       Width           =   135
  58.    End
  59.    Begin VB.Label dot 
  60.       BackStyle       =   0  'Transparent
  61.       Caption         =   "."
  62.       ForeColor       =   &H8000000B&
  63.       Height          =   255
  64.       Index           =   2
  65.       Left            =   9000
  66.       TabIndex        =   21
  67.       Top             =   0
  68.       Width           =   135
  69.    End
  70.    Begin VB.Label dot 
  71.       BackStyle       =   0  'Transparent
  72.       Caption         =   "."
  73.       ForeColor       =   &H8000000B&
  74.       Height          =   255
  75.       Index           =   3
  76.       Left            =   9000
  77.       TabIndex        =   20
  78.       Top             =   0
  79.       Width           =   135
  80.    End
  81.    Begin VB.Label dot 
  82.       BackStyle       =   0  'Transparent
  83.       Caption         =   "."
  84.       ForeColor       =   &H8000000B&
  85.       Height          =   255
  86.       Index           =   4
  87.       Left            =   9000
  88.       TabIndex        =   19
  89.       Top             =   0
  90.       Width           =   135
  91.    End
  92.    Begin VB.Label dot 
  93.       BackStyle       =   0  'Transparent
  94.       Caption         =   "."
  95.       ForeColor       =   &H8000000B&
  96.       Height          =   255
  97.       Index           =   5
  98.       Left            =   9000
  99.       TabIndex        =   18
  100.       Top             =   0
  101.       Width           =   135
  102.    End
  103.    Begin VB.Label dot 
  104.       BackStyle       =   0  'Transparent
  105.       Caption         =   "."
  106.       ForeColor       =   &H8000000B&
  107.       Height          =   255
  108.       Index           =   6
  109.       Left            =   9000
  110.       TabIndex        =   17
  111.       Top             =   0
  112.       Width           =   135
  113.    End
  114.    Begin VB.Label dot 
  115.       BackStyle       =   0  'Transparent
  116.       Caption         =   "."
  117.       ForeColor       =   &H8000000B&
  118.       Height          =   255
  119.       Index           =   7
  120.       Left            =   9000
  121.       TabIndex        =   16
  122.       Top             =   0
  123.       Width           =   135
  124.    End
  125.    Begin VB.Label dot 
  126.       BackStyle       =   0  'Transparent
  127.       Caption         =   "."
  128.       ForeColor       =   &H8000000B&
  129.       Height          =   255
  130.       Index           =   8
  131.       Left            =   9000
  132.       TabIndex        =   15
  133.       Top             =   0
  134.       Width           =   135
  135.    End
  136.    Begin VB.Label dot 
  137.       BackStyle       =   0  'Transparent
  138.       Caption         =   "."
  139.       ForeColor       =   &H8000000B&
  140.       Height          =   255
  141.       Index           =   9
  142.       Left            =   9000
  143.       TabIndex        =   14
  144.       Top             =   0
  145.       Width           =   135
  146.    End
  147.    Begin VB.Label dot 
  148.       BackStyle       =   0  'Transparent
  149.       Caption         =   "."
  150.       ForeColor       =   &H8000000B&
  151.       Height          =   255
  152.       Index           =   10
  153.       Left            =   9000
  154.       TabIndex        =   13
  155.       Top             =   0
  156.       Width           =   135
  157.    End
  158.    Begin VB.Label dot 
  159.       BackStyle       =   0  'Transparent
  160.       Caption         =   "."
  161.       ForeColor       =   &H8000000B&
  162.       Height          =   255
  163.       Index           =   11
  164.       Left            =   9000
  165.       TabIndex        =   12
  166.       Top             =   0
  167.       Width           =   135
  168.    End
  169.    Begin VB.Label dot 
  170.       BackStyle       =   0  'Transparent
  171.       Caption         =   "."
  172.       ForeColor       =   &H8000000B&
  173.       Height          =   255
  174.       Index           =   12
  175.       Left            =   9000
  176.       TabIndex        =   11
  177.       Top             =   0
  178.       Width           =   135
  179.    End
  180.    Begin VB.Label dot 
  181.       BackStyle       =   0  'Transparent
  182.       Caption         =   "."
  183.       ForeColor       =   &H8000000B&
  184.       Height          =   255
  185.       Index           =   13
  186.       Left            =   9000
  187.       TabIndex        =   10
  188.       Top             =   0
  189.       Width           =   135
  190.    End
  191.    Begin VB.Label dot 
  192.       BackStyle       =   0  'Transparent
  193.       Caption         =   "."
  194.       ForeColor       =   &H8000000B&
  195.       Height          =   255
  196.       Index           =   14
  197.       Left            =   9000
  198.       TabIndex        =   9
  199.       Top             =   0
  200.       Width           =   135
  201.    End
  202.    Begin VB.Label dot 
  203.       BackStyle       =   0  'Transparent
  204.       Caption         =   "."
  205.       ForeColor       =   &H8000000B&
  206.       Height          =   255
  207.       Index           =   15
  208.       Left            =   9000
  209.       TabIndex        =   8
  210.       Top             =   0
  211.       Width           =   135
  212.    End
  213.    Begin VB.Label dot 
  214.       BackStyle       =   0  'Transparent
  215.       Caption         =   "."
  216.       ForeColor       =   &H8000000B&
  217.       Height          =   255
  218.       Index           =   16
  219.       Left            =   9000
  220.       TabIndex        =   7
  221.       Top             =   0
  222.       Width           =   135
  223.    End
  224.    Begin VB.Label dot 
  225.       BackStyle       =   0  'Transparent
  226.       Caption         =   "."
  227.       ForeColor       =   &H8000000B&
  228.       Height          =   255
  229.       Index           =   17
  230.       Left            =   9000
  231.       TabIndex        =   6
  232.       Top             =   0
  233.       Width           =   135
  234.    End
  235.    Begin VB.Label dot 
  236.       BackStyle       =   0  'Transparent
  237.       Caption         =   "."
  238.       ForeColor       =   &H8000000B&
  239.       Height          =   255
  240.       Index           =   18
  241.       Left            =   9000
  242.       TabIndex        =   5
  243.       Top             =   0
  244.       Width           =   135
  245.    End
  246.    Begin VB.Label dot 
  247.       BackStyle       =   0  'Transparent
  248.       Caption         =   "."
  249.       ForeColor       =   &H8000000B&
  250.       Height          =   255
  251.       Index           =   19
  252.       Left            =   9000
  253.       TabIndex        =   4
  254.       Top             =   0
  255.       Width           =   135
  256.    End
  257.    Begin VB.Label dot 
  258.       BackStyle       =   0  'Transparent
  259.       Caption         =   "."
  260.       ForeColor       =   &H8000000B&
  261.       Height          =   255
  262.       Index           =   20
  263.       Left            =   9000
  264.       TabIndex        =   3
  265.       Top             =   0
  266.       Width           =   135
  267.    End
  268.    Begin VB.Label dot 
  269.       BackStyle       =   0  'Transparent
  270.       Caption         =   "."
  271.       ForeColor       =   &H8000000B&
  272.       Height          =   255
  273.       Index           =   21
  274.       Left            =   9000
  275.       TabIndex        =   2
  276.       Top             =   0
  277.       Width           =   135
  278.    End
  279.    Begin VB.Label dot 
  280.       BackStyle       =   0  'Transparent
  281.       Caption         =   "."
  282.       ForeColor       =   &H8000000B&
  283.       Height          =   255
  284.       Index           =   22
  285.       Left            =   9000
  286.       TabIndex        =   1
  287.       Top             =   0
  288.       Width           =   135
  289.    End
  290.    Begin VB.Label dot 
  291.       BackStyle       =   0  'Transparent
  292.       Caption         =   "."
  293.       ForeColor       =   &H8000000B&
  294.       Height          =   255
  295.       Index           =   23
  296.       Left            =   9000
  297.       TabIndex        =   0
  298.       Top             =   0
  299.       Width           =   135
  300.    End
  301. End
  302. Attribute VB_Name = "Xp_Frame"
  303. Attribute VB_GlobalNameSpace = False
  304. Attribute VB_Creatable = True
  305. Attribute VB_PredeclaredId = False
  306. Attribute VB_Exposed = False
  307. '*   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *
  308. '  *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *   *
  309. '*   *  This code is originaly writen by Aleks Kimhi - Aki.                                               *
  310. '  *    As you might have read that this ActiveX control is free,                 O                       *
  311. '*   *  and therefore can be distributed for free as long as you                                              *
  312. '  *    do not sell it for profit and there's still my name on it.                               ____|            *
  313. '*   *  I've spend some time on this project so please                                                            *
  314. '  *    don't just take it, use it and say you wrote it.                                                               *
  315. '*   *  Thank you for your co-operation. Any comments,                           P                          *
  316. '  *    good or bad, would be greatly appreciated.                                                               *
  317. '*   *  E -mail: aniram@ zahav.net.il                                                                               *
  318. '  *    Tel-Aviv, Israel    A & M