home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic 4 Unleashed / Visual_Basic_4_Unleashed_SAMS_Publishing_1995.iso / truegrid / disk1 / dbtable / dbtable.$ / ABOUT.FRM (.txt) next >
Encoding:
Visual Basic Form  |  1995-02-17  |  2.9 KB  |  95 lines
  1. VERSION 2.00
  2. Begin Form About 
  3.    BackColor       =   &H00FFFFFF&
  4.    BorderStyle     =   3  'Fixed Double
  5.    Caption         =   "TrueGrid 2.1"
  6.    ClientHeight    =   2115
  7.    ClientLeft      =   2355
  8.    ClientTop       =   2625
  9.    ClientWidth     =   4470
  10.    ClipControls    =   0   'False
  11.    ControlBox      =   0   'False
  12.    Height          =   2520
  13.    Left            =   2295
  14.    LinkTopic       =   "Form3"
  15.    MaxButton       =   0   'False
  16.    MinButton       =   0   'False
  17.    ScaleHeight     =   2115
  18.    ScaleWidth      =   4470
  19.    Top             =   2280
  20.    Width           =   4590
  21.    Begin PictureBox Picture1 
  22.       BorderStyle     =   0  'None
  23.       Height          =   495
  24.       Left            =   240
  25.       Picture         =   ABOUT.FRX:0000
  26.       ScaleHeight     =   495
  27.       ScaleWidth      =   555
  28.       TabIndex        =   4
  29.       Top             =   840
  30.       Width           =   555
  31.    End
  32.    Begin CommandButton OK 
  33.       Caption         =   "&OK"
  34.       Default         =   -1  'True
  35.       Height          =   435
  36.       Left            =   1770
  37.       TabIndex        =   2
  38.       Top             =   915
  39.       Width           =   915
  40.    End
  41.    Begin Label Label3 
  42.       Alignment       =   2  'Center
  43.       BackColor       =   &H00FFFFFF&
  44.       Caption         =   "Copyright (c) Apex Software Corporation, 1993.  All rights reserved."
  45.       FontBold        =   0   'False
  46.       FontItalic      =   0   'False
  47.       FontName        =   "MS Sans Serif"
  48.       FontSize        =   8.25
  49.       FontStrikethru  =   0   'False
  50.       FontUnderline   =   0   'False
  51.       Height          =   435
  52.       Left            =   480
  53.       TabIndex        =   3
  54.       Top             =   1500
  55.       Width           =   3495
  56.    End
  57.    Begin Label Label2 
  58.       Alignment       =   2  'Center
  59.       BackColor       =   &H00FFFFFF&
  60.       Caption         =   "Apex Software Corporation"
  61.       Height          =   255
  62.       Left            =   960
  63.       TabIndex        =   1
  64.       Top             =   585
  65.       Width           =   2535
  66.    End
  67.    Begin Label Label1 
  68.       Alignment       =   2  'Center
  69.       BackColor       =   &H00FFFFFF&
  70.       Caption         =   "dBTable Sample"
  71.       FontBold        =   -1  'True
  72.       FontItalic      =   0   'False
  73.       FontName        =   "MS Sans Serif"
  74.       FontSize        =   9.75
  75.       FontStrikethru  =   0   'False
  76.       FontUnderline   =   0   'False
  77.       Height          =   255
  78.       Left            =   1320
  79.       TabIndex        =   0
  80.       Top             =   225
  81.       Width           =   1815
  82.    End
  83. Sub CenterForm (F As Form)
  84. ' Center the specified form within the screen
  85.     F.Move (Screen.Width - F.Width) \ 2, (Screen.Height - F.Height) \ 2
  86. End Sub
  87. Sub Form_Load ()
  88.     'Centers the Form on the Screen
  89.     CenterForm About
  90. End Sub
  91. Sub OK_Click ()
  92.     'Unloads the About Box
  93.     Unload About
  94. End Sub
  95.