VERSION 5.00
Begin VB.Form frm1 
   BackColor       =   &H0080FFFF&
   Caption         =   "Первый проект"
   ClientHeight    =   4095
   ClientLeft      =   3360
   ClientTop       =   2670
   ClientWidth     =   5880
   FillColor       =   &H000000FF&
   LinkTopic       =   "Form1"
   ScaleHeight     =   4095
   ScaleWidth      =   5880
   Begin VB.TextBox txt1 
      Alignment       =   2  'Center
      BeginProperty Font 
         Name            =   "MS Sans Serif"
         Size            =   13.5
         Charset         =   204
         Weight          =   400
         Underline       =   0   'False
         Italic          =   -1  'True
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H000000C0&
      Height          =   1000
      Left            =   750
      MultiLine       =   -1  'True
      TabIndex        =   2
      Text            =   "frmVB1.frx":0000
      Top             =   2000
      Width           =   4500
   End
   Begin VB.CommandButton cmd1 
      Caption         =   "Метод Print"
      Height          =   500
      Left            =   2400
      TabIndex        =   0
      Top             =   3300
      Width           =   1000
   End
   Begin VB.Label lbl1 
      Alignment       =   2  'Center
      BackColor       =   &H0000C000&
      Caption         =   "Первый проект на языке Visual Basic"
      BeginProperty Font 
         Name            =   "MS Sans Serif"
         Size            =   18
         Charset         =   204
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00C00000&
      Height          =   1000
      Left            =   750
      TabIndex        =   1
      Top             =   600
      Width           =   4500
   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_Click()
End
End Sub

Private Sub Form_Load()
frm1.Move (Screen.Width - frm1.Width) / 2, (Screen.Height - frm1.Height) / 2
End Sub
Private Sub cmd1_Click()
Font.Size = 12
'lbl1.Caption = "Первый проект на  VB6"

'txt1.Text = "ПРИВЕТ!"
a = 2
b = 5
c = a + b
d = a - b
Print c, d

End Sub
