home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / Basic / Samples / 3CTRLS / 3CTRLS.ZIP / FORM1.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1993-09-16  |  1.7 KB  |  61 lines
  1. VERSION 2.00
  2. Begin Form Form1 
  3.    Caption         =   "Form1"
  4.    ClientHeight    =   4875
  5.    ClientLeft      =   1245
  6.    ClientTop       =   1605
  7.    ClientWidth     =   7215
  8.    Height          =   5340
  9.    Left            =   1155
  10.    LinkTopic       =   "Form1"
  11.    ScaleHeight     =   4875
  12.    ScaleWidth      =   7215
  13.    Top             =   1230
  14.    Width           =   7395
  15.    Begin VideoSoftElastic VSElastic1 
  16.       Align           =   5  'Fill Container
  17.       BackColor       =   &H00C0C0C0&
  18.       Height          =   4875
  19.       Left            =   0
  20.       TabIndex        =   0
  21.       Top             =   0
  22.       Width           =   7215
  23.       Begin VScrollBar VScroll1 
  24.          Height          =   3900
  25.          Left            =   6555
  26.          TabIndex        =   4
  27.          Top             =   465
  28.          Width           =   510
  29.       End
  30.       Begin CommandButton Command1 
  31.          Caption         =   "Command1"
  32.          Height          =   2340
  33.          Left            =   780
  34.          TabIndex        =   3
  35.          Top             =   570
  36.          Width           =   1515
  37.       End
  38.       Begin TextBox Text2 
  39.          Height          =   2430
  40.          Left            =   2820
  41.          TabIndex        =   2
  42.          Text            =   "Text2"
  43.          Top             =   1530
  44.          Width           =   3660
  45.       End
  46.       Begin TextBox Text1 
  47.          Height          =   555
  48.          Left            =   2865
  49.          TabIndex        =   1
  50.          Text            =   "Text1"
  51.          Top             =   540
  52.          Width           =   3435
  53.       End
  54.    End
  55. Option Explicit
  56. Sub Form_Paint ()
  57.   resize
  58. End Sub
  59. Sub resize ()
  60. End Sub
  61.