home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic 4 Unleashed / Visual_Basic_4_Unleashed_SAMS_Publishing_1995.iso / source / chap21 / frmpic.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1995-08-25  |  1.7 KB  |  60 lines
  1. VERSION 4.00
  2. Begin VB.Form formpicclip 
  3.    Caption         =   "Form1"
  4.    ClientHeight    =   2985
  5.    ClientLeft      =   2955
  6.    ClientTop       =   2070
  7.    ClientWidth     =   3405
  8.    Height          =   3390
  9.    Left            =   2895
  10.    LinkTopic       =   "Form1"
  11.    ScaleHeight     =   2985
  12.    ScaleWidth      =   3405
  13.    Top             =   1725
  14.    Width           =   3525
  15.    Begin Threed.SSCommand cmdHelp 
  16.       Height          =   495
  17.       Left            =   1860
  18.       TabIndex        =   1
  19.       Top             =   2100
  20.       Width           =   1215
  21.       _Version        =   65536
  22.       _ExtentX        =   2143
  23.       _ExtentY        =   873
  24.       _StockProps     =   78
  25.       AutoSize        =   2
  26.    End
  27.    Begin Threed.SSCommand cmdPrint 
  28.       Height          =   495
  29.       Left            =   240
  30.       TabIndex        =   0
  31.       Top             =   2100
  32.       Width           =   1215
  33.       _Version        =   65536
  34.       _ExtentX        =   2143
  35.       _ExtentY        =   873
  36.       _StockProps     =   78
  37.       AutoSize        =   2
  38.    End
  39.    Begin PicClip.PictureClip PictureClip1 
  40.       Left            =   300
  41.       Top             =   300
  42.       _Version        =   65536
  43.       _ExtentX        =   3810
  44.       _ExtentY        =   2328
  45.       _StockProps     =   0
  46.       Rows            =   4
  47.       Cols            =   6
  48.       Picture         =   "Frmpic.frx":0000
  49.    End
  50. Attribute VB_Name = "formpicclip"
  51. Attribute VB_Creatable = False
  52. Attribute VB_Exposed = False
  53. Option Explicit
  54. Private Sub SSCommand2_Click()
  55. End Sub
  56. Private Sub Form_Load()
  57. cmdhelp.picture = PictureClip1.GraphicCell(6)
  58. cmdprint.picture = PictureClip1.GraphicCell(5)
  59. End Sub
  60.