home *** CD-ROM | disk | FTP | other *** search
/ Tools / WinSN5.0Ver.iso / PVb5.0 / VB / TEMPLATE / FORMS / SPLASH.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1997-02-17  |  6.4 KB  |  196 lines
  1. VERSION 5.00
  2. Begin VB.Form frmSplash 
  3.    BorderStyle     =   3  'Fixed Dialog
  4.    ClientHeight    =   4245
  5.    ClientLeft      =   255
  6.    ClientTop       =   1410
  7.    ClientWidth     =   7380
  8.    ClipControls    =   0   'False
  9.    ControlBox      =   0   'False
  10.    Icon            =   "splash.frx":0000
  11.    KeyPreview      =   -1  'True
  12.    LinkTopic       =   "Form2"
  13.    MaxButton       =   0   'False
  14.    MinButton       =   0   'False
  15.    ScaleHeight     =   4245
  16.    ScaleWidth      =   7380
  17.    ShowInTaskbar   =   0   'False
  18.    StartUpPosition =   2  '
  19.    Begin VB.Frame Frame1 
  20.       Height          =   4050
  21.       Left            =   150
  22.       TabIndex        =   0
  23.       Top             =   60
  24.       Width           =   7080
  25.       Begin VB.Image imgLogo 
  26.          Height          =   2385
  27.          Left            =   360
  28.          Picture         =   "splash.frx":000C
  29.          Stretch         =   -1  'True
  30.          Top             =   795
  31.          Width           =   1815
  32.       End
  33.       Begin VB.Label lblCopyright 
  34.          Caption         =   "
  35.          BeginProperty Font 
  36.             Name            =   "
  37.             Size            =   9
  38.             Charset         =   0
  39.             Weight          =   400
  40.             Underline       =   0   'False
  41.             Italic          =   0   'False
  42.             Strikethrough   =   0   'False
  43.          EndProperty
  44.          Height          =   255
  45.          Left            =   4560
  46.          TabIndex        =   4
  47.          Top             =   3060
  48.          Width           =   2415
  49.       End
  50.       Begin VB.Label lblCompany 
  51.          Caption         =   "
  52.          BeginProperty Font 
  53.             Name            =   "
  54.             Size            =   9
  55.             Charset         =   0
  56.             Weight          =   400
  57.             Underline       =   0   'False
  58.             Italic          =   0   'False
  59.             Strikethrough   =   0   'False
  60.          EndProperty
  61.          Height          =   255
  62.          Left            =   4560
  63.          TabIndex        =   3
  64.          Top             =   3360
  65.          Width           =   2415
  66.       End
  67.       Begin VB.Label lblWarning 
  68.          Caption         =   "
  69.          BeginProperty Font 
  70.             Name            =   "
  71.             Size            =   9
  72.             Charset         =   0
  73.             Weight          =   400
  74.             Underline       =   0   'False
  75.             Italic          =   0   'False
  76.             Strikethrough   =   0   'False
  77.          EndProperty
  78.          Height          =   195
  79.          Left            =   150
  80.          TabIndex        =   2
  81.          Top             =   3660
  82.          Width           =   6855
  83.       End
  84.       Begin VB.Label lblVersion 
  85.          Alignment       =   1  'Right Justify
  86.          AutoSize        =   -1  'True
  87.          Caption         =   "
  88.          BeginProperty Font 
  89.             Name            =   "
  90.             Size            =   12
  91.             Charset         =   0
  92.             Weight          =   700
  93.             Underline       =   0   'False
  94.             Italic          =   0   'False
  95.             Strikethrough   =   0   'False
  96.          EndProperty
  97.          Height          =   285
  98.          Left            =   6345
  99.          TabIndex        =   5
  100.          Top             =   2700
  101.          Width           =   510
  102.       End
  103.       Begin VB.Label lblPlatform 
  104.          Alignment       =   1  'Right Justify
  105.          AutoSize        =   -1  'True
  106.          Caption         =   "
  107.          BeginProperty Font 
  108.             Name            =   "
  109.             Size            =   15.75
  110.             Charset         =   0
  111.             Weight          =   700
  112.             Underline       =   0   'False
  113.             Italic          =   0   'False
  114.             Strikethrough   =   0   'False
  115.          EndProperty
  116.          Height          =   360
  117.          Left            =   6195
  118.          TabIndex        =   6
  119.          Top             =   2340
  120.          Width           =   660
  121.       End
  122.       Begin VB.Label lblProductName 
  123.          AutoSize        =   -1  'True
  124.          Caption         =   "
  125.          BeginProperty Font 
  126.             Name            =   "
  127.             Size            =   32.25
  128.             Charset         =   0
  129.             Weight          =   700
  130.             Underline       =   0   'False
  131.             Italic          =   0   'False
  132.             Strikethrough   =   0   'False
  133.          EndProperty
  134.          Height          =   765
  135.          Left            =   2520
  136.          TabIndex        =   8
  137.          Top             =   1140
  138.          Width           =   1320
  139.       End
  140.       Begin VB.Label lblLicenseTo 
  141.          Alignment       =   1  'Right Justify
  142.          Caption         =   "
  143.          BeginProperty Font 
  144.             Name            =   "
  145.             Size            =   9
  146.             Charset         =   0
  147.             Weight          =   400
  148.             Underline       =   0   'False
  149.             Italic          =   0   'False
  150.             Strikethrough   =   0   'False
  151.          EndProperty
  152.          Height          =   255
  153.          Left            =   120
  154.          TabIndex        =   1
  155.          Top             =   240
  156.          Width           =   6855
  157.       End
  158.       Begin VB.Label lblCompanyProduct 
  159.          AutoSize        =   -1  'True
  160.          Caption         =   "
  161.          BeginProperty Font 
  162.             Name            =   "
  163.             Size            =   18
  164.             Charset         =   0
  165.             Weight          =   700
  166.             Underline       =   0   'False
  167.             Italic          =   0   'False
  168.             Strikethrough   =   0   'False
  169.          EndProperty
  170.          Height          =   435
  171.          Left            =   2355
  172.          TabIndex        =   7
  173.          Top             =   705
  174.          Width           =   1500
  175.       End
  176.    End
  177. Attribute VB_Name = "frmSplash"
  178. Attribute VB_GlobalNameSpace = False
  179. Attribute VB_Creatable = False
  180. Attribute VB_PredeclaredId = True
  181. Attribute VB_Exposed = False
  182. Option Explicit
  183. Private Sub Form_KeyPress(KeyAscii As Integer)
  184.     Unload Me
  185. End Sub
  186. Private Sub Form_Load()
  187.     lblVersion.Caption = "
  188.  " & App.Major & "." & App.Minor & "." & App.Revision
  189.     lblProductName.Caption = App.Title
  190. End Sub
  191. Private Sub Frame1_Click()
  192.     Unload Me
  193. End Sub
  194. Private Sub lblCompanyProduct_Click()
  195. End Sub
  196.