_ Partial Class FormAddBS 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.RBFemale = New System.Windows.Forms.RadioButton() Me.RBMale = New System.Windows.Forms.RadioButton() Me.LabelGender = New System.Windows.Forms.Label() Me.TBAddress = New System.Windows.Forms.TextBox() Me.TBLastName = New System.Windows.Forms.TextBox() Me.TBFirstName = New System.Windows.Forms.TextBox() Me.LabelLastName = New System.Windows.Forms.Label() Me.LabelFirstName = New System.Windows.Forms.Label() Me.TBPhone2 = New System.Windows.Forms.TextBox() Me.TBPhone1 = New System.Windows.Forms.TextBox() Me.LabelPhone2 = New System.Windows.Forms.Label() Me.LabelPhone1 = New System.Windows.Forms.Label() Me.LabelAddress = New System.Windows.Forms.Label() Me.ButtonCancel = New System.Windows.Forms.Button() Me.ButtonAdd = New System.Windows.Forms.Button() Me.SuspendLayout() ' 'RBFemale ' Me.RBFemale.AutoSize = True Me.RBFemale.Location = New System.Drawing.Point(171, 68) Me.RBFemale.Name = "RBFemale" Me.RBFemale.Size = New System.Drawing.Size(61, 17) Me.RBFemale.TabIndex = 3 Me.RBFemale.TabStop = True Me.RBFemale.Text = "Female" Me.RBFemale.UseVisualStyleBackColor = True ' 'RBMale ' Me.RBMale.AutoSize = True Me.RBMale.Location = New System.Drawing.Point(80, 68) Me.RBMale.Name = "RBMale" Me.RBMale.Size = New System.Drawing.Size(50, 17) Me.RBMale.TabIndex = 2 Me.RBMale.TabStop = True Me.RBMale.Text = "Male" Me.RBMale.UseVisualStyleBackColor = True ' 'LabelGender ' Me.LabelGender.AutoSize = True Me.LabelGender.Location = New System.Drawing.Point(12, 70) Me.LabelGender.Name = "LabelGender" Me.LabelGender.Size = New System.Drawing.Size(48, 13) Me.LabelGender.TabIndex = 20 Me.LabelGender.Text = "Gender:" ' 'TBAddress ' Me.TBAddress.Location = New System.Drawing.Point(12, 111) Me.TBAddress.Multiline = True Me.TBAddress.Name = "TBAddress" Me.TBAddress.Size = New System.Drawing.Size(258, 87) Me.TBAddress.TabIndex = 4 ' 'TBLastName ' Me.TBLastName.Location = New System.Drawing.Point(80, 40) Me.TBLastName.Name = "TBLastName" Me.TBLastName.Size = New System.Drawing.Size(190, 22) Me.TBLastName.TabIndex = 1 ' 'TBFirstName ' Me.TBFirstName.Location = New System.Drawing.Point(80, 12) Me.TBFirstName.Name = "TBFirstName" Me.TBFirstName.Size = New System.Drawing.Size(190, 22) Me.TBFirstName.TabIndex = 0 ' 'LabelLastName ' Me.LabelLastName.AutoSize = True Me.LabelLastName.Location = New System.Drawing.Point(12, 43) Me.LabelLastName.Name = "LabelLastName" Me.LabelLastName.Size = New System.Drawing.Size(62, 13) Me.LabelLastName.TabIndex = 16 Me.LabelLastName.Text = "Last Name:" ' 'LabelFirstName ' Me.LabelFirstName.AutoSize = True Me.LabelFirstName.Location = New System.Drawing.Point(12, 15) Me.LabelFirstName.Name = "LabelFirstName" Me.LabelFirstName.Size = New System.Drawing.Size(63, 13) Me.LabelFirstName.TabIndex = 15 Me.LabelFirstName.Text = "First name:" ' 'TBPhone2 ' Me.TBPhone2.Location = New System.Drawing.Point(67, 239) Me.TBPhone2.Name = "TBPhone2" Me.TBPhone2.Size = New System.Drawing.Size(203, 22) Me.TBPhone2.TabIndex = 6 ' 'TBPhone1 ' Me.TBPhone1.Location = New System.Drawing.Point(67, 211) Me.TBPhone1.Name = "TBPhone1" Me.TBPhone1.Size = New System.Drawing.Size(203, 22) Me.TBPhone1.TabIndex = 5 ' 'LabelPhone2 ' Me.LabelPhone2.AutoSize = True Me.LabelPhone2.Location = New System.Drawing.Point(12, 242) Me.LabelPhone2.Name = "LabelPhone2" Me.LabelPhone2.Size = New System.Drawing.Size(52, 13) Me.LabelPhone2.TabIndex = 25 Me.LabelPhone2.Text = "Phone 2:" ' 'LabelPhone1 ' Me.LabelPhone1.AutoSize = True Me.LabelPhone1.Location = New System.Drawing.Point(12, 214) Me.LabelPhone1.Name = "LabelPhone1" Me.LabelPhone1.Size = New System.Drawing.Size(52, 13) Me.LabelPhone1.TabIndex = 24 Me.LabelPhone1.Text = "Phone 1:" ' 'LabelAddress ' Me.LabelAddress.AutoSize = True Me.LabelAddress.Location = New System.Drawing.Point(12, 95) Me.LabelAddress.Name = "LabelAddress" Me.LabelAddress.Size = New System.Drawing.Size(51, 13) Me.LabelAddress.TabIndex = 23 Me.LabelAddress.Text = "Address:" ' 'ButtonCancel ' Me.ButtonCancel.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.ButtonCancel.Location = New System.Drawing.Point(196, 282) Me.ButtonCancel.Name = "ButtonCancel" Me.ButtonCancel.Size = New System.Drawing.Size(75, 23) Me.ButtonCancel.TabIndex = 8 Me.ButtonCancel.Text = "Cancel" Me.ButtonCancel.UseVisualStyleBackColor = True ' 'ButtonAdd ' Me.ButtonAdd.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.ButtonAdd.Location = New System.Drawing.Point(115, 282) Me.ButtonAdd.Name = "ButtonAdd" Me.ButtonAdd.Size = New System.Drawing.Size(75, 23) Me.ButtonAdd.TabIndex = 7 Me.ButtonAdd.Text = "Add" Me.ButtonAdd.UseVisualStyleBackColor = True ' 'FormAddBS ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(283, 317) Me.Controls.Add(Me.ButtonAdd) Me.Controls.Add(Me.ButtonCancel) Me.Controls.Add(Me.TBPhone2) Me.Controls.Add(Me.TBPhone1) Me.Controls.Add(Me.LabelPhone2) Me.Controls.Add(Me.LabelPhone1) Me.Controls.Add(Me.LabelAddress) Me.Controls.Add(Me.RBFemale) Me.Controls.Add(Me.RBMale) Me.Controls.Add(Me.LabelGender) Me.Controls.Add(Me.TBAddress) Me.Controls.Add(Me.TBLastName) Me.Controls.Add(Me.TBFirstName) Me.Controls.Add(Me.LabelLastName) Me.Controls.Add(Me.LabelFirstName) Me.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle Me.MaximizeBox = False Me.Name = "FormAddBS" Me.Text = "FormAddBS" Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents RBFemale As System.Windows.Forms.RadioButton Friend WithEvents RBMale As System.Windows.Forms.RadioButton Friend WithEvents LabelGender As System.Windows.Forms.Label Friend WithEvents TBAddress As System.Windows.Forms.TextBox Friend WithEvents TBLastName As System.Windows.Forms.TextBox Friend WithEvents TBFirstName As System.Windows.Forms.TextBox Friend WithEvents LabelLastName As System.Windows.Forms.Label Friend WithEvents LabelFirstName As System.Windows.Forms.Label Friend WithEvents TBPhone2 As System.Windows.Forms.TextBox Friend WithEvents TBPhone1 As System.Windows.Forms.TextBox Friend WithEvents LabelPhone2 As System.Windows.Forms.Label Friend WithEvents LabelPhone1 As System.Windows.Forms.Label Friend WithEvents LabelAddress As System.Windows.Forms.Label Friend WithEvents ButtonCancel As System.Windows.Forms.Button Friend WithEvents ButtonAdd As System.Windows.Forms.Button End Class