home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / smfdoo1a / frmopen.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1999-08-13  |  1.3 KB  |  43 lines
  1. VERSION 5.00
  2. Begin VB.Form frmOpen 
  3.    BackColor       =   &H80000012&
  4.    BorderStyle     =   1  'Fixed Single
  5.    Caption         =   "Open"
  6.    ClientHeight    =   1695
  7.    ClientLeft      =   4635
  8.    ClientTop       =   2685
  9.    ClientWidth     =   1815
  10.    Icon            =   "frmOpen.frx":0000
  11.    LinkTopic       =   "Form1"
  12.    MaxButton       =   0   'False
  13.    MinButton       =   0   'False
  14.    ScaleHeight     =   1695
  15.    ScaleWidth      =   1815
  16.    Begin VB.CommandButton cmdDone 
  17.       Caption         =   "Done"
  18.       Height          =   375
  19.       Left            =   120
  20.       TabIndex        =   1
  21.       Top             =   1200
  22.       Width           =   1575
  23.    End
  24.    Begin VB.Label Label1 
  25.       BackColor       =   &H80000012&
  26.       Caption         =   "   This command opens a window and allows you to type in an address and it takes you there."
  27.       ForeColor       =   &H000000FF&
  28.       Height          =   1095
  29.       Left            =   120
  30.       TabIndex        =   0
  31.       Top             =   120
  32.       Width           =   1695
  33.    End
  34. Attribute VB_Name = "frmOpen"
  35. Attribute VB_GlobalNameSpace = False
  36. Attribute VB_Creatable = False
  37. Attribute VB_PredeclaredId = True
  38. Attribute VB_Exposed = False
  39. Private Sub cmdDone_Click()
  40.     frmOpen.Hide
  41.     frmFile.Show
  42. End Sub
  43.