«Button4». Button4.Size=New System.Drawing.Size (144, 40). Button4.TabIndex=11.Button4.Text=«Про автора»
«» Button1
'Me.Button1.BackColor=System.Drawing.Color.FromArgb (CType (0, Byte), CType (192, Byte), CType (0, Byte)). Button1.Font=New System.Drawing.Font («Comic Sans MS», 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType (204, Byte)). Button1.Location=New System.Drawing.Point (448, 440). Button1.Name=«Button1». Button1.Size=New System.Drawing.Size (272, 40). Button1.TabIndex=10.Button1.Text=«Перейти на тренінг»
«» Form16
'Me.AutoScaleBaseSize=New System.Drawing.Size (5, 13). BackgroundImage=CType (resources.GetObject («$ this.BackgroundImage»), System.Drawing.Image). ClientSize =New System.Drawing.Size (768, 517). 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 =«Form16». 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_Form5 As New Form5_Form5.Show () SubClass
Програма форми 17
Public Class Form17System.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 Label1 As System.Windows.Forms.LabelWithEvents Label2 As System.Windows.Forms.LabelWithEvents Button3 As System.Windows.Forms.ButtonWithEvents Button5 As System.Windows.Forms.ButtonWithEvents Button4 As System. Windows.Forms.ButtonWithEvents Button1 As System.Windows.Forms.Button
Private Sub InitializeComponent () resources As System.Resources.ResourceManager=New System.Resources.ResourceManager (GetType (Form17)). Label1=New System.Windows.Forms.Label.Label2=New System.Windows.Forms.Label.Button3= New System.Windows.Forms.Button.Button5=New System.Wi...
