1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150
| Public Class table
Inherits System.Windows.Forms.Form
#Region " Code généré par le Concepteur Windows Form "
Public Sub New()
MyBase.New()
'Cet appel est requis par le Concepteur Windows Form.
InitializeComponent()
'Ajoutez une initialisation quelconque après l'appel InitializeComponent()
End Sub
'La méthode substituée Dispose du formulaire pour nettoyer la liste des composants.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
'Requis 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 en utilisant le Concepteur Windows Form.
'Ne la modifiez pas en utilisant l'éditeur de code.
Friend WithEvents Button2 As System.Windows.Forms.Button
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents liste2 As System.Windows.Forms.DataGrid
Friend WithEvents liste3 As System.Windows.Forms.DataGrid
Friend WithEvents tt As System.Windows.Forms.TextBox
Friend WithEvents tndb As System.Windows.Forms.ComboBox
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents Label1 As System.Windows.Forms.Label
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.Button2 = New System.Windows.Forms.Button
Me.Button1 = New System.Windows.Forms.Button
Me.liste2 = New System.Windows.Forms.DataGrid
Me.liste3 = New System.Windows.Forms.DataGrid
Me.tt = New System.Windows.Forms.TextBox
Me.tndb = New System.Windows.Forms.ComboBox
Me.Label2 = New System.Windows.Forms.Label
Me.Label1 = New System.Windows.Forms.Label
CType(Me.liste2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.liste3, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'Button2
'
Me.Button2.BackColor = System.Drawing.Color.Gold
Me.Button2.Location = New System.Drawing.Point(556, 387)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(104, 24)
Me.Button2.TabIndex = 15
Me.Button2.Text = "&Supprimer"
'
'Button1
'
Me.Button1.BackColor = System.Drawing.Color.Gold
Me.Button1.Location = New System.Drawing.Point(556, 347)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(104, 24)
Me.Button1.TabIndex = 14
Me.Button1.Text = "&Ajouter"
'
'liste2
'
Me.liste2.CaptionBackColor = System.Drawing.Color.Gold
Me.liste2.DataMember = ""
Me.liste2.HeaderForeColor = System.Drawing.SystemColors.ControlText
Me.liste2.Location = New System.Drawing.Point(44, 291)
Me.liste2.Name = "liste2"
Me.liste2.Size = New System.Drawing.Size(416, 160)
Me.liste2.TabIndex = 13
'
'liste3
'
Me.liste3.CaptionBackColor = System.Drawing.Color.Gold
Me.liste3.DataMember = ""
Me.liste3.HeaderForeColor = System.Drawing.SystemColors.ControlText
Me.liste3.Location = New System.Drawing.Point(532, 67)
Me.liste3.Name = "liste3"
Me.liste3.Size = New System.Drawing.Size(176, 224)
Me.liste3.TabIndex = 12
'
'tt
'
Me.tt.Location = New System.Drawing.Point(252, 91)
Me.tt.Name = "tt"
Me.tt.Size = New System.Drawing.Size(144, 20)
Me.tt.TabIndex = 11
Me.tt.Text = ""
'
'tndb
'
Me.tndb.Location = New System.Drawing.Point(252, 51)
Me.tndb.Name = "tndb"
Me.tndb.Size = New System.Drawing.Size(144, 21)
Me.tndb.TabIndex = 10
'
'Label2
'
Me.Label2.BackColor = System.Drawing.Color.Gold
Me.Label2.Location = New System.Drawing.Point(84, 91)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(112, 24)
Me.Label2.TabIndex = 9
Me.Label2.Text = "Nom de la table"
'
'Label1
'
Me.Label1.BackColor = System.Drawing.Color.Gold
Me.Label1.Location = New System.Drawing.Point(84, 51)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(112, 24)
Me.Label1.TabIndex = 8
Me.Label1.Text = "Nom de la DB"
'
'table
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.BackColor = System.Drawing.SystemColors.Highlight
Me.ClientSize = New System.Drawing.Size(752, 502)
Me.Controls.Add(Me.Button2)
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.liste2)
Me.Controls.Add(Me.liste3)
Me.Controls.Add(Me.tt)
Me.Controls.Add(Me.tndb)
Me.Controls.Add(Me.Label2)
Me.Controls.Add(Me.Label1)
Me.Name = "table"
Me.Text = "table"
CType(Me.liste2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.liste3, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
#End Region
Private Sub table_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
End Class |