home *** CD-ROM | disk | FTP | other *** search
/ Programming Tool Box / SIMS_2.iso / vb_code1 / fontview / intro.txt < prev    next >
Text File  |  1991-05-30  |  238b  |  14 lines
  1. Sub Timer1_Timer ()
  2.     FontViewer.Show
  3.     Unload Intro
  4. End Sub
  5.  
  6. Sub Form_Load ()
  7.     ' Initialize form position
  8.     Left = (Screen.Width - Width) / 2
  9.     Top = (Screen.Height - Height) / 2
  10.     
  11.     FontViewer.Hide
  12. End Sub
  13.  
  14.