home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / getdis1r / frmsplas.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1999-07-26  |  2.4 KB  |  82 lines
  1. VERSION 5.00
  2. Begin VB.Form frmSplash 
  3.    Caption         =   "Welcome Message"
  4.    ClientHeight    =   1440
  5.    ClientLeft      =   48
  6.    ClientTop       =   336
  7.    ClientWidth     =   3780
  8.    ControlBox      =   0   'False
  9.    LinkTopic       =   "Form2"
  10.    ScaleHeight     =   1440
  11.    ScaleWidth      =   3780
  12.    StartUpPosition =   2  'CenterScreen
  13.    Begin VB.CommandButton Cancel 
  14.       Caption         =   "&Exit"
  15.       Height          =   372
  16.       Left            =   2280
  17.       TabIndex        =   3
  18.       Top             =   1080
  19.       Width           =   972
  20.    End
  21.    Begin VB.CommandButton cmdOK 
  22.       Caption         =   "&OK"
  23.       Default         =   -1  'True
  24.       Height          =   372
  25.       Left            =   600
  26.       TabIndex        =   1
  27.       Top             =   1080
  28.       Width           =   972
  29.    End
  30.    Begin VB.Label Label1 
  31.       Alignment       =   2  'Center
  32.       BackColor       =   &H8000000E&
  33.       Caption         =   "<Your Program Name Here>"
  34.       BeginProperty Font 
  35.          Name            =   "Arial"
  36.          Size            =   12
  37.          Charset         =   0
  38.          Weight          =   400
  39.          Underline       =   0   'False
  40.          Italic          =   0   'False
  41.          Strikethrough   =   0   'False
  42.       EndProperty
  43.       Height          =   372
  44.       Left            =   0
  45.       TabIndex        =   2
  46.       Top             =   0
  47.       Width           =   3816
  48.    End
  49.    Begin VB.Label Version 
  50.       BackColor       =   &H8000000E&
  51.       Caption         =   "<Version here when you run it>"
  52.       BeginProperty Font 
  53.          Name            =   "Arial"
  54.          Size            =   10.8
  55.          Charset         =   0
  56.          Weight          =   700
  57.          Underline       =   0   'False
  58.          Italic          =   0   'False
  59.          Strikethrough   =   0   'False
  60.       EndProperty
  61.       Height          =   252
  62.       Left            =   0
  63.       TabIndex        =   0
  64.       Top             =   720
  65.       Width           =   3816
  66.    End
  67. Attribute VB_Name = "frmSplash"
  68. Attribute VB_GlobalNameSpace = False
  69. Attribute VB_Creatable = False
  70. Attribute VB_PredeclaredId = True
  71. Attribute VB_Exposed = False
  72. Private Sub Cancel_Click()
  73. Unload Me
  74. End Sub
  75. Private Sub cmdOK_Click()
  76. frmBrowser.Show
  77. Unload Me
  78. End Sub
  79. Private Sub Form_Load()
  80. Version.Caption = "Version " & App.Major & "." & App.Minor
  81. End Sub
  82.