home *** CD-ROM | disk | FTP | other *** search
/ Internet Publisher's Toolbox 1.0 / Image.iso / toolbox / httpdsrv / vbs31src / aboutbox.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1994-12-29  |  5.2 KB  |  163 lines

  1. VERSION 2.00
  2. Begin Form AboutBox 
  3.    BackColor       =   &H00C0C0C0&
  4.    BorderStyle     =   1  'Fixed Single
  5.    Caption         =   "About Visual Data"
  6.    ClientHeight    =   3345
  7.    ClientLeft      =   2580
  8.    ClientTop       =   2250
  9.    ClientWidth     =   4605
  10.    ControlBox      =   0   'False
  11.    FontBold        =   -1  'True
  12.    FontItalic      =   0   'False
  13.    FontName        =   "System"
  14.    FontSize        =   9.75
  15.    FontStrikethru  =   0   'False
  16.    FontUnderline   =   0   'False
  17.    Height          =   3750
  18.    Left            =   2520
  19.    LinkMode        =   1  'Source
  20.    LinkTopic       =   "Form1"
  21.    MaxButton       =   0   'False
  22.    MinButton       =   0   'False
  23.    ScaleHeight     =   3345
  24.    ScaleWidth      =   4605
  25.    Top             =   1905
  26.    Width           =   4725
  27.    Begin PictureBox PIC_Icon 
  28.       BackColor       =   &H00C0C0C0&
  29.       BorderStyle     =   0  'None
  30.       Height          =   495
  31.       Left            =   240
  32.       Picture         =   ABOUTBOX.FRX:0000
  33.       ScaleHeight     =   495
  34.       ScaleWidth      =   480
  35.       TabIndex        =   1
  36.       Top             =   240
  37.       Width           =   480
  38.    End
  39.    Begin CommandButton OkayButton 
  40.       Cancel          =   -1  'True
  41.       Caption         =   "&OK"
  42.       Default         =   -1  'True
  43.       Height          =   360
  44.       Left            =   1920
  45.       TabIndex        =   0
  46.       Top             =   2880
  47.       Width           =   1080
  48.    End
  49.    Begin Line Line2 
  50.       X1              =   240
  51.       X2              =   4320
  52.       Y1              =   1920
  53.       Y2              =   1920
  54.    End
  55.    Begin Line Line1 
  56.       X1              =   240
  57.       X2              =   4320
  58.       Y1              =   840
  59.       Y2              =   840
  60.    End
  61.    Begin Label Label4 
  62.       BackStyle       =   0  'Transparent
  63.       Caption         =   "December 29, 1994"
  64.       FontBold        =   0   'False
  65.       FontItalic      =   0   'False
  66.       FontName        =   "MS Sans Serif"
  67.       FontSize        =   8.25
  68.       FontStrikethru  =   0   'False
  69.       FontUnderline   =   0   'False
  70.       Height          =   255
  71.       Left            =   360
  72.       TabIndex        =   7
  73.       Top             =   2520
  74.       Width           =   1815
  75.    End
  76.    Begin Label Label3 
  77.       BackStyle       =   0  'Transparent
  78.       Caption         =   "Robert B. Denny <rdenny@netcom.com>"
  79.       FontBold        =   0   'False
  80.       FontItalic      =   0   'False
  81.       FontName        =   "MS Sans Serif"
  82.       FontSize        =   8.25
  83.       FontStrikethru  =   0   'False
  84.       FontUnderline   =   0   'False
  85.       Height          =   255
  86.       Left            =   360
  87.       TabIndex        =   6
  88.       Top             =   2280
  89.       Width           =   3615
  90.    End
  91.    Begin Label Label2 
  92.       BackStyle       =   0  'Transparent
  93.       Caption         =   "Modified by:"
  94.       FontBold        =   0   'False
  95.       FontItalic      =   0   'False
  96.       FontName        =   "MS Sans Serif"
  97.       FontSize        =   8.25
  98.       FontStrikethru  =   0   'False
  99.       FontUnderline   =   0   'False
  100.       Height          =   255
  101.       Left            =   240
  102.       TabIndex        =   5
  103.       Top             =   2040
  104.       Width           =   3135
  105.    End
  106.    Begin Label LAB_1 
  107.       BackColor       =   &H00C0C0C0&
  108.       Caption         =   "Microsoft Visual Basic Professional 3.0"
  109.       FontBold        =   0   'False
  110.       FontItalic      =   0   'False
  111.       FontName        =   "MS Sans Serif"
  112.       FontSize        =   8.25
  113.       FontStrikethru  =   0   'False
  114.       FontUnderline   =   0   'False
  115.       Height          =   270
  116.       Left            =   960
  117.       TabIndex        =   2
  118.       Top             =   240
  119.       Width           =   3735
  120.    End
  121.    Begin Label LAB_2 
  122.       BackColor       =   &H00C0C0C0&
  123.       Caption         =   "Visual Data Sample Application V3.03"
  124.       FontBold        =   0   'False
  125.       FontItalic      =   0   'False
  126.       FontName        =   "MS Sans Serif"
  127.       FontSize        =   8.25
  128.       FontStrikethru  =   0   'False
  129.       FontUnderline   =   0   'False
  130.       Height          =   210
  131.       Left            =   960
  132.       TabIndex        =   3
  133.       Top             =   480
  134.       Width           =   3615
  135.    End
  136.    Begin Label Label1 
  137.       BackColor       =   &H00C0C0C0&
  138.       Caption         =   "This version has been modified in accordance with PSS Article #Q115976 for the VB/Access 2.0 Compatibility Layer. In addition, it has been modified to display QueryDefs when clicked in the table/query list."
  139.       FontBold        =   0   'False
  140.       FontItalic      =   0   'False
  141.       FontName        =   "MS Sans Serif"
  142.       FontSize        =   8.25
  143.       FontStrikethru  =   0   'False
  144.       FontUnderline   =   0   'False
  145.       Height          =   855
  146.       Left            =   240
  147.       TabIndex        =   4
  148.       Top             =   960
  149.       Width           =   4095
  150.    End
  151. Sub Form_KeyPress (KeyAscii As Integer)
  152.   Unload Me
  153. End Sub
  154. Sub Form_Load ()
  155.   Left = (Screen.Width - Width) / 2
  156. End Sub
  157. Sub OkayButton_Click ()
  158.   Unload Me
  159. End Sub
  160. Sub OkayButton_KeyPress (KeyAscii As Integer)
  161.   Unload Me
  162. End Sub
  163.