home *** CD-ROM | disk | FTP | other *** search
/ Programming Tool Box / SIMS_2.iso / vb_code1 / mvhelp / about.frm next >
Text File  |  1994-01-10  |  3KB  |  113 lines
  1. VERSION 2.00
  2. Begin Form frmAbout 
  3.    BackColor       =   &H00C0C0C0&
  4.    BorderStyle     =   3  'Fixed Double
  5.    Caption         =   "About"
  6.    ClientHeight    =   2595
  7.    ClientLeft      =   1245
  8.    ClientTop       =   1605
  9.    ClientWidth     =   5535
  10.    ControlBox      =   0   'False
  11.    FillColor       =   &H00C0C0C0&
  12.    ForeColor       =   &H00C0C0C0&
  13.    Height          =   3060
  14.    Left            =   1155
  15.    LinkTopic       =   "Form2"
  16.    MaxButton       =   0   'False
  17.    MinButton       =   0   'False
  18.    ScaleHeight     =   2595
  19.    ScaleWidth      =   5535
  20.    Top             =   1230
  21.    Width           =   5715
  22.    Begin CommandButton Command1 
  23.       Caption         =   "OK"
  24.       Height          =   375
  25.       Left            =   2520
  26.       TabIndex        =   1
  27.       Top             =   2040
  28.       Width           =   855
  29.    End
  30.    Begin PictureBox Picture1 
  31.       AutoSize        =   -1  'True
  32.       Height          =   510
  33.       Left            =   240
  34.       Picture         =   ABOUT.FRX:0000
  35.       ScaleHeight     =   480
  36.       ScaleWidth      =   480
  37.       TabIndex        =   0
  38.       Top             =   240
  39.       Width           =   510
  40.    End
  41.    Begin Line Line1 
  42.       BorderWidth     =   2
  43.       X1              =   360
  44.       X2              =   5160
  45.       Y1              =   1440
  46.       Y2              =   1440
  47.    End
  48.    Begin Label Label3 
  49.       Alignment       =   2  'Center
  50.       BackStyle       =   0  'Transparent
  51.       Caption         =   "Copyright ⌐ 1994 Robert W. McGregor.  Use Freely."
  52.       Height          =   255
  53.       Left            =   360
  54.       TabIndex        =   5
  55.       Top             =   1560
  56.       Width           =   4815
  57.    End
  58.    Begin Label Label2 
  59.       Alignment       =   2  'Center
  60.       BackStyle       =   0  'Transparent
  61.       Caption         =   "Demo of Context Sensitive Help using Viewer"
  62.       Height          =   255
  63.       Left            =   360
  64.       TabIndex        =   4
  65.       Top             =   1080
  66.       Width           =   4815
  67.    End
  68.    Begin Label Label1 
  69.       BackStyle       =   0  'Transparent
  70.       Caption         =   "Context Sensitive Help With Multimedia Viewer"
  71.       FontBold        =   -1  'True
  72.       FontItalic      =   0   'False
  73.       FontName        =   "MS Sans Serif"
  74.       FontSize        =   18
  75.       FontStrikethru  =   0   'False
  76.       FontUnderline   =   0   'False
  77.       ForeColor       =   &H00FF0000&
  78.       Height          =   855
  79.       Index           =   0
  80.       Left            =   960
  81.       TabIndex        =   2
  82.       Top             =   135
  83.       Width           =   4335
  84.    End
  85.    Begin Label Label1 
  86.       BackStyle       =   0  'Transparent
  87.       Caption         =   "Context Sensitive Help With Multimedia Viewer"
  88.       FontBold        =   -1  'True
  89.       FontItalic      =   0   'False
  90.       FontName        =   "MS Sans Serif"
  91.       FontSize        =   18
  92.       FontStrikethru  =   0   'False
  93.       FontUnderline   =   0   'False
  94.       ForeColor       =   &H00808080&
  95.       Height          =   855
  96.       Index           =   1
  97.       Left            =   1010
  98.       TabIndex        =   3
  99.       Top             =   160
  100.       Width           =   4335
  101.    End
  102. End
  103. Option Explicit
  104.  
  105. Sub Command1_Click ()
  106.   Unload Me
  107. End Sub
  108.  
  109. Sub Form_Load ()
  110.   Move screen.Height \ 2 - Height \ 2, screen.Width \ 2 - Width \ 2
  111. End Sub
  112.  
  113.