_ Partial Class Form27 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() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form27)) Me.Label1 = New System.Windows.Forms.Label() Me.TextBox1 = New System.Windows.Forms.TextBox() Me.ComboBox1 = New System.Windows.Forms.ComboBox() Me.Button1 = New System.Windows.Forms.Button() Me.TextBox2 = New System.Windows.Forms.TextBox() Me.Timer1 = New System.Windows.Forms.Timer(Me.components) Me.SuspendLayout() ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Font = New System.Drawing.Font("Arial", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label1.ForeColor = System.Drawing.Color.White Me.Label1.Location = New System.Drawing.Point(12, 19) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(110, 18) Me.Label1.TabIndex = 0 Me.Label1.Text = "nouveaux mail:" ' 'TextBox1 ' Me.TextBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer)) Me.TextBox1.Font = New System.Drawing.Font("Arial", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.TextBox1.ForeColor = System.Drawing.Color.White Me.TextBox1.Location = New System.Drawing.Point(128, 16) Me.TextBox1.Name = "TextBox1" Me.TextBox1.Size = New System.Drawing.Size(261, 26) Me.TextBox1.TabIndex = 1 ' 'ComboBox1 ' Me.ComboBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer)) Me.ComboBox1.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.ComboBox1.Font = New System.Drawing.Font("Arial", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.ComboBox1.ForeColor = System.Drawing.Color.White Me.ComboBox1.FormattingEnabled = True Me.ComboBox1.Items.AddRange(New Object() {"@gmail.com", "@yahoo.fr", "@yahoo.com", "@laposte.net", "@oulook.com", "@icloud.com", "autre"}) Me.ComboBox1.Location = New System.Drawing.Point(395, 16) Me.ComboBox1.Name = "ComboBox1" Me.ComboBox1.Size = New System.Drawing.Size(121, 26) Me.ComboBox1.TabIndex = 2 ' 'Button1 ' Me.Button1.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer)) Me.Button1.Font = New System.Drawing.Font("Arial", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Button1.ForeColor = System.Drawing.Color.White Me.Button1.Location = New System.Drawing.Point(15, 55) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(500, 27) Me.Button1.TabIndex = 3 Me.Button1.Text = "modifier" Me.Button1.UseVisualStyleBackColor = False ' 'TextBox2 ' Me.TextBox2.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer)) Me.TextBox2.Font = New System.Drawing.Font("Arial", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.TextBox2.ForeColor = System.Drawing.Color.White Me.TextBox2.Location = New System.Drawing.Point(395, 16) Me.TextBox2.Name = "TextBox2" Me.TextBox2.Size = New System.Drawing.Size(120, 26) Me.TextBox2.TabIndex = 4 Me.TextBox2.Text = "@" Me.TextBox2.Visible = False ' 'Timer1 ' Me.Timer1.Interval = 1 ' 'Form27 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer)) Me.ClientSize = New System.Drawing.Size(527, 94) Me.Controls.Add(Me.TextBox2) Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.ComboBox1) Me.Controls.Add(Me.TextBox1) Me.Controls.Add(Me.Label1) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.MaximizeBox = False Me.MaximumSize = New System.Drawing.Size(543, 133) Me.MinimumSize = New System.Drawing.Size(543, 133) Me.Name = "Form27" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "modifier votre mail" Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents Label1 As Label Friend WithEvents TextBox1 As TextBox Friend WithEvents ComboBox1 As ComboBox Friend WithEvents Button1 As Button Friend WithEvents TextBox2 As TextBox Friend WithEvents Timer1 As Timer End Class