'
'button12
'
Me.button12.BackColor = System.Drawing.SystemColors.ControlText
Me.button12.ForeColor = System.Drawing.Color.Red
Me.button12.Location = New System.Drawing.Point(654, 358)
Me.button12.Name = "button12"
Me.button12.Size = New System.Drawing.Size(144, 47)
Me.button12.TabIndex = 12
Me.button12.Text = "Le taxi pour la rampe"
Me.button12.UseVisualStyleBackColor = false
'
'button13
'
Me.button13.BackColor = System.Drawing.SystemColors.ControlText
Me.button13.ForeColor = System.Drawing.Color.Red
Me.button13.Location = New System.Drawing.Point(654, 411)
Me.button13.Name = "button13"
Me.button13.Size = New System.Drawing.Size(144, 47)
Me.button13.TabIndex = 13
Me.button13.Text = "Au parking final"
Me.button13.UseVisualStyleBackColor = false
'
'label1
'
Me.label1.Font = New System.Drawing.Font("Segoe UI", 13!, System.Drawing.FontStyle.Underline)
Me.label1.Location = New System.Drawing.Point(-3, -1)
Me.label1.Name = "label1"
Me.label1.Size = New System.Drawing.Size(357, 41)
Me.label1.TabIndex = 14
Me.label1.Text = "Bienvenue sur Virtual CheckList"
Me.label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
'
'Accueil
'
Me.BackColor = System.Drawing.SystemColors.WindowFrame
Me.ClientSize = New System.Drawing.Size(909, 564)
Me.Controls.Add(Me.label1)
Me.Controls.Add(Me.button1)
Me.Controls.Add(Me.pictureBox1)
Me.Controls.Add(Me.button2)
Me.Controls.Add(Me.button3)
Me.Controls.Add(Me.button4)
Me.Controls.Add(Me.button5)
Me.Controls.Add(Me.button6)
Me.Controls.Add(Me.button7)
Me.Controls.Add(Me.button8)
Me.Controls.Add(Me.button9)
Me.Controls.Add(Me.button10)
Me.Controls.Add(Me.button11)
Me.Controls.Add(Me.button12)
Me.Controls.Add(Me.button13)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
Me.Icon = CType(resources.GetObject("$this.Icon"),System.Drawing.Icon)
Me.MaximizeBox = false
Me.Name = "Accueil"
Me.Text = "Accueil"
CType(Me.pictureBox1,System.ComponentModel.ISupportInitialize).EndInit
Me.ResumeLayout(false)
End Sub
<System.STAThreadAttribute()> _
Public Shared Sub Main()
System.Windows.Forms.Application.EnableVisualStyles()
If My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\NET Framework Setup\NDP\v3.5", "Version", Nothing) Is Nothing Then
System.Windows.Forms.MessageBox.Show("The .Net Framework 3.5 was not found. VCLBoeing747v2 can't start without it. Please install the .Net Framework 3.5 and try again.", "VCLBoeing747v1.2.3", MessageBoxButtons.OK, MessageBoxIcon.Error)
System.Diagnostics.Process.Start("
http://www.microsoft.com/downloads/details.aspx?FamilyId=333325FD-AE52-4E35-B531-508D977D32A6&displaylang=fr")
End
End If
My.Resources.Culture = Globalization.CultureInfo.InvariantCulture : My.Resources.Culture = My.Resources.Culture
System.Windows.Forms.Application.SetCompatibleTextRenderingDefault(False)
For Each arg As String In System.Environment.GetCommandLineArgs
If Not arg = System.Windows.Forms.Application.ExecutablePath Then
Redim Preserve ALL_ARGUMENTS_APPLICATIONS(ALL_ARGUMENTS_APPLICATIONS.Length) : ALL_ARGUMENTS_APPLICATIONS(ALL_ARGUMENTS_APPLICATIONS.Length - 1) = arg
End If
Next
System.Windows.Forms.Application.Run(New Accueil_f)
End Sub
End Class