вдання 5»)
Me.Hide () _1=5_Form8.Show () SubIf («Неправильно.» + vbCrLf + «Ви заробили 4 бали.», MsgBoxStyle.Critical, «Результат»)
Me.Hide () _1=4_Form8.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 Button4_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Clickobj_Form13 As New Form13_Form13.Show () SubClass
Програма для форми 8
Public Class Form8System.Windows.Forms.Form
# Region « Код, автоматично створений конструктором форм Windows »
Public Sub New (). New ()
'Цей виклик вимагається конструктором форм Windows. ()
'Додайте код ініціалізації після виклику InitializeComponent () Sub
'Форма перевизначає метод Dispose для очищення списку компонентів.
Protected Overloads Overrides Sub Dispose (ByVal disposing As Boolean) disposing ThenNot (components Is Nothing) Then.Dispose () IfIf.Dispose (disposing) Sub
'Требуется конструктором форм Windowscomponents As System.ComponentModel.IContainer
'ПРИМІТКА: наступна процедура потрібна для конструктора форм Windows.
'Її можна змінити в конструкторі форм Windows.
'Не змінюйте її в редакторі вихідного тексту.
Friend WithEvents Button3 As System.Windows.Forms.ButtonWithEvents PictureBox1 As System.Windows.Forms.PictureBoxWithEvents Label1 As System.Windows.Forms.LabelWithEvents PictureBox2 As System.Windows.Forms.PictureBoxWithEvents PictureBox3 As System. Windows.Forms.PictureBoxWithEvents PictureBox4 As System.Windows.Forms.PictureBoxWithEvents Button2 As System.Windows.Forms.ButtonWithEvents Button1 As System.Windows.Forms.Button
Private Sub InitializeComponent () resources As System.Resources.ResourceManager=New System.Resources.ResourceManager (GetType (Form8)). Button3=New System.Windows.Forms.Button.PictureBox1=New System.Windows.Forms.PictureBox.Label1= New System.Windows.Forms.Label.PictureBox2=New System.Windows.Forms.PictureBox.PictureBox3=New System.Windows.Forms.PictureBox.PictureBox4=New System.Windows.Forms.PictureBox.Button2=New System.Windows.Forms . Button.Button1=New System.Windows.Forms.Button.SuspendLayout ()
«» Button3
'Me.Button3.BackColor=System.Drawing.Color.GreenYellow.Button3.Font=New System.Drawing.Font («Comic Sans MS», 18.0!, System.Drawing.FontStyle. Bold, System.Drawing.GraphicsUnit.Point, CType (204, Byte)). Button3.Location=New System.Drawing.Point (680, 608). Button3.Name=«Button3». Button3.Size=New System. Drawing.Size (136, 40). Button3.TabIndex=4.Button3.Text=«<< Назад »
«» PictureBox1
'Me.PictureBox1.Image=CType (resources.GetObject («PictureBox1.Image»), System.Drawing.Image). PictureBox1.Location=New System.Drawing.Point (0, 0 ). PictureBox1.Name=«PictureBox1». PictureBox1.Size=New System.Drawing.Size (688, 461). PictureBox1.SizeMode=System.Windows.Forms.PictureBox...