home *** CD-ROM | disk | FTP | other *** search
/ Planet Source Code Jumbo …e CD Visual Basic 1 to 7 / 5_2007-2008.ISO / data / Zips / airline_re204714292007.psc / frmAllEmp.frm < prev    next >
Text File  |  2003-04-12  |  2KB  |  59 lines
  1. VERSION 5.00
  2. Object = "{0ECD9B60-23AA-11D0-B351-00A0C9055D8E}#6.0#0"; "mshflxgd.ocx"
  3. Begin VB.Form frmAllEmp 
  4.    Caption         =   "All Details"
  5.    ClientHeight    =   3195
  6.    ClientLeft      =   60
  7.    ClientTop       =   345
  8.    ClientWidth     =   4680
  9.    LinkTopic       =   "Form1"
  10.    MDIChild        =   -1  'True
  11.    ScaleHeight     =   3195
  12.    ScaleWidth      =   4680
  13.    Begin MSHierarchicalFlexGridLib.MSHFlexGrid MSHFlexGrid1 
  14.       Bindings        =   "frmAllEmp.frx":0000
  15.       Height          =   1200
  16.       Left            =   120
  17.       TabIndex        =   0
  18.       Top             =   0
  19.       Width           =   15090
  20.       _ExtentX        =   26617
  21.       _ExtentY        =   2117
  22.       _Version        =   393216
  23.       FixedCols       =   0
  24.       AllowUserResizing=   3
  25.       DataMember      =   "comALL"
  26.       BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
  27.          Name            =   "MS Sans Serif"
  28.          Size            =   12
  29.          Charset         =   0
  30.          Weight          =   400
  31.          Underline       =   0   'False
  32.          Italic          =   0   'False
  33.          Strikethrough   =   0   'False
  34.       EndProperty
  35.       _NumberOfBands  =   1
  36.       _Band(0).Cols   =   2
  37.    End
  38. End
  39. Attribute VB_Name = "frmAllEmp"
  40. Attribute VB_GlobalNameSpace = False
  41. Attribute VB_Creatable = False
  42. Attribute VB_PredeclaredId = True
  43. Attribute VB_Exposed = False
  44. Option Explicit
  45.  
  46. Private Sub Form_Load()
  47. prcDisableMenu
  48. End Sub
  49.  
  50. Private Sub Form_Resize()
  51. MSHFlexGrid1.Height = Me.Height - 400
  52. MSHFlexGrid1.Width = Me.Width - 400
  53. End Sub
  54.  
  55. Private Sub Form_Unload(Cancel As Integer)
  56. prcEnabledMenu
  57. End Sub
  58.  
  59.