home *** CD-ROM | disk | FTP | other *** search
- VERSION 2.00
- Begin Form frmHelp
- BackColor = &H8000000F&
- BorderStyle = 1 'Fixed Single
- ClientHeight = 495
- ClientLeft = 1095
- ClientTop = 1485
- ClientWidth = 2340
- ControlBox = 0 'False
- Height = 900
- HelpContextID = 3
- Left = 1035
- LinkTopic = "Form2"
- MaxButton = 0 'False
- MinButton = 0 'False
- ScaleHeight = 495
- ScaleWidth = 2340
- Top = 1140
- Width = 2460
- Begin Label Label1
- AutoSize = -1 'True
- BackColor = &H8000000F&
- Caption = "Label1"
- FontBold = 0 'False
- FontItalic = 0 'False
- FontName = "MS Sans Serif"
- FontSize = 8.25
- FontStrikethru = 0 'False
- FontUnderline = 0 'False
- Height = 195
- Left = 2100
- TabIndex = 0
- Top = 2400
- Width = 480
- End
- Option Explicit
- Sub Form_Load ()
- ' Get rid of the forms Caption so title bar does not display:
- Me.Caption = ""
- ' Give the form and label a light yellow background:
- Me.BackColor = &H80FFFF
- Label1.BackColor = &H80FFFF
- ' Inset label by 1 pixel:
- Label1.Left = 1 * Screen.TwipsPerPixelX
- Label1.Top = 0
- End Sub
-