40). Button1.TabIndex=15.Button1.Text=«Перейти на контроль»
«» Form17
'Me.AutoScaleBaseSize=New System.Drawing.Size (5, 13). BackgroundImage=CType (resources.GetObject («$ this.BackgroundImage»), System.Drawing.Image). ClientSize =New System.Drawing.Size (752, 437). ControlBox=False.Controls.Add(Me.Button3).Controls.Add(Me.Button5).Controls.Add(Me.Button4).Controls.Add(Me.Button1).Controls.Add(Me.Label2).Controls.Add(Me.Label1).Name =«Form17». Text=«контроль». ResumeLayout (False) Sub
# End RegionSub Button4_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Clickobj_Form13 As New Form13_Form13.Show () SubSub Button5_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.ClickObj_Form14 As New Form14_Form14.Show () _Form14.AxWebBrowser1.Navigate (Application.StartupPath + « СПРАВКА.htm») SubSub Button3_Click (ByVal sender As System.Object, ByVal e As System.EventArgs ) Handles Button3.Click () SubSub Button1_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Clickobj_Form7 As New Form7.Hide () _Form7.PictureBox1.Visible=True_Form7.PictureBox2.Visible=False_Form7.PictureBox3 . Visible=False_Form7.PictureBox4.Visible=False_Form7.Show () Sub
End Class