home *** CD-ROM | disk | FTP | other *** search
/ Mastering Visual Basic 5 / MasteringVisualBasic5.iso / protview / demowinx / data.2 / marquee / samples / VB / TICKER / MQFRM.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1996-10-23  |  3.3 KB  |  99 lines
  1. VERSION 4.00
  2. Begin VB.Form MqFrm
  3.    Caption         =   "The Marquee Control"
  4.    ClientHeight    =   2040
  5.    ClientLeft      =   1140
  6.    ClientTop       =   1515
  7.    ClientWidth     =   6000
  8.    Height          =   2445
  9.    Left            =   1080
  10.    LinkTopic       =   "Form1"
  11.    ScaleHeight     =   2040
  12.    ScaleWidth      =   6000
  13.    Top             =   1170
  14.    Width           =   6120
  15.    Begin VB.CommandButton DoneBtn
  16.       Caption         =   "&OK"
  17.       Height          =   495
  18.       Left            =   4440
  19.       TabIndex        =   1
  20.       Top             =   1440
  21.       Width           =   1455
  22.    End
  23.    Begin VB.Label Label1
  24.       Caption         =   "The Marquee control with pictures, text, colors and fonts."
  25.       Height          =   375
  26.       Left            =   120
  27.       TabIndex        =   2
  28.       Top             =   1560
  29.       Width           =   4095
  30.    End
  31.    Begin PVMarqueeLib.PVMarquee Marquee1
  32.       Height          =   1215
  33.       Left            =   120
  34.       TabIndex        =   0
  35.       Top             =   120
  36.       Width           =   5775
  37.       _Version        =   65538
  38.       _ExtentX        =   10186
  39.       _ExtentY        =   2143
  40.       _StockProps     =   29
  41.       Text            =   $"MqFrm.frx":0000
  42.       BackColor       =   16777215
  43.       Picture1        =   "MqFrm.frx":00BF
  44.       Picture2        =   "MqFrm.frx":0891
  45.       Picture3        =   "MqFrm.frx":10BB
  46.       BeginProperty Font1 {0BE35203-8F91-11CE-9DE3-00AA004BB851}
  47.          name            =   "MS Sans Serif"
  48.          charset         =   0
  49.          weight          =   400
  50.          size            =   12
  51.          underline       =   0   'False
  52.          italic          =   0   'False
  53.          strikethrough   =   0   'False
  54.       EndProperty
  55.       BeginProperty Font2 {0BE35203-8F91-11CE-9DE3-00AA004BB851}
  56.          name            =   "MS Sans Serif"
  57.          charset         =   0
  58.          weight          =   400
  59.          size            =   12
  60.          underline       =   0   'False
  61.          italic          =   0   'False
  62.          strikethrough   =   0   'False
  63.       EndProperty
  64.       BeginProperty Font3 {0BE35203-8F91-11CE-9DE3-00AA004BB851}
  65.          name            =   "MS Sans Serif"
  66.          charset         =   0
  67.          weight          =   400
  68.          size            =   12
  69.          underline       =   0   'False
  70.          italic          =   0   'False
  71.          strikethrough   =   0   'False
  72.       EndProperty
  73.       BeginProperty Font4 {0BE35203-8F91-11CE-9DE3-00AA004BB851}
  74.          name            =   "MS Sans Serif"
  75.          charset         =   0
  76.          weight          =   400
  77.          size            =   12
  78.          underline       =   0   'False
  79.          italic          =   0   'False
  80.          strikethrough   =   0   'False
  81.       EndProperty
  82.       BeginProperty Font5 {0BE35203-8F91-11CE-9DE3-00AA004BB851}
  83.          name            =   "MS Sans Serif"
  84.          charset         =   0
  85.          weight          =   400
  86.          size            =   12
  87.          underline       =   0   'False
  88.          italic          =   0   'False
  89.          strikethrough   =   0   'False
  90.       EndProperty
  91.       Text            =   $"MqFrm.frx":254D
  92.    End
  93. Attribute VB_Name = "MqFrm"
  94. Attribute VB_Creatable = False
  95. Attribute VB_Exposed = False
  96. Private Sub DoneBtn_Click()
  97. Unload MqFrm
  98. End Sub
  99.