e.Button4.Location=New System.Drawing.Point (16, 432). Button4.Name= «Button4». Button4.Size=New System.Drawing.Size (144, 40). Button4.TabIndex=6.Button4.Text=«Про автора»
«» Button5
'Me.Button5.BackColor=System.Drawing.Color.Orange.Button5.Font=New System.Drawing.Font («Comic Sans MS», 18.0!, System.Drawing.FontStyle. Bold, System.Drawing.GraphicsUnit.Point, CType (204, Byte)). Button5.ForeColor=System.Drawing.Color.FromArgb (CType (0, Byte), CType (0, Byte), CType (192, Byte) ). Button5.Location=New System.Drawing.Point (176, 432). Button5.Name=«Button5». Button5.Size=New System.Drawing.Size (120, 40). Button5.TabIndex=7.Button5 . Text="Довідка"
«» 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 (312, 432). Button3.Name=«Button3». Button3.Size=New System. Drawing.Size (136, 40). Button3.TabIndex=9.Button3.Text=«<< Назад »
«» Form15
'Me.AutoScaleBaseSize=New System.Drawing.Size (5, 13). BackgroundImage=CType (resources.GetObject («$ this.BackgroundImage»), System.Drawing.Image). ClientSize =New System.Drawing.Size (736, 493). 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 =«Form15». Text=«Демонстрація». ResumeLayout (False) Sub
# End RegionSub Button1_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Clickobj_Form3 As New Form3_Form3.Show () SubSub 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 () SubClass
Програма для форми 16
Public Class Form16System.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.L...
