home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / adpipeax / click.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1999-03-31  |  981 b   |  31 lines
  1. VERSION 5.00
  2. Begin VB.Form frmClickLine 
  3.    Caption         =   "Click-A-Line"
  4.    ClientHeight    =   4620
  5.    ClientLeft      =   450
  6.    ClientTop       =   2085
  7.    ClientWidth     =   4995
  8.    ClipControls    =   0   'False
  9.    BeginProperty Font 
  10.       Name            =   "MS Sans Serif"
  11.       Size            =   8.25
  12.       Charset         =   0
  13.       Weight          =   700
  14.       Underline       =   0   'False
  15.       Italic          =   0   'False
  16.       Strikethrough   =   0   'False
  17.    EndProperty
  18.    LinkTopic       =   "Form2"
  19.    MDIChild        =   -1  'True
  20.    PaletteMode     =   1  'UseZOrder
  21.    ScaleHeight     =   4620
  22.    ScaleWidth      =   4995
  23. Attribute VB_Name = "frmClickLine"
  24. Attribute VB_GlobalNameSpace = False
  25. Attribute VB_Creatable = False
  26. Attribute VB_PredeclaredId = True
  27. Attribute VB_Exposed = False
  28. Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
  29.     Line -(X, Y)
  30. End Sub
  31.