VERSION 5.00
Begin VB.Form frm1 
   Caption         =   "Задание 5.11"
   ClientHeight    =   3912
   ClientLeft      =   3672
   ClientTop       =   2676
   ClientWidth     =   5136
   LinkTopic       =   "Form1"
   ScaleHeight     =   3912
   ScaleWidth      =   5136
   Begin VB.CommandButton cmd1 
      Caption         =   "Собрать"
      Height          =   615
      Left            =   1800
      TabIndex        =   4
      Top             =   3120
      Width           =   1695
   End
   Begin VB.PictureBox pic4 
      AutoSize        =   -1  'True
      Height          =   975
      Left            =   3000
      ScaleHeight     =   924
      ScaleWidth      =   324
      TabIndex        =   3
      Top             =   1920
      Width           =   375
   End
   Begin VB.PictureBox pic3 
      AutoSize        =   -1  'True
      Height          =   495
      Left            =   120
      ScaleHeight     =   444
      ScaleWidth      =   1884
      TabIndex        =   2
      Top             =   2280
      Width           =   1935
   End
   Begin VB.PictureBox pic2 
      AutoSize        =   -1  'True
      Height          =   855
      Left            =   2760
      ScaleHeight     =   804
      ScaleWidth      =   1524
      TabIndex        =   1
      Top             =   0
      Width           =   1575
   End
   Begin VB.PictureBox pic1 
      AutoSize        =   -1  'True
      Height          =   855
      Left            =   240
      ScaleHeight     =   804
      ScaleWidth      =   1164
      TabIndex        =   0
      Top             =   120
      Width           =   1215
   End
End
Attribute VB_Name = "frm1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub Form_Load()
pic1.Picture = LoadPicture("E:\practicum\VisualBasic\Project\Z5_11\comp1.gif")
pic2.Picture = LoadPicture("E:\practicum\VisualBasic\Project\Z5_11\comp2.gif")
pic3.Picture = LoadPicture("E:\practicum\VisualBasic\Project\Z5_11\comp3.gif")
pic4.Picture = LoadPicture("E:\practicum\VisualBasic\Project\Z5_11\comp4.gif")
End Sub
Private Sub cmd1_Click()
pic1.Left = 0
pic1.Top = 0
pic2.Left = 0
pic2.Top = 1600
pic3.Left = 2650
pic3.Top = 0
pic4.Left = 2650
pic4.Top = 1600
End Sub
