_ Partial Class perceval_ou_le_conte_du_graal_2 Inherits System.Windows.Forms.Form 'Form remplace la méthode Dispose pour nettoyer la liste des composants. _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Requise par le Concepteur Windows Form Private components As System.ComponentModel.IContainer 'REMARQUE : la procédure suivante est requise par le Concepteur Windows Form 'Elle peut être modifiée à l'aide du Concepteur Windows Form. 'Ne la modifiez pas à l'aide de l'éditeur de code. _ Private Sub InitializeComponent() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(perceval_ou_le_conte_du_graal_2)) Me.TextBox1 = New System.Windows.Forms.TextBox() Me.MenuStrip1 = New System.Windows.Forms.MenuStrip() Me.LireLeTextToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.VolumeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.VistesseToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.LireToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.MenuStrip1.SuspendLayout() Me.SuspendLayout() ' 'TextBox1 ' Me.TextBox1.Location = New System.Drawing.Point(12, 27) Me.TextBox1.Multiline = True Me.TextBox1.Name = "TextBox1" Me.TextBox1.ScrollBars = System.Windows.Forms.ScrollBars.Vertical Me.TextBox1.Size = New System.Drawing.Size(776, 411) Me.TextBox1.TabIndex = 0 Me.TextBox1.Text = resources.GetString("TextBox1.Text") ' 'MenuStrip1 ' Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.LireLeTextToolStripMenuItem}) Me.MenuStrip1.Location = New System.Drawing.Point(0, 0) Me.MenuStrip1.Name = "MenuStrip1" Me.MenuStrip1.Size = New System.Drawing.Size(800, 24) Me.MenuStrip1.TabIndex = 1 Me.MenuStrip1.Text = "MenuStrip1" ' 'LireLeTextToolStripMenuItem ' Me.LireLeTextToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.VolumeToolStripMenuItem, Me.VistesseToolStripMenuItem, Me.LireToolStripMenuItem}) Me.LireLeTextToolStripMenuItem.Name = "LireLeTextToolStripMenuItem" Me.LireLeTextToolStripMenuItem.Size = New System.Drawing.Size(73, 20) Me.LireLeTextToolStripMenuItem.Text = "Lire le text" ' 'VolumeToolStripMenuItem ' Me.VolumeToolStripMenuItem.Name = "VolumeToolStripMenuItem" Me.VolumeToolStripMenuItem.Size = New System.Drawing.Size(180, 22) Me.VolumeToolStripMenuItem.Text = "volume" ' 'VistesseToolStripMenuItem ' Me.VistesseToolStripMenuItem.Name = "VistesseToolStripMenuItem" Me.VistesseToolStripMenuItem.Size = New System.Drawing.Size(180, 22) Me.VistesseToolStripMenuItem.Text = "vistesse" ' 'LireToolStripMenuItem ' Me.LireToolStripMenuItem.Name = "LireToolStripMenuItem" Me.LireToolStripMenuItem.Size = New System.Drawing.Size(180, 22) Me.LireToolStripMenuItem.Text = "Lire" ' 'perceval_ou_le_conte_du_graal_2 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(800, 450) Me.Controls.Add(Me.TextBox1) Me.Controls.Add(Me.MenuStrip1) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.MainMenuStrip = Me.MenuStrip1 Me.Name = "perceval_ou_le_conte_du_graal_2" Me.Text = "perceval ou le conte du graal" Me.MenuStrip1.ResumeLayout(False) Me.MenuStrip1.PerformLayout() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents TextBox1 As TextBox Friend WithEvents MenuStrip1 As MenuStrip Friend WithEvents LireLeTextToolStripMenuItem As ToolStripMenuItem Friend WithEvents VolumeToolStripMenuItem As ToolStripMenuItem Friend WithEvents VistesseToolStripMenuItem As ToolStripMenuItem Friend WithEvents LireToolStripMenuItem As ToolStripMenuItem End Class