home *** CD-ROM | disk | FTP | other *** search
/ ActiveX Programming Unleashed CD / AXU.iso / activex / demos / oletrial / samples / vb / mhsubc / fchild.frm (.txt) next >
Encoding:
Visual Basic Form  |  1995-11-30  |  2.5 KB  |  88 lines
  1. VERSION 4.00
  2. Begin VB.Form fChild 
  3.    Caption         =   "Form1"
  4.    ClientHeight    =   3990
  5.    ClientLeft      =   1845
  6.    ClientTop       =   2610
  7.    ClientWidth     =   8235
  8.    Height          =   4680
  9.    Left            =   1785
  10.    LinkTopic       =   "Form1"
  11.    MDIChild        =   -1  'True
  12.    ScaleHeight     =   3990
  13.    ScaleWidth      =   8235
  14.    Top             =   1980
  15.    Width           =   8355
  16.    Begin VB.ListBox lstMsg 
  17.       Height          =   3765
  18.       Left            =   120
  19.       TabIndex        =   0
  20.       Top             =   120
  21.       Width           =   2895
  22.    End
  23.    Begin VB.Label lblXplain5 
  24.       Caption         =   $"FCHILD.frx":0000
  25.       Height          =   855
  26.       Left            =   3120
  27.       TabIndex        =   5
  28.       Top             =   3000
  29.       Width           =   4935
  30.    End
  31.    Begin VB.Label lblXplain4 
  32.       Caption         =   $"FCHILD.frx":00D9
  33.       Height          =   855
  34.       Left            =   3120
  35.       TabIndex        =   4
  36.       Top             =   2040
  37.       Width           =   5055
  38.    End
  39.    Begin VB.Label lblXplain3 
  40.       Caption         =   $"FCHILD.frx":01DD
  41.       Height          =   495
  42.       Left            =   3120
  43.       TabIndex        =   3
  44.       Top             =   1440
  45.       Width           =   4935
  46.    End
  47.    Begin VB.Label lblXplain2 
  48.       Caption         =   "There are only three steps to subclassing:"
  49.       Height          =   255
  50.       Left            =   3120
  51.       TabIndex        =   2
  52.       Top             =   1080
  53.       Width           =   3855
  54.    End
  55.    Begin VB.Label lblXplain 
  56.       Caption         =   $"FCHILD.frx":025E
  57.       Height          =   855
  58.       Left            =   3120
  59.       TabIndex        =   1
  60.       Top             =   120
  61.       Width           =   4935
  62.       WordWrap        =   -1  'True
  63.    End
  64.    Begin VB.Menu mnuFile 
  65.       Caption         =   "&File"
  66.       Begin VB.Menu itmExit 
  67.          Caption         =   "E&xit"
  68.       End
  69.    End
  70.    Begin VB.Menu mnuMenu 
  71.       Caption         =   "&Menu"
  72.       Begin VB.Menu itmOne 
  73.          Caption         =   "Test Menu Item &One"
  74.       End
  75.       Begin VB.Menu itmTwo 
  76.          Caption         =   "Test Menu Item &Two"
  77.       End
  78.       Begin VB.Menu itmThree 
  79.          Caption         =   "Test Menu Item T&hree"
  80.       End
  81.    End
  82. Attribute VB_Name = "fChild"
  83. Attribute VB_Creatable = False
  84. Attribute VB_Exposed = False
  85. Option Explicit
  86. Private Sub itmExit_Click()
  87. End Sub
  88.