Added GUI and fixed some optimisation
This commit is contained in:
parent
890957a0a0
commit
d0420ca0c2
377
ISEN-Repair Inventory Manager/EditSpecs.Designer.vb
generated
Normal file
377
ISEN-Repair Inventory Manager/EditSpecs.Designer.vb
generated
Normal file
@ -0,0 +1,377 @@
|
|||||||
|
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||||
|
Partial Class EditSpecs
|
||||||
|
Inherits System.Windows.Forms.Form
|
||||||
|
|
||||||
|
'Form remplace la méthode Dispose pour nettoyer la liste des composants.
|
||||||
|
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||||
|
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.
|
||||||
|
<System.Diagnostics.DebuggerStepThrough()> _
|
||||||
|
Private Sub InitializeComponent()
|
||||||
|
Me.GroupBox3 = New System.Windows.Forms.GroupBox()
|
||||||
|
Me.OSCmbBox = New System.Windows.Forms.ComboBox()
|
||||||
|
Me.RAMCmbBox = New System.Windows.Forms.ComboBox()
|
||||||
|
Me.ProcArchCmbBox = New System.Windows.Forms.ComboBox()
|
||||||
|
Me.Label7 = New System.Windows.Forms.Label()
|
||||||
|
Me.Label6 = New System.Windows.Forms.Label()
|
||||||
|
Me.ActivateCheck = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.SoftCheck = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.DrvCheck = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.OSCheck = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.HWCheck = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||||
|
Me.NewIDBox = New System.Windows.Forms.TextBox()
|
||||||
|
Me.GivedByBox = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label8 = New System.Windows.Forms.Label()
|
||||||
|
Me.EtatBox = New System.Windows.Forms.TextBox()
|
||||||
|
Me.SerieCheckBox = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.EmprunterName = New System.Windows.Forms.TextBox()
|
||||||
|
Me.EmpruntCheckBox = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.DetailsBox = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label5 = New System.Windows.Forms.Label()
|
||||||
|
Me.NameBox = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label4 = New System.Windows.Forms.Label()
|
||||||
|
Me.Label2 = New System.Windows.Forms.Label()
|
||||||
|
Me.Label1 = New System.Windows.Forms.Label()
|
||||||
|
Me.SaveEditButton = New System.Windows.Forms.Button()
|
||||||
|
Me.GroupBox3.SuspendLayout()
|
||||||
|
Me.GroupBox2.SuspendLayout()
|
||||||
|
Me.SuspendLayout()
|
||||||
|
'
|
||||||
|
'GroupBox3
|
||||||
|
'
|
||||||
|
Me.GroupBox3.Controls.Add(Me.OSCmbBox)
|
||||||
|
Me.GroupBox3.Controls.Add(Me.RAMCmbBox)
|
||||||
|
Me.GroupBox3.Controls.Add(Me.ProcArchCmbBox)
|
||||||
|
Me.GroupBox3.Controls.Add(Me.Label7)
|
||||||
|
Me.GroupBox3.Controls.Add(Me.Label6)
|
||||||
|
Me.GroupBox3.Controls.Add(Me.ActivateCheck)
|
||||||
|
Me.GroupBox3.Controls.Add(Me.SoftCheck)
|
||||||
|
Me.GroupBox3.Controls.Add(Me.DrvCheck)
|
||||||
|
Me.GroupBox3.Controls.Add(Me.OSCheck)
|
||||||
|
Me.GroupBox3.Controls.Add(Me.HWCheck)
|
||||||
|
Me.GroupBox3.Location = New System.Drawing.Point(12, 203)
|
||||||
|
Me.GroupBox3.Name = "GroupBox3"
|
||||||
|
Me.GroupBox3.Size = New System.Drawing.Size(508, 93)
|
||||||
|
Me.GroupBox3.TabIndex = 6
|
||||||
|
Me.GroupBox3.TabStop = False
|
||||||
|
Me.GroupBox3.Text = "Avancement"
|
||||||
|
'
|
||||||
|
'OSCmbBox
|
||||||
|
'
|
||||||
|
Me.OSCmbBox.FormattingEnabled = True
|
||||||
|
Me.OSCmbBox.Items.AddRange(New Object() {"Win XP PRO SP3", "WIN 7 SP1", "WIN 10", "UNIX", "Inconnue"})
|
||||||
|
Me.OSCmbBox.Location = New System.Drawing.Point(47, 41)
|
||||||
|
Me.OSCmbBox.Name = "OSCmbBox"
|
||||||
|
Me.OSCmbBox.Size = New System.Drawing.Size(315, 21)
|
||||||
|
Me.OSCmbBox.TabIndex = 16
|
||||||
|
'
|
||||||
|
'RAMCmbBox
|
||||||
|
'
|
||||||
|
Me.RAMCmbBox.FormattingEnabled = True
|
||||||
|
Me.RAMCmbBox.Items.AddRange(New Object() {"<1G", "1G", "2G", "3G", "4G", ">4G"})
|
||||||
|
Me.RAMCmbBox.Location = New System.Drawing.Point(294, 18)
|
||||||
|
Me.RAMCmbBox.Name = "RAMCmbBox"
|
||||||
|
Me.RAMCmbBox.Size = New System.Drawing.Size(68, 21)
|
||||||
|
Me.RAMCmbBox.TabIndex = 15
|
||||||
|
'
|
||||||
|
'ProcArchCmbBox
|
||||||
|
'
|
||||||
|
Me.ProcArchCmbBox.FormattingEnabled = True
|
||||||
|
Me.ProcArchCmbBox.Items.AddRange(New Object() {"32bits", "64bits"})
|
||||||
|
Me.ProcArchCmbBox.Location = New System.Drawing.Point(188, 18)
|
||||||
|
Me.ProcArchCmbBox.Name = "ProcArchCmbBox"
|
||||||
|
Me.ProcArchCmbBox.Size = New System.Drawing.Size(57, 21)
|
||||||
|
Me.ProcArchCmbBox.TabIndex = 14
|
||||||
|
'
|
||||||
|
'Label7
|
||||||
|
'
|
||||||
|
Me.Label7.AutoSize = True
|
||||||
|
Me.Label7.Location = New System.Drawing.Point(251, 21)
|
||||||
|
Me.Label7.Name = "Label7"
|
||||||
|
Me.Label7.Size = New System.Drawing.Size(37, 13)
|
||||||
|
Me.Label7.TabIndex = 9
|
||||||
|
Me.Label7.Text = "RAM :"
|
||||||
|
'
|
||||||
|
'Label6
|
||||||
|
'
|
||||||
|
Me.Label6.AutoSize = True
|
||||||
|
Me.Label6.Location = New System.Drawing.Point(85, 21)
|
||||||
|
Me.Label6.Name = "Label6"
|
||||||
|
Me.Label6.Size = New System.Drawing.Size(97, 13)
|
||||||
|
Me.Label6.TabIndex = 7
|
||||||
|
Me.Label6.Text = "Proc/Architecture :"
|
||||||
|
'
|
||||||
|
'ActivateCheck
|
||||||
|
'
|
||||||
|
Me.ActivateCheck.AutoSize = True
|
||||||
|
Me.ActivateCheck.Location = New System.Drawing.Point(72, 67)
|
||||||
|
Me.ActivateCheck.Name = "ActivateCheck"
|
||||||
|
Me.ActivateCheck.Size = New System.Drawing.Size(73, 17)
|
||||||
|
Me.ActivateCheck.TabIndex = 4
|
||||||
|
Me.ActivateCheck.TabStop = False
|
||||||
|
Me.ActivateCheck.Text = "Activation"
|
||||||
|
Me.ActivateCheck.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'SoftCheck
|
||||||
|
'
|
||||||
|
Me.SoftCheck.AutoSize = True
|
||||||
|
Me.SoftCheck.Location = New System.Drawing.Point(151, 67)
|
||||||
|
Me.SoftCheck.Name = "SoftCheck"
|
||||||
|
Me.SoftCheck.Size = New System.Drawing.Size(68, 17)
|
||||||
|
Me.SoftCheck.TabIndex = 3
|
||||||
|
Me.SoftCheck.TabStop = False
|
||||||
|
Me.SoftCheck.Text = "Software"
|
||||||
|
Me.SoftCheck.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'DrvCheck
|
||||||
|
'
|
||||||
|
Me.DrvCheck.AutoSize = True
|
||||||
|
Me.DrvCheck.Location = New System.Drawing.Point(7, 67)
|
||||||
|
Me.DrvCheck.Name = "DrvCheck"
|
||||||
|
Me.DrvCheck.Size = New System.Drawing.Size(59, 17)
|
||||||
|
Me.DrvCheck.TabIndex = 2
|
||||||
|
Me.DrvCheck.TabStop = False
|
||||||
|
Me.DrvCheck.Text = "Drivers"
|
||||||
|
Me.DrvCheck.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'OSCheck
|
||||||
|
'
|
||||||
|
Me.OSCheck.AutoSize = True
|
||||||
|
Me.OSCheck.Location = New System.Drawing.Point(7, 43)
|
||||||
|
Me.OSCheck.Name = "OSCheck"
|
||||||
|
Me.OSCheck.Size = New System.Drawing.Size(44, 17)
|
||||||
|
Me.OSCheck.TabIndex = 1
|
||||||
|
Me.OSCheck.TabStop = False
|
||||||
|
Me.OSCheck.Text = "O.S"
|
||||||
|
Me.OSCheck.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'HWCheck
|
||||||
|
'
|
||||||
|
Me.HWCheck.AutoSize = True
|
||||||
|
Me.HWCheck.Location = New System.Drawing.Point(7, 20)
|
||||||
|
Me.HWCheck.Name = "HWCheck"
|
||||||
|
Me.HWCheck.Size = New System.Drawing.Size(72, 17)
|
||||||
|
Me.HWCheck.TabIndex = 0
|
||||||
|
Me.HWCheck.TabStop = False
|
||||||
|
Me.HWCheck.Text = "Hardware"
|
||||||
|
Me.HWCheck.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'GroupBox2
|
||||||
|
'
|
||||||
|
Me.GroupBox2.Controls.Add(Me.NewIDBox)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.GivedByBox)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.Label8)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.EtatBox)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.SerieCheckBox)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.EmprunterName)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.EmpruntCheckBox)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.DetailsBox)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.Label5)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.NameBox)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.Label4)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.Label2)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.Label1)
|
||||||
|
Me.GroupBox2.Location = New System.Drawing.Point(12, 12)
|
||||||
|
Me.GroupBox2.Name = "GroupBox2"
|
||||||
|
Me.GroupBox2.Size = New System.Drawing.Size(508, 191)
|
||||||
|
Me.GroupBox2.TabIndex = 5
|
||||||
|
Me.GroupBox2.TabStop = False
|
||||||
|
Me.GroupBox2.Text = "Information et détails"
|
||||||
|
'
|
||||||
|
'NewIDBox
|
||||||
|
'
|
||||||
|
Me.NewIDBox.Location = New System.Drawing.Point(37, 16)
|
||||||
|
Me.NewIDBox.Name = "NewIDBox"
|
||||||
|
Me.NewIDBox.ReadOnly = True
|
||||||
|
Me.NewIDBox.Size = New System.Drawing.Size(79, 20)
|
||||||
|
Me.NewIDBox.TabIndex = 17
|
||||||
|
Me.NewIDBox.TabStop = False
|
||||||
|
'
|
||||||
|
'GivedByBox
|
||||||
|
'
|
||||||
|
Me.GivedByBox.Location = New System.Drawing.Point(251, 47)
|
||||||
|
Me.GivedByBox.Name = "GivedByBox"
|
||||||
|
Me.GivedByBox.ReadOnly = True
|
||||||
|
Me.GivedByBox.Size = New System.Drawing.Size(176, 20)
|
||||||
|
Me.GivedByBox.TabIndex = 16
|
||||||
|
Me.GivedByBox.TabStop = False
|
||||||
|
'
|
||||||
|
'Label8
|
||||||
|
'
|
||||||
|
Me.Label8.AutoSize = True
|
||||||
|
Me.Label8.Location = New System.Drawing.Point(174, 50)
|
||||||
|
Me.Label8.Name = "Label8"
|
||||||
|
Me.Label8.Size = New System.Drawing.Size(71, 13)
|
||||||
|
Me.Label8.TabIndex = 15
|
||||||
|
Me.Label8.Text = "Provenance :"
|
||||||
|
'
|
||||||
|
'EtatBox
|
||||||
|
'
|
||||||
|
Me.EtatBox.Location = New System.Drawing.Point(37, 47)
|
||||||
|
Me.EtatBox.Name = "EtatBox"
|
||||||
|
Me.EtatBox.ReadOnly = True
|
||||||
|
Me.EtatBox.Size = New System.Drawing.Size(131, 20)
|
||||||
|
Me.EtatBox.TabIndex = 13
|
||||||
|
Me.EtatBox.TabStop = False
|
||||||
|
'
|
||||||
|
'SerieCheckBox
|
||||||
|
'
|
||||||
|
Me.SerieCheckBox.AutoSize = True
|
||||||
|
Me.SerieCheckBox.Enabled = False
|
||||||
|
Me.SerieCheckBox.Location = New System.Drawing.Point(433, 49)
|
||||||
|
Me.SerieCheckBox.Name = "SerieCheckBox"
|
||||||
|
Me.SerieCheckBox.Size = New System.Drawing.Size(59, 17)
|
||||||
|
Me.SerieCheckBox.TabIndex = 12
|
||||||
|
Me.SerieCheckBox.TabStop = False
|
||||||
|
Me.SerieCheckBox.Text = "Serie ?"
|
||||||
|
Me.SerieCheckBox.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'EmprunterName
|
||||||
|
'
|
||||||
|
Me.EmprunterName.Location = New System.Drawing.Point(109, 166)
|
||||||
|
Me.EmprunterName.Name = "EmprunterName"
|
||||||
|
Me.EmprunterName.Size = New System.Drawing.Size(150, 20)
|
||||||
|
Me.EmprunterName.TabIndex = 11
|
||||||
|
Me.EmprunterName.TabStop = False
|
||||||
|
'
|
||||||
|
'EmpruntCheckBox
|
||||||
|
'
|
||||||
|
Me.EmpruntCheckBox.AutoSize = True
|
||||||
|
Me.EmpruntCheckBox.Location = New System.Drawing.Point(5, 168)
|
||||||
|
Me.EmpruntCheckBox.Name = "EmpruntCheckBox"
|
||||||
|
Me.EmpruntCheckBox.Size = New System.Drawing.Size(98, 17)
|
||||||
|
Me.EmpruntCheckBox.TabIndex = 10
|
||||||
|
Me.EmpruntCheckBox.TabStop = False
|
||||||
|
Me.EmpruntCheckBox.Text = "Emprunté par :"
|
||||||
|
Me.EmpruntCheckBox.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'DetailsBox
|
||||||
|
'
|
||||||
|
Me.DetailsBox.Location = New System.Drawing.Point(109, 77)
|
||||||
|
Me.DetailsBox.Multiline = True
|
||||||
|
Me.DetailsBox.Name = "DetailsBox"
|
||||||
|
Me.DetailsBox.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
|
||||||
|
Me.DetailsBox.Size = New System.Drawing.Size(383, 84)
|
||||||
|
Me.DetailsBox.TabIndex = 9
|
||||||
|
Me.DetailsBox.TabStop = False
|
||||||
|
'
|
||||||
|
'Label5
|
||||||
|
'
|
||||||
|
Me.Label5.AutoSize = True
|
||||||
|
Me.Label5.Location = New System.Drawing.Point(7, 50)
|
||||||
|
Me.Label5.Name = "Label5"
|
||||||
|
Me.Label5.Size = New System.Drawing.Size(32, 13)
|
||||||
|
Me.Label5.TabIndex = 6
|
||||||
|
Me.Label5.Text = "Etat :"
|
||||||
|
'
|
||||||
|
'NameBox
|
||||||
|
'
|
||||||
|
Me.NameBox.Location = New System.Drawing.Point(154, 16)
|
||||||
|
Me.NameBox.Name = "NameBox"
|
||||||
|
Me.NameBox.ReadOnly = True
|
||||||
|
Me.NameBox.Size = New System.Drawing.Size(339, 20)
|
||||||
|
Me.NameBox.TabIndex = 5
|
||||||
|
Me.NameBox.TabStop = False
|
||||||
|
'
|
||||||
|
'Label4
|
||||||
|
'
|
||||||
|
Me.Label4.AutoSize = True
|
||||||
|
Me.Label4.Location = New System.Drawing.Point(58, 80)
|
||||||
|
Me.Label4.Name = "Label4"
|
||||||
|
Me.Label4.Size = New System.Drawing.Size(45, 13)
|
||||||
|
Me.Label4.TabIndex = 4
|
||||||
|
Me.Label4.Text = "Détails :"
|
||||||
|
'
|
||||||
|
'Label2
|
||||||
|
'
|
||||||
|
Me.Label2.AutoSize = True
|
||||||
|
Me.Label2.Location = New System.Drawing.Point(122, 19)
|
||||||
|
Me.Label2.Name = "Label2"
|
||||||
|
Me.Label2.Size = New System.Drawing.Size(35, 13)
|
||||||
|
Me.Label2.TabIndex = 2
|
||||||
|
Me.Label2.Text = "Nom :"
|
||||||
|
'
|
||||||
|
'Label1
|
||||||
|
'
|
||||||
|
Me.Label1.AutoSize = True
|
||||||
|
Me.Label1.Location = New System.Drawing.Point(7, 19)
|
||||||
|
Me.Label1.Name = "Label1"
|
||||||
|
Me.Label1.Size = New System.Drawing.Size(24, 13)
|
||||||
|
Me.Label1.TabIndex = 0
|
||||||
|
Me.Label1.Text = "ID :"
|
||||||
|
'
|
||||||
|
'SaveEditButton
|
||||||
|
'
|
||||||
|
Me.SaveEditButton.Location = New System.Drawing.Point(166, 302)
|
||||||
|
Me.SaveEditButton.Name = "SaveEditButton"
|
||||||
|
Me.SaveEditButton.Size = New System.Drawing.Size(194, 44)
|
||||||
|
Me.SaveEditButton.TabIndex = 7
|
||||||
|
Me.SaveEditButton.Text = "Enregistrer"
|
||||||
|
Me.SaveEditButton.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'EditSpecs
|
||||||
|
'
|
||||||
|
Me.AcceptButton = Me.SaveEditButton
|
||||||
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||||
|
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||||
|
Me.ClientSize = New System.Drawing.Size(534, 351)
|
||||||
|
Me.Controls.Add(Me.SaveEditButton)
|
||||||
|
Me.Controls.Add(Me.GroupBox3)
|
||||||
|
Me.Controls.Add(Me.GroupBox2)
|
||||||
|
Me.MaximizeBox = False
|
||||||
|
Me.MaximumSize = New System.Drawing.Size(550, 390)
|
||||||
|
Me.MinimizeBox = False
|
||||||
|
Me.MinimumSize = New System.Drawing.Size(550, 390)
|
||||||
|
Me.Name = "EditSpecs"
|
||||||
|
Me.ShowIcon = False
|
||||||
|
Me.Text = "Editeur d'entrée"
|
||||||
|
Me.GroupBox3.ResumeLayout(False)
|
||||||
|
Me.GroupBox3.PerformLayout()
|
||||||
|
Me.GroupBox2.ResumeLayout(False)
|
||||||
|
Me.GroupBox2.PerformLayout()
|
||||||
|
Me.ResumeLayout(False)
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Friend WithEvents GroupBox3 As GroupBox
|
||||||
|
Friend WithEvents Label7 As Label
|
||||||
|
Friend WithEvents Label6 As Label
|
||||||
|
Friend WithEvents ActivateCheck As CheckBox
|
||||||
|
Friend WithEvents SoftCheck As CheckBox
|
||||||
|
Friend WithEvents DrvCheck As CheckBox
|
||||||
|
Friend WithEvents OSCheck As CheckBox
|
||||||
|
Friend WithEvents HWCheck As CheckBox
|
||||||
|
Friend WithEvents GroupBox2 As GroupBox
|
||||||
|
Friend WithEvents GivedByBox As TextBox
|
||||||
|
Friend WithEvents Label8 As Label
|
||||||
|
Friend WithEvents EtatBox As TextBox
|
||||||
|
Friend WithEvents SerieCheckBox As CheckBox
|
||||||
|
Friend WithEvents EmprunterName As TextBox
|
||||||
|
Friend WithEvents EmpruntCheckBox As CheckBox
|
||||||
|
Friend WithEvents DetailsBox As TextBox
|
||||||
|
Friend WithEvents Label5 As Label
|
||||||
|
Friend WithEvents NameBox As TextBox
|
||||||
|
Friend WithEvents Label4 As Label
|
||||||
|
Friend WithEvents Label2 As Label
|
||||||
|
Friend WithEvents Label1 As Label
|
||||||
|
Friend WithEvents NewIDBox As TextBox
|
||||||
|
Friend WithEvents RAMCmbBox As ComboBox
|
||||||
|
Friend WithEvents ProcArchCmbBox As ComboBox
|
||||||
|
Friend WithEvents OSCmbBox As ComboBox
|
||||||
|
Friend WithEvents SaveEditButton As Button
|
||||||
|
End Class
|
||||||
120
ISEN-Repair Inventory Manager/EditSpecs.resx
Normal file
120
ISEN-Repair Inventory Manager/EditSpecs.resx
Normal file
@ -0,0 +1,120 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<root>
|
||||||
|
<!--
|
||||||
|
Microsoft ResX Schema
|
||||||
|
|
||||||
|
Version 2.0
|
||||||
|
|
||||||
|
The primary goals of this format is to allow a simple XML format
|
||||||
|
that is mostly human readable. The generation and parsing of the
|
||||||
|
various data types are done through the TypeConverter classes
|
||||||
|
associated with the data types.
|
||||||
|
|
||||||
|
Example:
|
||||||
|
|
||||||
|
... ado.net/XML headers & schema ...
|
||||||
|
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||||
|
<resheader name="version">2.0</resheader>
|
||||||
|
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||||
|
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||||
|
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||||
|
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||||
|
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||||
|
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||||
|
</data>
|
||||||
|
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||||
|
<comment>This is a comment</comment>
|
||||||
|
</data>
|
||||||
|
|
||||||
|
There are any number of "resheader" rows that contain simple
|
||||||
|
name/value pairs.
|
||||||
|
|
||||||
|
Each data row contains a name, and value. The row also contains a
|
||||||
|
type or mimetype. Type corresponds to a .NET class that support
|
||||||
|
text/value conversion through the TypeConverter architecture.
|
||||||
|
Classes that don't support this are serialized and stored with the
|
||||||
|
mimetype set.
|
||||||
|
|
||||||
|
The mimetype is used for serialized objects, and tells the
|
||||||
|
ResXResourceReader how to depersist the object. This is currently not
|
||||||
|
extensible. For a given mimetype the value must be set accordingly:
|
||||||
|
|
||||||
|
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||||
|
that the ResXResourceWriter will generate, however the reader can
|
||||||
|
read any of the formats listed below.
|
||||||
|
|
||||||
|
mimetype: application/x-microsoft.net.object.binary.base64
|
||||||
|
value : The object must be serialized with
|
||||||
|
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||||
|
: and then encoded with base64 encoding.
|
||||||
|
|
||||||
|
mimetype: application/x-microsoft.net.object.soap.base64
|
||||||
|
value : The object must be serialized with
|
||||||
|
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||||
|
: and then encoded with base64 encoding.
|
||||||
|
|
||||||
|
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||||
|
value : The object must be serialized into a byte array
|
||||||
|
: using a System.ComponentModel.TypeConverter
|
||||||
|
: and then encoded with base64 encoding.
|
||||||
|
-->
|
||||||
|
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||||
|
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||||
|
<xsd:element name="root" msdata:IsDataSet="true">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:choice maxOccurs="unbounded">
|
||||||
|
<xsd:element name="metadata">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:sequence>
|
||||||
|
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||||
|
</xsd:sequence>
|
||||||
|
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||||
|
<xsd:attribute name="type" type="xsd:string" />
|
||||||
|
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||||
|
<xsd:attribute ref="xml:space" />
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
<xsd:element name="assembly">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:attribute name="alias" type="xsd:string" />
|
||||||
|
<xsd:attribute name="name" type="xsd:string" />
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
<xsd:element name="data">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:sequence>
|
||||||
|
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||||
|
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||||
|
</xsd:sequence>
|
||||||
|
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||||
|
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||||
|
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||||
|
<xsd:attribute ref="xml:space" />
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
<xsd:element name="resheader">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:sequence>
|
||||||
|
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||||
|
</xsd:sequence>
|
||||||
|
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
</xsd:choice>
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
</xsd:schema>
|
||||||
|
<resheader name="resmimetype">
|
||||||
|
<value>text/microsoft-resx</value>
|
||||||
|
</resheader>
|
||||||
|
<resheader name="version">
|
||||||
|
<value>2.0</value>
|
||||||
|
</resheader>
|
||||||
|
<resheader name="reader">
|
||||||
|
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||||
|
</resheader>
|
||||||
|
<resheader name="writer">
|
||||||
|
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||||
|
</resheader>
|
||||||
|
</root>
|
||||||
59
ISEN-Repair Inventory Manager/EditSpecs.vb
Normal file
59
ISEN-Repair Inventory Manager/EditSpecs.vb
Normal file
@ -0,0 +1,59 @@
|
|||||||
|
Public Class EditSpecs
|
||||||
|
Public Sub New(id As String, name As String, stat As String, givedBy As String, serial As Boolean, details As String, emprunt As Boolean, empruntBy As String,
|
||||||
|
HW As Boolean, OS As Boolean, DRV As Boolean, ACT As Boolean, SFT As Boolean, procArch As String, ram As String, typeOS As String)
|
||||||
|
|
||||||
|
' Cet appel est requis par le concepteur.
|
||||||
|
InitializeComponent()
|
||||||
|
|
||||||
|
' Ajoutez une initialisation quelconque après l'appel InitializeComponent().
|
||||||
|
NewIDBox.Text = id
|
||||||
|
NameBox.Text = name
|
||||||
|
EtatBox.Text = stat
|
||||||
|
GivedByBox.Text = givedBy
|
||||||
|
SerieCheckBox.Checked = serial
|
||||||
|
DetailsBox.Text = details
|
||||||
|
EmpruntCheckBox.Checked = emprunt
|
||||||
|
EmprunterName.Text = empruntBy
|
||||||
|
HWCheck.Checked = HW
|
||||||
|
OSCheck.Checked = OS
|
||||||
|
DrvCheck.Checked = DRV
|
||||||
|
ActivateCheck.Checked = ACT
|
||||||
|
SoftCheck.Checked = SFT
|
||||||
|
Select Case procArch
|
||||||
|
Case "32bits"
|
||||||
|
ProcArchCmbBox.SelectedIndex = 0
|
||||||
|
Case "64bits"
|
||||||
|
ProcArchCmbBox.SelectedIndex = 1
|
||||||
|
End Select
|
||||||
|
Select Case ram
|
||||||
|
Case "<1G"
|
||||||
|
RAMCmbBox.SelectedIndex = 0
|
||||||
|
Case "1G"
|
||||||
|
RAMCmbBox.SelectedIndex = 1
|
||||||
|
Case "2G"
|
||||||
|
RAMCmbBox.SelectedIndex = 2
|
||||||
|
Case "3G"
|
||||||
|
RAMCmbBox.SelectedIndex = 3
|
||||||
|
Case "4G"
|
||||||
|
RAMCmbBox.SelectedIndex = 4
|
||||||
|
Case ">4G"
|
||||||
|
RAMCmbBox.SelectedIndex = 5
|
||||||
|
End Select
|
||||||
|
Select Case typeOS
|
||||||
|
Case "Win XP PRO SP3"
|
||||||
|
OSCmbBox.SelectedIndex = 0
|
||||||
|
Case "WIN 7 SP1"
|
||||||
|
OSCmbBox.SelectedIndex = 1
|
||||||
|
Case "WIN 10"
|
||||||
|
OSCmbBox.SelectedIndex = 2
|
||||||
|
Case "UNIX"
|
||||||
|
OSCmbBox.SelectedIndex = 3
|
||||||
|
Case "Inconnue"
|
||||||
|
OSCmbBox.SelectedIndex = 4
|
||||||
|
End Select
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub SaveEditButton_Click(sender As Object, e As EventArgs) Handles SaveEditButton.Click
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
End Class
|
||||||
@ -112,6 +112,12 @@
|
|||||||
<Compile Include="AddMachine.vb">
|
<Compile Include="AddMachine.vb">
|
||||||
<SubType>Form</SubType>
|
<SubType>Form</SubType>
|
||||||
</Compile>
|
</Compile>
|
||||||
|
<Compile Include="EditSpecs.Designer.vb">
|
||||||
|
<DependentUpon>EditSpecs.vb</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="EditSpecs.vb">
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
<Compile Include="IDGenerator.Designer.vb">
|
<Compile Include="IDGenerator.Designer.vb">
|
||||||
<DependentUpon>IDGenerator.vb</DependentUpon>
|
<DependentUpon>IDGenerator.vb</DependentUpon>
|
||||||
</Compile>
|
</Compile>
|
||||||
@ -157,6 +163,9 @@
|
|||||||
<EmbeddedResource Include="AddMachine.resx">
|
<EmbeddedResource Include="AddMachine.resx">
|
||||||
<DependentUpon>AddMachine.vb</DependentUpon>
|
<DependentUpon>AddMachine.vb</DependentUpon>
|
||||||
</EmbeddedResource>
|
</EmbeddedResource>
|
||||||
|
<EmbeddedResource Include="EditSpecs.resx">
|
||||||
|
<DependentUpon>EditSpecs.vb</DependentUpon>
|
||||||
|
</EmbeddedResource>
|
||||||
<EmbeddedResource Include="IDGenerator.resx">
|
<EmbeddedResource Include="IDGenerator.resx">
|
||||||
<DependentUpon>IDGenerator.vb</DependentUpon>
|
<DependentUpon>IDGenerator.vb</DependentUpon>
|
||||||
</EmbeddedResource>
|
</EmbeddedResource>
|
||||||
|
|||||||
17
ISEN-Repair Inventory Manager/Main.Designer.vb
generated
17
ISEN-Repair Inventory Manager/Main.Designer.vb
generated
@ -25,6 +25,7 @@ Partial Class Main
|
|||||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Main))
|
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Main))
|
||||||
Me.MenuStrip1 = New System.Windows.Forms.MenuStrip()
|
Me.MenuStrip1 = New System.Windows.Forms.MenuStrip()
|
||||||
Me.AddComputerToolMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
Me.AddComputerToolMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||||
|
Me.GénérerDesIDsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||||
Me.AboutToolMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
Me.AboutToolMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||||
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
|
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
|
||||||
Me.StatusLabel = New System.Windows.Forms.ToolStripStatusLabel()
|
Me.StatusLabel = New System.Windows.Forms.ToolStripStatusLabel()
|
||||||
@ -59,7 +60,6 @@ Partial Class Main
|
|||||||
Me.OSBox = New System.Windows.Forms.TextBox()
|
Me.OSBox = New System.Windows.Forms.TextBox()
|
||||||
Me.ArchBox = New System.Windows.Forms.TextBox()
|
Me.ArchBox = New System.Windows.Forms.TextBox()
|
||||||
Me.EditButton = New System.Windows.Forms.Button()
|
Me.EditButton = New System.Windows.Forms.Button()
|
||||||
Me.GénérerDesIDsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
|
||||||
Me.MenuStrip1.SuspendLayout()
|
Me.MenuStrip1.SuspendLayout()
|
||||||
Me.StatusStrip1.SuspendLayout()
|
Me.StatusStrip1.SuspendLayout()
|
||||||
Me.GroupBox1.SuspendLayout()
|
Me.GroupBox1.SuspendLayout()
|
||||||
@ -82,6 +82,12 @@ Partial Class Main
|
|||||||
Me.AddComputerToolMenuItem.Size = New System.Drawing.Size(93, 20)
|
Me.AddComputerToolMenuItem.Size = New System.Drawing.Size(93, 20)
|
||||||
Me.AddComputerToolMenuItem.Text = "Ajouter un PC"
|
Me.AddComputerToolMenuItem.Text = "Ajouter un PC"
|
||||||
'
|
'
|
||||||
|
'GénérerDesIDsToolStripMenuItem
|
||||||
|
'
|
||||||
|
Me.GénérerDesIDsToolStripMenuItem.Name = "GénérerDesIDsToolStripMenuItem"
|
||||||
|
Me.GénérerDesIDsToolStripMenuItem.Size = New System.Drawing.Size(100, 20)
|
||||||
|
Me.GénérerDesIDsToolStripMenuItem.Text = "Générer des IDs"
|
||||||
|
'
|
||||||
'AboutToolMenuItem
|
'AboutToolMenuItem
|
||||||
'
|
'
|
||||||
Me.AboutToolMenuItem.Name = "AboutToolMenuItem"
|
Me.AboutToolMenuItem.Name = "AboutToolMenuItem"
|
||||||
@ -125,6 +131,7 @@ Partial Class Main
|
|||||||
'SendOutButton
|
'SendOutButton
|
||||||
'
|
'
|
||||||
Me.SendOutButton.BackColor = System.Drawing.Color.Green
|
Me.SendOutButton.BackColor = System.Drawing.Color.Green
|
||||||
|
Me.SendOutButton.Enabled = False
|
||||||
Me.SendOutButton.Location = New System.Drawing.Point(701, 343)
|
Me.SendOutButton.Location = New System.Drawing.Point(701, 343)
|
||||||
Me.SendOutButton.Name = "SendOutButton"
|
Me.SendOutButton.Name = "SendOutButton"
|
||||||
Me.SendOutButton.Size = New System.Drawing.Size(156, 23)
|
Me.SendOutButton.Size = New System.Drawing.Size(156, 23)
|
||||||
@ -136,6 +143,7 @@ Partial Class Main
|
|||||||
'TrashButton
|
'TrashButton
|
||||||
'
|
'
|
||||||
Me.TrashButton.BackColor = System.Drawing.Color.Firebrick
|
Me.TrashButton.BackColor = System.Drawing.Color.Firebrick
|
||||||
|
Me.TrashButton.Enabled = False
|
||||||
Me.TrashButton.ForeColor = System.Drawing.Color.White
|
Me.TrashButton.ForeColor = System.Drawing.Color.White
|
||||||
Me.TrashButton.Location = New System.Drawing.Point(361, 343)
|
Me.TrashButton.Location = New System.Drawing.Point(361, 343)
|
||||||
Me.TrashButton.Name = "TrashButton"
|
Me.TrashButton.Name = "TrashButton"
|
||||||
@ -427,6 +435,7 @@ Partial Class Main
|
|||||||
'EditButton
|
'EditButton
|
||||||
'
|
'
|
||||||
Me.EditButton.BackColor = System.Drawing.Color.Gold
|
Me.EditButton.BackColor = System.Drawing.Color.Gold
|
||||||
|
Me.EditButton.Enabled = False
|
||||||
Me.EditButton.Location = New System.Drawing.Point(523, 343)
|
Me.EditButton.Location = New System.Drawing.Point(523, 343)
|
||||||
Me.EditButton.Name = "EditButton"
|
Me.EditButton.Name = "EditButton"
|
||||||
Me.EditButton.Size = New System.Drawing.Size(172, 23)
|
Me.EditButton.Size = New System.Drawing.Size(172, 23)
|
||||||
@ -435,12 +444,6 @@ Partial Class Main
|
|||||||
Me.EditButton.Text = "Editer le suivi"
|
Me.EditButton.Text = "Editer le suivi"
|
||||||
Me.EditButton.UseVisualStyleBackColor = False
|
Me.EditButton.UseVisualStyleBackColor = False
|
||||||
'
|
'
|
||||||
'GénérerDesIDsToolStripMenuItem
|
|
||||||
'
|
|
||||||
Me.GénérerDesIDsToolStripMenuItem.Name = "GénérerDesIDsToolStripMenuItem"
|
|
||||||
Me.GénérerDesIDsToolStripMenuItem.Size = New System.Drawing.Size(100, 20)
|
|
||||||
Me.GénérerDesIDsToolStripMenuItem.Text = "Générer des IDs"
|
|
||||||
'
|
|
||||||
'Main
|
'Main
|
||||||
'
|
'
|
||||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||||
|
|||||||
@ -182,45 +182,7 @@ Public Class Main
|
|||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub InvList_SelectedIndexChanged(sender As Object, e As EventArgs) Handles InvList.SelectedIndexChanged
|
Private Sub InvList_SelectedIndexChanged(sender As Object, e As EventArgs) Handles InvList.SelectedIndexChanged
|
||||||
Dim dtr As SQLiteDataReader
|
IDBox.Text = idList(InvList.SelectedIndex)
|
||||||
Dim entriesRow As DataRow = Nothing
|
|
||||||
|
|
||||||
Try
|
|
||||||
StatusLabel.Text = "Récupération des données depuis la base SQLite..."
|
|
||||||
Using con As New SQLiteConnection("URI=file:db.sqlite")
|
|
||||||
con.Open()
|
|
||||||
Using cmd As New SQLiteCommand(con)
|
|
||||||
cmd.CommandText = "SELECT * FROM computers_desc WHERE id=" & idList(InvList.SelectedIndex) & ";"
|
|
||||||
dtr = cmd.ExecuteReader()
|
|
||||||
While dtr.Read()
|
|
||||||
IDBox.Text = dtr.GetString(0)
|
|
||||||
manualID_selected = True
|
|
||||||
NameBox.Text = dtr.GetString(1)
|
|
||||||
If dtr.GetInt32(2) = 0 Then
|
|
||||||
EtatBox.Text = "R.I.P"
|
|
||||||
ElseIf dtr.GetInt32(2) = 1 Then
|
|
||||||
EtatBox.Text = "Peu faire l'affaire"
|
|
||||||
ElseIf dtr.GetInt32(2) = 2 Then
|
|
||||||
EtatBox.Text = "En état"
|
|
||||||
ElseIf dtr.GetInt32(2) = 3 Then
|
|
||||||
EtatBox.Text = "Neuf"
|
|
||||||
End If
|
|
||||||
SerieCheckBox.Checked = dtr.GetBoolean(3)
|
|
||||||
DetailsBox.Text = Replace(dtr.GetString(4), "_*_", "'")
|
|
||||||
EmpruntCheckBox.Checked = dtr.GetBoolean(5)
|
|
||||||
EmprunterName.Text = dtr.GetString(6)
|
|
||||||
GivenByBox.Text = dtr.GetString(7)
|
|
||||||
RequestComputerProgress(IDBox.Text)
|
|
||||||
End While
|
|
||||||
End Using
|
|
||||||
con.Close()
|
|
||||||
End Using
|
|
||||||
|
|
||||||
StatusLabel.Text = "Récupération avec succés de la base SQLite."
|
|
||||||
Catch ex As Exception
|
|
||||||
StatusLabel.Text = "Une erreur avec la base SQLite s'est produite !"
|
|
||||||
MsgBox(ex.Message)
|
|
||||||
End Try
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub ToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles AboutToolMenuItem.Click
|
Private Sub ToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles AboutToolMenuItem.Click
|
||||||
@ -263,6 +225,8 @@ Public Class Main
|
|||||||
While dtr.Read()
|
While dtr.Read()
|
||||||
id_found = True
|
id_found = True
|
||||||
manualID_selected = True
|
manualID_selected = True
|
||||||
|
TrashButton.Enabled = True
|
||||||
|
EditButton.Enabled = True
|
||||||
StatusLabel.Text = "ID trouvé !"
|
StatusLabel.Text = "ID trouvé !"
|
||||||
NameBox.Text = dtr.GetString(1)
|
NameBox.Text = dtr.GetString(1)
|
||||||
If dtr.GetInt32(2) = 0 Then
|
If dtr.GetInt32(2) = 0 Then
|
||||||
@ -293,7 +257,7 @@ Public Class Main
|
|||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub IDBox_MouseClick(sender As Object, e As MouseEventArgs) Handles IDBox.MouseClick
|
Private Sub IDBox_MouseClick(sender As Object, e As MouseEventArgs) Handles IDBox.MouseClick
|
||||||
If manualID_selected Then IDBox.Clear() : manualID_selected = False
|
If manualID_selected Then IDBox.Clear() : manualID_selected = False : TrashButton.Enabled = False : EditButton.Enabled = False
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub RequestComputerProgress(machineID As String)
|
Private Sub RequestComputerProgress(machineID As String)
|
||||||
@ -392,4 +356,11 @@ Public Class Main
|
|||||||
idGeneratorForm.Show()
|
idGeneratorForm.Show()
|
||||||
idGeneratorForm = Nothing
|
idGeneratorForm = Nothing
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
Private Sub EditButton_Click(sender As Object, e As EventArgs) Handles EditButton.Click
|
||||||
|
Dim editForm As EditSpecs
|
||||||
|
editForm = New EditSpecs(IDBox.Text, NameBox.Text, EtatBox.Text, GivenByBox.Text, SerieCheckBox.Checked, DetailsBox.Text, EmpruntCheckBox.Checked, EmprunterName.Text, HWCheck.Checked, OSCheck.Checked, DrvCheck.Checked, ActivateCheck.Checked, SoftCheck.Checked, ArchBox.Text, MemBox.Text, OSBox.Text)
|
||||||
|
editForm.ShowDialog()
|
||||||
|
editForm = Nothing
|
||||||
|
End Sub
|
||||||
End Class
|
End Class
|
||||||
|
|||||||
Reference in New Issue
Block a user