Paris-5/Candidate-7-Pro
Paris-5/Candidate-7-Pro
1
1
Fork 0
Code Issues Pull Requests Releases 1 Activity

refactor: 🚀 Fixes various bugs in the forms

Browse Source
This commit is contained in:
Simon Priet 2021-09-10 01:19:48 +02:00
parent fed0aa118a
commit f41ca0d8f5
54 changed files with 7071 additions and 2294 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

155
FrmAccueil.Designer.vb generated
View File

@ -21,42 +21,45 @@ Partial Class FrmAccueil
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FrmAccueil))
Me.Lbl1 = New System.Windows.Forms.Label
Me.CmdQuit = New System.Windows.Forms.Button
Me.CmdBilan = New System.Windows.Forms.Button
Me.CmdAff = New System.Windows.Forms.Button
Me.CmdEdit = New System.Windows.Forms.Button
Me.CmdNew = New System.Windows.Forms.Button
Me.TmrHor = New System.Windows.Forms.Timer(Me.components)
Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.BilanToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem
Me.BilanToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem
Me.BilanToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem
Me.PictureBox1 = New System.Windows.Forms.PictureBox
Me.PictureBox3 = New System.Windows.Forms.PictureBox
Me.Label1 = New System.Windows.Forms.Label
Me.Label2 = New System.Windows.Forms.Label
Me.PictureBox2 = New System.Windows.Forms.PictureBox
Me.ContextMenuStrip1.SuspendLayout()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'Lbl1
'
Me.Lbl1.Location = New System.Drawing.Point(12, 9)
Me.Lbl1.Name = "Lbl1"
Me.Lbl1.Size = New System.Drawing.Size(392, 22)
Me.Lbl1.TabIndex = 5
Me.Lbl1.Text = "Bienvenue dans Candidat 7 Pro, votre logiciel de gestion de candidature."
Me.Lbl1.TextAlign = System.Drawing.ContentAlignment.TopCenter
'
'CmdQuit
'
Me.CmdQuit.Location = New System.Drawing.Point(259, 246)
Me.CmdQuit.Anchor = System.Windows.Forms.AnchorStyles.Bottom
Me.CmdQuit.Location = New System.Drawing.Point(148, 225)
Me.CmdQuit.Name = "CmdQuit"
Me.CmdQuit.Size = New System.Drawing.Size(145, 27)
Me.CmdQuit.Size = New System.Drawing.Size(145, 36)
Me.CmdQuit.TabIndex = 4
Me.CmdQuit.Text = "&Fermer les inscriptions..."
Me.CmdQuit.UseVisualStyleBackColor = True
'
'CmdBilan
'
Me.CmdBilan.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.CmdBilan.Image = CType(resources.GetObject("CmdBilan.Image"), System.Drawing.Image)
Me.CmdBilan.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
Me.CmdBilan.Location = New System.Drawing.Point(259, 186)
Me.CmdBilan.Location = New System.Drawing.Point(259, 170)
Me.CmdBilan.Name = "CmdBilan"
Me.CmdBilan.Size = New System.Drawing.Size(145, 27)
Me.CmdBilan.Size = New System.Drawing.Size(141, 29)
Me.CmdBilan.TabIndex = 3
Me.CmdBilan.Text = "&Bilan..."
Me.CmdBilan.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageBeforeText
@ -64,10 +67,11 @@ Partial Class FrmAccueil
'
'CmdAff
'
Me.CmdAff.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.CmdAff.Image = CType(resources.GetObject("CmdAff.Image"), System.Drawing.Image)
Me.CmdAff.Location = New System.Drawing.Point(259, 141)
Me.CmdAff.Location = New System.Drawing.Point(259, 135)
Me.CmdAff.Name = "CmdAff"
Me.CmdAff.Size = New System.Drawing.Size(145, 27)
Me.CmdAff.Size = New System.Drawing.Size(141, 29)
Me.CmdAff.TabIndex = 2
Me.CmdAff.Text = "&Liste..."
Me.CmdAff.TextAlign = System.Drawing.ContentAlignment.MiddleRight
@ -76,71 +80,154 @@ Partial Class FrmAccueil
'
'CmdEdit
'
Me.CmdEdit.Location = New System.Drawing.Point(259, 80)
Me.CmdEdit.Location = New System.Drawing.Point(42, 170)
Me.CmdEdit.Name = "CmdEdit"
Me.CmdEdit.Size = New System.Drawing.Size(145, 27)
Me.CmdEdit.Size = New System.Drawing.Size(141, 29)
Me.CmdEdit.TabIndex = 1
Me.CmdEdit.Text = "Editer / &Supprimer..."
Me.CmdEdit.UseVisualStyleBackColor = True
'
'CmdNew
'
Me.CmdNew.BackColor = System.Drawing.Color.Transparent
Me.CmdNew.ForeColor = System.Drawing.SystemColors.ControlText
Me.CmdNew.Location = New System.Drawing.Point(259, 34)
Me.CmdNew.Location = New System.Drawing.Point(42, 135)
Me.CmdNew.Name = "CmdNew"
Me.CmdNew.Size = New System.Drawing.Size(145, 27)
Me.CmdNew.Size = New System.Drawing.Size(141, 29)
Me.CmdNew.TabIndex = 0
Me.CmdNew.Text = "&Nouveau..."
Me.CmdNew.UseVisualStyleBackColor = True
Me.CmdNew.Text = "&Nouvelle candidature..."
Me.CmdNew.UseVisualStyleBackColor = False
'
'TmrHor
'
Me.TmrHor.Enabled = True
Me.TmrHor.Interval = 2000
'
'ContextMenuStrip1
'
Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BilanToolStripMenuItem, Me.BilanToolStripMenuItem1, Me.BilanToolStripMenuItem2})
Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
Me.ContextMenuStrip1.RenderMode = System.Windows.Forms.ToolStripRenderMode.System
Me.ContextMenuStrip1.Size = New System.Drawing.Size(259, 70)
'
'BilanToolStripMenuItem
'
Me.BilanToolStripMenuItem.Name = "BilanToolStripMenuItem"
Me.BilanToolStripMenuItem.Size = New System.Drawing.Size(258, 22)
Me.BilanToolStripMenuItem.Text = "Bilan individuel..."
'
'BilanToolStripMenuItem1
'
Me.BilanToolStripMenuItem1.Name = "BilanToolStripMenuItem1"
Me.BilanToolStripMenuItem1.Size = New System.Drawing.Size(258, 22)
Me.BilanToolStripMenuItem1.Text = "Bilan par matière..."
'
'BilanToolStripMenuItem2
'
Me.BilanToolStripMenuItem2.Name = "BilanToolStripMenuItem2"
Me.BilanToolStripMenuItem2.Size = New System.Drawing.Size(258, 22)
Me.BilanToolStripMenuItem2.Text = "Bilan des inscriptions supprimées..."
'
'PictureBox1
'
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
Me.PictureBox1.Location = New System.Drawing.Point(12, 34)
Me.PictureBox1.Location = New System.Drawing.Point(0, 0)
Me.PictureBox1.Name = "PictureBox1"
Me.PictureBox1.Size = New System.Drawing.Size(193, 239)
Me.PictureBox1.Size = New System.Drawing.Size(750, 55)
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize
Me.PictureBox1.TabIndex = 16
Me.PictureBox1.TabStop = False
'
'PictureBox3
'
Me.PictureBox3.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.PictureBox3.Image = CType(resources.GetObject("PictureBox3.Image"), System.Drawing.Image)
Me.PictureBox3.Location = New System.Drawing.Point(0, 52)
Me.PictureBox3.Name = "PictureBox3"
Me.PictureBox3.Size = New System.Drawing.Size(447, 167)
Me.PictureBox3.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox3.TabIndex = 24
Me.PictureBox3.TabStop = False
'
'Label1
'
Me.Label1.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.Label1.Location = New System.Drawing.Point(12, 65)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(200, 60)
Me.Label1.TabIndex = 25
Me.Label1.Text = "Pour commencer, cliquez sur Nouvelle candidature. Si vous souhaitez modifier une " & _
"candidature, cliquez sur Editer / Supprimer."
'
'Label2
'
Me.Label2.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Label2.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.Label2.Location = New System.Drawing.Point(229, 65)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(200, 60)
Me.Label2.TabIndex = 26
Me.Label2.Text = "Vous pouvez a tout moment afficher une liste provisoire des candidats , ou affich" & _
"er divers bilans en cliquant sur ces deux boutons."
'
'PictureBox2
'
Me.PictureBox2.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.PictureBox2.Image = CType(resources.GetObject("PictureBox2.Image"), System.Drawing.Image)
Me.PictureBox2.Location = New System.Drawing.Point(0, 217)
Me.PictureBox2.MaximumSize = New System.Drawing.Size(550, 2)
Me.PictureBox2.Name = "PictureBox2"
Me.PictureBox2.Size = New System.Drawing.Size(447, 2)
Me.PictureBox2.TabIndex = 27
Me.PictureBox2.TabStop = False
'
'FrmAccueil
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(96.0!, 96.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Dpi
Me.ClientSize = New System.Drawing.Size(417, 282)
Me.Controls.Add(Me.PictureBox1)
Me.Controls.Add(Me.CmdQuit)
Me.ClientSize = New System.Drawing.Size(441, 273)
Me.Controls.Add(Me.PictureBox2)
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.Label2)
Me.Controls.Add(Me.CmdBilan)
Me.Controls.Add(Me.CmdAff)
Me.Controls.Add(Me.CmdEdit)
Me.Controls.Add(Me.CmdNew)
Me.Controls.Add(Me.Lbl1)
Me.Controls.Add(Me.CmdQuit)
Me.Controls.Add(Me.CmdAff)
Me.Controls.Add(Me.PictureBox1)
Me.Controls.Add(Me.CmdEdit)
Me.Controls.Add(Me.PictureBox3)
Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MaximizeBox = False
Me.MaximumSize = New System.Drawing.Size(423, 314)
Me.MinimumSize = New System.Drawing.Size(423, 314)
Me.Name = "FrmAccueil"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Tag = "Candidat 7 Pro : Accueil"
Me.Text = "Candidat 7 Pro : Accueil"
Me.ContextMenuStrip1.ResumeLayout(False)
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents Lbl1 As System.Windows.Forms.Label
Friend WithEvents CmdQuit As System.Windows.Forms.Button
Friend WithEvents CmdBilan As System.Windows.Forms.Button
Friend WithEvents CmdAff As System.Windows.Forms.Button
Friend WithEvents CmdEdit As System.Windows.Forms.Button
Friend WithEvents CmdNew As System.Windows.Forms.Button
Friend WithEvents TmrHor As System.Windows.Forms.Timer
Friend WithEvents ContextMenuStrip1 As System.Windows.Forms.ContextMenuStrip
Friend WithEvents BilanToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents BilanToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents BilanToolStripMenuItem2 As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
Friend WithEvents PictureBox3 As System.Windows.Forms.PictureBox
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents PictureBox2 As System.Windows.Forms.PictureBox
End Class

1979
FrmAccueil.resx
View File

File diff suppressed because it is too large Load Diff

158
FrmAccueil.vb
View File

@ -1,152 +1,29 @@
Public Class FrmAccueil
Public Boule As Boolean REM inscription ou édition
Public Horaire As String REM Sert a stoquer l'heurs pour les autres fenetres QUI ONT DDES TIMERS.
Structure PERS REM sert de "Tampon" entre les données entrées dans les feuilles et le fichier.
<VBFixedString(8)> Dim Nom As String
<VBFixedString(6)> Dim Prenom As String
<VBFixedString(10)> Dim Adresse As String
<VBFixedString(5)> Dim CP As Integer
<VBFixedString(15)> Dim Ville As String
<VBFixedString(5)> Dim Age As Integer REM Stocke la date de naissance en mois (plus facile pour convertir après)
<VBFixedString(1)> Dim Region As Integer REM Stocke l'index
<VBFixedArray(15)> Dim Ecrit() As String REM stoquer les index plutot que les nom ?
<VBFixedArray(15)> Dim Oral() As String REM IDEMPOTENCE
<VBFixedString(2)> Dim Fac As Integer REM Stocke l'index
End Structure
Structure Index REM Sert pour le bilan des supprimés, mais aussi a générer le menu déroulant pour édition.
Dim no As Integer
Dim nom As String
Dim prenom As String
Dim Suppr As Boolean
End Structure
Public cddts As PERS
Public nf As Integer
Public NbID As Integer = 1 REM Nombre de candidats
Public IDlu As Integer REM Sélection d'un candidat.
Public lgcddts As Integer REM Sert a obtenir la bonne longueur.
Public Tindex() As Index
Public Sub InscBdD()
REM Entrée depuis la feuille 1
cddts.Nom = FrmInput1.TxtNom.Text
cddts.Prenom = FrmInput1.TxtPrenom.Text
cddts.Adresse = FrmInput1.TxtAdrss.Text
cddts.CP = FrmInput1.TxtCP.Text
cddts.Ville = FrmInput1.TxtVille.Text
cddts.Age = FrmInput1.nais
Tindex(NbID - 2).no = NbID
Tindex(NbID - 2).nom = cddts.Nom
Tindex(NbID - 2).prenom = cddts.Prenom
REM Entrée depuis la feuille 2
cddts.Region = FrmInput2.CboRegion.SelectedIndex
Dim b As CheckBox
Dim j As Integer = 0
For Each b In FrmInput2.GBEcrit.Controls
If b.Checked Then
cddts.Ecrit(j) = b.Text
j += 1
End If
Next
j = 0
For Each b In FrmInput2.GBOral.Controls
If b.Checked Then
cddts.Oral(j) = b.Text
j += 1
End If
Next
If FrmInput2.RBYes.Checked Then cddts.Fac = FrmInput2.CboFac.SelectedIndex
REM Entrée depuis la feuille 3
Tindex(NbID).Suppr = False
REM Sauvegarde
FilePut(nf, cddts, NbID)
FilePut(nf, cddts.CP = NbID, 1)
NbID += 1
End Sub
Public Sub MaJBdD()
REM EST-IL NECESSAIRE DE FAIRE DES TESTS POUR VOIR DES CHANGEMENTS, OU MODIFIER TOUT DE MÊME ?
REM Entrée depuis la feuille 1
cddts.Nom = FrmInput1.TxtNom.Text
cddts.Prenom = FrmInput1.TxtPrenom.Text
cddts.Adresse = FrmInput1.TxtAdrss.Text
cddts.CP = FrmInput1.TxtCP.Text
cddts.Ville = FrmInput1.TxtVille.Text
cddts.Age = FrmInput1.nais
REM Entrée depuis la feuille 2
cddts.Region = FrmInput2.CboRegion.SelectedIndex
Dim b As CheckBox
Dim j As Integer = 0
For Each b In FrmInput2.GBEcrit.Controls
If b.Checked Then
cddts.Ecrit(j) = b.Text REM Plus logique que les version en dessous, ne marche pas quand même.
j += 1
End If
Next
j = 0
For Each b In FrmInput2.GBOral.Controls
If b.Checked Then
cddts.Oral(j) = b.Text REM Comme en Td mais je ne comprend pas l'interet de = true
j += 1
End If
Next
If FrmInput2.RBYes.Checked Then cddts.Fac = FrmInput2.CboFac.SelectedIndex
REM Sauvegarde
FilePut(nf, cddts, FrmEdit.SelectedID)
End Sub
Public Sub SupprBdD()
Idlu = FrmEdit.SelectedID
Tindex(IDlu).Suppr = True
FilePut(nf, cddts, FrmEdit.SelectedID)
End Sub
Public Sub LectBdD() REM destiné a évoluer
Dim i As Integer
For i = 0 To NbID - 2 REM UBound(Tindex), car le tableau est déjà alloué.
If Tindex(i).Suppr = False Then
FrmEdit.CBNP.Items.Add(Format(i + 2, "00") & " - " & Tindex(i).nom & " " & Tindex(i).prenom)
End If
Next i
End Sub
Public Sub ModifBdDIN1()
End Sub
Private Sub FrmAcceuil_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ReDim cddts.Ecrit(3)
ReDim cddts.Oral(2)
ReDim Tindex(3)
cddts.CP = NbID REM NbID qui est initialisé a 1.
TmrHor.Start()
cddts.CP = ClefMAX REM ClefMAX qui est initialisé a 1.
Boule = False
nf = FreeFile()
lgcddts = Len(cddts) REM REF au mail de DG : La longeur de cddts n'est pas la même une fois le tableau redimentionné, il faut donc recalculer ladire longueur.
FileOpen(nf, "Candidats.AFF", OpenMode.Random, OpenAccess.ReadWrite, OpenShare.Shared, lgcddts) REM FileOpen(...ared, Len(cddts)) ne pourrait-il pas marcher vue que les tableaux ont étés modifés avant ?
FilePut(nf, cddts, NbID)
NbID += 1 REM Il passe a 2 pour la prochaine clef dans le fichier.
FileOpen(nf, "Candidats.C7P", OpenMode.Random, OpenAccess.ReadWrite, OpenShare.Shared, lgcddts) REM FileOpen(...ared, Len(cddts)) ne pourrait-il pas marcher vue que les tableaux ont étés modifés avant ?
FilePut(nf, cddts, ClefMAX)
ClefMAX += 1 REM Il passe a 2 pour la prochaine clef dans le fichier.
End Sub
Private Sub CmdQuit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdQuit.Click
Dim quit As Integer
quit = MsgBox("Vous êtes sur le point de quitter Candide Pro 7. Voulez-vous continuer ?", MsgBoxStyle.Question + MsgBoxStyle.YesNo, "Quitter Candide Pro 7")
If quit = vbYes Then
FileClose(nf)
End
End If
FrmBilanSelect.Tag = "Quitter Candidat 7 Pro"
FrmBilanSelect.LblInfo.Text = "Avant de fermer les inscriptions, vous pouvez afficher un bilan individuel pour un candidat, un bilan par matière, et un bilan des candidats supprimés." & vbNewLine & "Que voulez-vous faire ?"
FrmBilanSelect.CmdQuit.Visible = True
FrmBilanSelect.ShowDialog()
End Sub
Private Sub CmdNew_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdNew.Click
@ -162,8 +39,11 @@ Public Class FrmAccueil
End Sub
Private Sub CmdBilan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdBilan.Click
Me.Hide()
FrmBilan.Show()
'Me.Hide()
FrmBilanSelect.Tag = "Choisir un bilan"
FrmBilanSelect.LblInfo.Text = "Vous pouvez afficher un bilan individuel pour un candidat, un bilan par matière, et un bilan des candidats supprimés." & vbNewLine & "Que voulez-vous faire ?"
FrmBilanSelect.CmdQuit.Visible = False
FrmBilanSelect.ShowDialog()
End Sub
Private Sub CmdAff_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdAff.Click
@ -176,10 +56,8 @@ Public Class FrmAccueil
Private Sub AffHeure(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TmrHor.Tick
On Error Resume Next REM Saute les erreurs eventuels (MSGBOX par exemple)
Horaire = TimeOfDay()
If Not ((FrmInput1.Visible Or FrmInput2.Visible) And Boule = False) Then
ActiveForm.Text = ActiveForm.Tag & " | " & Me.Horaire REM Sert a mettre l'heure dans les autres fenetres (mais fait des messages d'erreur parfois)
If Not (FrmInput1.Visible Or FrmInput2.Visible) Then
ActiveForm.Text = ActiveForm.Tag & " | " & Horaire REM Sert a mettre l'heure dans les autres fenetres (mais fait des messages d'erreur parfois)
End If
End Sub
End Class

6
FrmAff.Designer.vb generated
View File

@ -32,6 +32,7 @@ Partial Class FrmAff
'
'CmdAnnul
'
Me.CmdAnnul.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.CmdAnnul.Location = New System.Drawing.Point(563, 140)
Me.CmdAnnul.Name = "CmdAnnul"
Me.CmdAnnul.Size = New System.Drawing.Size(75, 23)
@ -41,6 +42,8 @@ Partial Class FrmAff
'
'PictureBox1
'
Me.PictureBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
Me.PictureBox1.Location = New System.Drawing.Point(0, 124)
Me.PictureBox1.Margin = New System.Windows.Forms.Padding(0)
@ -78,6 +81,7 @@ Partial Class FrmAff
'
'ListBox4
'
Me.ListBox4.BackColor = System.Drawing.Color.White
Me.ListBox4.FormattingEnabled = True
Me.ListBox4.Location = New System.Drawing.Point(391, 13)
Me.ListBox4.Name = "ListBox4"
@ -97,6 +101,7 @@ Partial Class FrmAff
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(650, 175)
Me.ControlBox = False
Me.Controls.Add(Me.ListBox5)
Me.Controls.Add(Me.ListBox4)
Me.Controls.Add(Me.ListBox3)
@ -107,6 +112,7 @@ Partial Class FrmAff
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.MaximizeBox = False
Me.Name = "FrmAff"
Me.ShowIcon = False
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "FrmAff"
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()

4
FrmAff.resx
View File

@ -149,7 +149,7 @@
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////AICgoKCgoKCgoKCg
////////////////////////////////////////////////////////////////AAKgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
@ -178,7 +178,7 @@
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKAAgA==
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKAAAg==
</value>
</data>
</root>

326
FrmBilan.Designer.vb generated
View File

@ -28,38 +28,45 @@ Partial Class FrmBilan
Me.TxtId = New System.Windows.Forms.TextBox
Me.RBId = New System.Windows.Forms.RadioButton
Me.Lbl4 = New System.Windows.Forms.Label
Me.ComboBox1 = New System.Windows.Forms.ComboBox
Me.ListBox1 = New System.Windows.Forms.ListBox
Me.ListBox2 = New System.Windows.Forms.ListBox
Me.ListBox3 = New System.Windows.Forms.ListBox
Me.ListBox4 = New System.Windows.Forms.ListBox
Me.CboMat = New System.Windows.Forms.ComboBox
Me.LstRegion = New System.Windows.Forms.ListBox
Me.LstNP = New System.Windows.Forms.ListBox
Me.LstEtat = New System.Windows.Forms.ListBox
Me.LstSupp = New System.Windows.Forms.ListBox
Me.CmdClose = New System.Windows.Forms.Button
Me.PictureBox1 = New System.Windows.Forms.PictureBox
Me.CmdAff = New System.Windows.Forms.Button
Me.GrBInd = New System.Windows.Forms.GroupBox
Me.GroupBox2 = New System.Windows.Forms.GroupBox
Me.GroupBox1 = New System.Windows.Forms.GroupBox
Me.PictureBox2 = New System.Windows.Forms.PictureBox
Me.TabControl1 = New System.Windows.Forms.TabControl
Me.TabPage1 = New System.Windows.Forms.TabPage
Me.TabPage2 = New System.Windows.Forms.TabPage
Me.TabPage3 = New System.Windows.Forms.TabPage
Me.LBexam = New System.Windows.Forms.ListBox
Me.Lbl2 = New System.Windows.Forms.Label
Me.Lbl1 = New System.Windows.Forms.Label
Me.LblAge = New System.Windows.Forms.Label
Me.LblCPV = New System.Windows.Forms.Label
Me.LblAdrss = New System.Windows.Forms.Label
Me.LblNP = New System.Windows.Forms.Label
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GrBInd.SuspendLayout()
Me.GroupBox2.SuspendLayout()
Me.GroupBox1.SuspendLayout()
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TabControl1.SuspendLayout()
Me.TabPage1.SuspendLayout()
Me.TabPage2.SuspendLayout()
Me.TabPage3.SuspendLayout()
Me.SuspendLayout()
'
'CBNP
'
Me.CBNP.FormattingEnabled = True
Me.CBNP.Location = New System.Drawing.Point(40, 89)
Me.CBNP.Location = New System.Drawing.Point(42, 77)
Me.CBNP.Name = "CBNP"
Me.CBNP.Size = New System.Drawing.Size(225, 21)
Me.CBNP.Size = New System.Drawing.Size(210, 21)
Me.CBNP.TabIndex = 38
'
'RBNP
'
Me.RBNP.AutoSize = True
Me.RBNP.BackColor = System.Drawing.SystemColors.Control
Me.RBNP.Location = New System.Drawing.Point(23, 66)
Me.RBNP.Location = New System.Drawing.Point(25, 54)
Me.RBNP.Name = "RBNP"
Me.RBNP.Size = New System.Drawing.Size(223, 17)
Me.RBNP.TabIndex = 37
@ -69,7 +76,7 @@ Partial Class FrmBilan
'
'TxtId
'
Me.TxtId.Location = New System.Drawing.Point(192, 41)
Me.TxtId.Location = New System.Drawing.Point(179, 28)
Me.TxtId.Name = "TxtId"
Me.TxtId.Size = New System.Drawing.Size(73, 20)
Me.TxtId.TabIndex = 36
@ -78,68 +85,69 @@ Partial Class FrmBilan
'
Me.RBId.AutoSize = True
Me.RBId.BackColor = System.Drawing.SystemColors.Control
Me.RBId.Location = New System.Drawing.Point(23, 42)
Me.RBId.Location = New System.Drawing.Point(25, 29)
Me.RBId.Name = "RBId"
Me.RBId.Size = New System.Drawing.Size(142, 17)
Me.RBId.Size = New System.Drawing.Size(148, 17)
Me.RBId.TabIndex = 35
Me.RBId.TabStop = True
Me.RBId.Text = "En entrant son identifiant"
Me.RBId.Text = "En entrant son identifiant :"
Me.RBId.UseVisualStyleBackColor = False
'
'Lbl4
'
Me.Lbl4.AutoSize = True
Me.Lbl4.BackColor = System.Drawing.SystemColors.Control
Me.Lbl4.Location = New System.Drawing.Point(6, 16)
Me.Lbl4.Location = New System.Drawing.Point(8, 3)
Me.Lbl4.Name = "Lbl4"
Me.Lbl4.Size = New System.Drawing.Size(208, 13)
Me.Lbl4.TabIndex = 34
Me.Lbl4.Text = "Comment voulez-vous choisir le candidat ?"
'
'ComboBox1
'CboMat
'
Me.ComboBox1.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.ComboBox1.FormattingEnabled = True
Me.ComboBox1.Location = New System.Drawing.Point(6, 19)
Me.ComboBox1.Name = "ComboBox1"
Me.ComboBox1.Size = New System.Drawing.Size(121, 21)
Me.ComboBox1.TabIndex = 39
Me.CboMat.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.CboMat.FormattingEnabled = True
Me.CboMat.Location = New System.Drawing.Point(196, 6)
Me.CboMat.Name = "CboMat"
Me.CboMat.Size = New System.Drawing.Size(121, 21)
Me.CboMat.TabIndex = 39
'
'ListBox1
'LstRegion
'
Me.ListBox1.FormattingEnabled = True
Me.ListBox1.Location = New System.Drawing.Point(6, 46)
Me.ListBox1.Name = "ListBox1"
Me.ListBox1.Size = New System.Drawing.Size(114, 56)
Me.ListBox1.TabIndex = 40
Me.LstRegion.FormattingEnabled = True
Me.LstRegion.Location = New System.Drawing.Point(6, 33)
Me.LstRegion.Name = "LstRegion"
Me.LstRegion.Size = New System.Drawing.Size(114, 56)
Me.LstRegion.TabIndex = 40
'
'ListBox2
'LstNP
'
Me.ListBox2.FormattingEnabled = True
Me.ListBox2.Location = New System.Drawing.Point(126, 46)
Me.ListBox2.Name = "ListBox2"
Me.ListBox2.Size = New System.Drawing.Size(103, 56)
Me.ListBox2.TabIndex = 41
Me.LstNP.FormattingEnabled = True
Me.LstNP.Location = New System.Drawing.Point(126, 33)
Me.LstNP.Name = "LstNP"
Me.LstNP.Size = New System.Drawing.Size(103, 56)
Me.LstNP.TabIndex = 41
'
'ListBox3
'LstEtat
'
Me.ListBox3.FormattingEnabled = True
Me.ListBox3.Location = New System.Drawing.Point(235, 46)
Me.ListBox3.Name = "ListBox3"
Me.ListBox3.Size = New System.Drawing.Size(121, 56)
Me.ListBox3.TabIndex = 42
Me.LstEtat.FormattingEnabled = True
Me.LstEtat.Location = New System.Drawing.Point(235, 33)
Me.LstEtat.Name = "LstEtat"
Me.LstEtat.Size = New System.Drawing.Size(105, 56)
Me.LstEtat.TabIndex = 42
'
'ListBox4
'LstSupp
'
Me.ListBox4.FormattingEnabled = True
Me.ListBox4.Location = New System.Drawing.Point(6, 19)
Me.ListBox4.Name = "ListBox4"
Me.ListBox4.Size = New System.Drawing.Size(350, 69)
Me.ListBox4.TabIndex = 43
Me.LstSupp.FormattingEnabled = True
Me.LstSupp.Location = New System.Drawing.Point(8, 19)
Me.LstSupp.Name = "LstSupp"
Me.LstSupp.Size = New System.Drawing.Size(313, 69)
Me.LstSupp.TabIndex = 43
'
'CmdClose
'
Me.CmdClose.Location = New System.Drawing.Point(325, 388)
Me.CmdClose.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.CmdClose.Location = New System.Drawing.Point(269, 302)
Me.CmdClose.Name = "CmdClose"
Me.CmdClose.Size = New System.Drawing.Size(75, 23)
Me.CmdClose.TabIndex = 44
@ -160,84 +168,161 @@ Partial Class FrmBilan
'
'CmdAff
'
Me.CmdAff.Location = New System.Drawing.Point(298, 60)
Me.CmdAff.Location = New System.Drawing.Point(11, 104)
Me.CmdAff.Name = "CmdAff"
Me.CmdAff.Size = New System.Drawing.Size(75, 23)
Me.CmdAff.TabIndex = 46
Me.CmdAff.Text = "Afficher"
Me.CmdAff.UseVisualStyleBackColor = True
'
'GrBInd
'TabControl1
'
Me.GrBInd.Controls.Add(Me.CmdAff)
Me.GrBInd.Controls.Add(Me.Lbl4)
Me.GrBInd.Controls.Add(Me.RBId)
Me.GrBInd.Controls.Add(Me.TxtId)
Me.GrBInd.Controls.Add(Me.RBNP)
Me.GrBInd.Controls.Add(Me.CBNP)
Me.GrBInd.Location = New System.Drawing.Point(12, 12)
Me.GrBInd.Name = "GrBInd"
Me.GrBInd.Size = New System.Drawing.Size(379, 122)
Me.GrBInd.TabIndex = 47
Me.GrBInd.TabStop = False
Me.GrBInd.Text = "Bilan Individuel : "
Me.TabControl1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.TabControl1.Controls.Add(Me.TabPage1)
Me.TabControl1.Controls.Add(Me.TabPage2)
Me.TabControl1.Controls.Add(Me.TabPage3)
Me.TabControl1.Location = New System.Drawing.Point(0, 0)
Me.TabControl1.Name = "TabControl1"
Me.TabControl1.SelectedIndex = 0
Me.TabControl1.Size = New System.Drawing.Size(357, 296)
Me.TabControl1.TabIndex = 51
'
'GroupBox2
'TabPage1
'
Me.GroupBox2.Controls.Add(Me.ListBox1)
Me.GroupBox2.Controls.Add(Me.ComboBox1)
Me.GroupBox2.Controls.Add(Me.ListBox2)
Me.GroupBox2.Controls.Add(Me.ListBox3)
Me.GroupBox2.Location = New System.Drawing.Point(12, 140)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(379, 111)
Me.GroupBox2.TabIndex = 48
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Inscriptions par matière : "
Me.TabPage1.Controls.Add(Me.LBexam)
Me.TabPage1.Controls.Add(Me.Lbl2)
Me.TabPage1.Controls.Add(Me.Lbl1)
Me.TabPage1.Controls.Add(Me.LblAge)
Me.TabPage1.Controls.Add(Me.LblCPV)
Me.TabPage1.Controls.Add(Me.LblAdrss)
Me.TabPage1.Controls.Add(Me.LblNP)
Me.TabPage1.Controls.Add(Me.CmdAff)
Me.TabPage1.Controls.Add(Me.Lbl4)
Me.TabPage1.Controls.Add(Me.RBId)
Me.TabPage1.Controls.Add(Me.CBNP)
Me.TabPage1.Controls.Add(Me.TxtId)
Me.TabPage1.Controls.Add(Me.RBNP)
Me.TabPage1.Location = New System.Drawing.Point(4, 22)
Me.TabPage1.Name = "TabPage1"
Me.TabPage1.Padding = New System.Windows.Forms.Padding(3)
Me.TabPage1.Size = New System.Drawing.Size(349, 270)
Me.TabPage1.TabIndex = 0
Me.TabPage1.Text = "Bilan Individuel"
Me.TabPage1.UseVisualStyleBackColor = True
'
'GroupBox1
'TabPage2
'
Me.GroupBox1.Controls.Add(Me.ListBox4)
Me.GroupBox1.Location = New System.Drawing.Point(12, 268)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(379, 97)
Me.GroupBox1.TabIndex = 49
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Inscriptions supprimées : "
Me.TabPage2.Controls.Add(Me.LstRegion)
Me.TabPage2.Controls.Add(Me.CboMat)
Me.TabPage2.Controls.Add(Me.LstNP)
Me.TabPage2.Controls.Add(Me.LstEtat)
Me.TabPage2.Location = New System.Drawing.Point(4, 22)
Me.TabPage2.Name = "TabPage2"
Me.TabPage2.Padding = New System.Windows.Forms.Padding(3)
Me.TabPage2.Size = New System.Drawing.Size(349, 270)
Me.TabPage2.TabIndex = 1
Me.TabPage2.Text = "Inscription par matière"
Me.TabPage2.UseVisualStyleBackColor = True
'
'PictureBox2
'TabPage3
'
Me.PictureBox2.Image = CType(resources.GetObject("PictureBox2.Image"), System.Drawing.Image)
Me.PictureBox2.Location = New System.Drawing.Point(-1, 371)
Me.PictureBox2.MaximumSize = New System.Drawing.Size(495, 2)
Me.PictureBox2.MinimumSize = New System.Drawing.Size(0, 2)
Me.PictureBox2.Name = "PictureBox2"
Me.PictureBox2.Size = New System.Drawing.Size(413, 2)
Me.PictureBox2.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox2.TabIndex = 50
Me.PictureBox2.TabStop = False
Me.TabPage3.Controls.Add(Me.LstSupp)
Me.TabPage3.Location = New System.Drawing.Point(4, 22)
Me.TabPage3.Name = "TabPage3"
Me.TabPage3.Padding = New System.Windows.Forms.Padding(3)
Me.TabPage3.Size = New System.Drawing.Size(349, 270)
Me.TabPage3.TabIndex = 2
Me.TabPage3.Text = "Inscription supprimées."
Me.TabPage3.UseVisualStyleBackColor = True
'
'LBexam
'
Me.LBexam.FormattingEnabled = True
Me.LBexam.Location = New System.Drawing.Point(193, 157)
Me.LBexam.Name = "LBexam"
Me.LBexam.Size = New System.Drawing.Size(148, 108)
Me.LBexam.TabIndex = 53
'
'Lbl2
'
Me.Lbl2.AutoSize = True
Me.Lbl2.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.Lbl2.Location = New System.Drawing.Point(176, 141)
Me.Lbl2.Name = "Lbl2"
Me.Lbl2.Size = New System.Drawing.Size(56, 13)
Me.Lbl2.TabIndex = 52
Me.Lbl2.Text = "Examens :"
'
'Lbl1
'
Me.Lbl1.AutoSize = True
Me.Lbl1.Location = New System.Drawing.Point(8, 141)
Me.Lbl1.Name = "Lbl1"
Me.Lbl1.Size = New System.Drawing.Size(55, 13)
Me.Lbl1.TabIndex = 47
Me.Lbl1.Text = "Candidat :"
'
'LblAge
'
Me.LblAge.AutoSize = True
Me.LblAge.Font = New System.Drawing.Font("Tahoma", 9.0!)
Me.LblAge.Location = New System.Drawing.Point(22, 236)
Me.LblAge.Name = "LblAge"
Me.LblAge.Size = New System.Drawing.Size(142, 14)
Me.LblAge.TabIndex = 51
Me.LblAge.Text = "Date de naissance (Age)"
'
'LblCPV
'
Me.LblCPV.AutoSize = True
Me.LblCPV.Font = New System.Drawing.Font("Tahoma", 9.0!)
Me.LblCPV.Location = New System.Drawing.Point(22, 216)
Me.LblCPV.Name = "LblCPV"
Me.LblCPV.Size = New System.Drawing.Size(100, 14)
Me.LblCPV.TabIndex = 50
Me.LblCPV.Text = "Code postal, Ville"
'
'LblAdrss
'
Me.LblAdrss.AutoSize = True
Me.LblAdrss.Font = New System.Drawing.Font("Tahoma", 9.0!)
Me.LblAdrss.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.LblAdrss.Location = New System.Drawing.Point(22, 196)
Me.LblAdrss.Name = "LblAdrss"
Me.LblAdrss.Size = New System.Drawing.Size(50, 14)
Me.LblAdrss.TabIndex = 49
Me.LblAdrss.Text = "Adresse"
'
'LblNP
'
Me.LblNP.AutoSize = True
Me.LblNP.Font = New System.Drawing.Font("Tahoma", 9.0!)
Me.LblNP.Location = New System.Drawing.Point(22, 176)
Me.LblNP.Name = "LblNP"
Me.LblNP.Size = New System.Drawing.Size(82, 14)
Me.LblNP.TabIndex = 48
Me.LblNP.Text = "Nom, Prénom"
'
'FrmBilan
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(412, 423)
Me.Controls.Add(Me.PictureBox2)
Me.Controls.Add(Me.GroupBox1)
Me.Controls.Add(Me.GroupBox2)
Me.Controls.Add(Me.CmdClose)
Me.ClientSize = New System.Drawing.Size(356, 337)
Me.Controls.Add(Me.PictureBox1)
Me.Controls.Add(Me.GrBInd)
Me.Controls.Add(Me.CmdClose)
Me.Controls.Add(Me.TabControl1)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Name = "FrmBilan"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "FrmBilan"
Me.Text = "Bilans"
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
Me.GrBInd.ResumeLayout(False)
Me.GrBInd.PerformLayout()
Me.GroupBox2.ResumeLayout(False)
Me.GroupBox1.ResumeLayout(False)
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
Me.TabControl1.ResumeLayout(False)
Me.TabPage1.ResumeLayout(False)
Me.TabPage1.PerformLayout()
Me.TabPage2.ResumeLayout(False)
Me.TabPage3.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
@ -246,16 +331,23 @@ Partial Class FrmBilan
Friend WithEvents TxtId As System.Windows.Forms.TextBox
Friend WithEvents RBId As System.Windows.Forms.RadioButton
Friend WithEvents Lbl4 As System.Windows.Forms.Label
Friend WithEvents ComboBox1 As System.Windows.Forms.ComboBox
Friend WithEvents ListBox1 As System.Windows.Forms.ListBox
Friend WithEvents ListBox2 As System.Windows.Forms.ListBox
Friend WithEvents ListBox3 As System.Windows.Forms.ListBox
Friend WithEvents ListBox4 As System.Windows.Forms.ListBox
Friend WithEvents CboMat As System.Windows.Forms.ComboBox
Friend WithEvents LstRegion As System.Windows.Forms.ListBox
Friend WithEvents LstNP As System.Windows.Forms.ListBox
Friend WithEvents LstEtat As System.Windows.Forms.ListBox
Friend WithEvents LstSupp As System.Windows.Forms.ListBox
Friend WithEvents CmdClose As System.Windows.Forms.Button
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
Friend WithEvents CmdAff As System.Windows.Forms.Button
Friend WithEvents GrBInd As System.Windows.Forms.GroupBox
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents PictureBox2 As System.Windows.Forms.PictureBox
Friend WithEvents TabControl1 As System.Windows.Forms.TabControl
Friend WithEvents TabPage1 As System.Windows.Forms.TabPage
Friend WithEvents TabPage2 As System.Windows.Forms.TabPage
Friend WithEvents TabPage3 As System.Windows.Forms.TabPage
Friend WithEvents LBexam As System.Windows.Forms.ListBox
Friend WithEvents Lbl2 As System.Windows.Forms.Label
Friend WithEvents Lbl1 As System.Windows.Forms.Label
Friend WithEvents LblAge As System.Windows.Forms.Label
Friend WithEvents LblCPV As System.Windows.Forms.Label
Friend WithEvents LblAdrss As System.Windows.Forms.Label
Friend WithEvents LblNP As System.Windows.Forms.Label
End Class

67
FrmBilan.resx
View File

@ -149,7 +149,7 @@
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////AACgoKCgoKCgoKCg
////////////////////////////////////////////////////////////////bQCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
@ -178,70 +178,7 @@
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKAAAA==
</value>
</data>
<data name="PictureBox2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
Qk3GDQAAAAAAADYAAAAoAAAAQgIAAAIAAAABABgAAAAAAAAAAADEDgAAxA4AAAAAAAAAAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////AACgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKAAAA==
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBtAA==
</value>
</data>
</root>

29
FrmBilan.vb
View File

@ -4,4 +4,33 @@ Public Class FrmBilan
Me.Close()
FrmAccueil.Show()
End Sub
Private Sub FrmBilan_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Tag = "Bilans"
'Me.Text = "Bilans | " & TimeOfDay
Dim i As Integer
For i = 0 To UBound(tme)
CboMat.Items.Add(tme(i))
Next
End Sub
Private Sub CBNP_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles CBNP.GotFocus
RBNP.Checked = True REM Permet de "checker" le ratiobox correspondant au focus (On veut choisir son nom dans une GRrB).
End Sub
Private Sub TxtId_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtId.GotFocus
RBId.Checked = True REM Permet de "checker" le ratiobox correspondant au focus (On veut enter l'ID du candidat).
End Sub
Private Sub RBId_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RBId.CheckedChanged
CmdAff.Location = New Point(282, 39)
End Sub
Private Sub RBNP_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RBNP.CheckedChanged
CmdAff.Location = New Point(282, 88)
End Sub
End Class

302
FrmBilanID.Designer.vb generated Normal file
View File

@ -0,0 +1,302 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class FrmBilanID
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()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FrmBilanID))
Me.LBexam = New System.Windows.Forms.ListBox
Me.Lbl2 = New System.Windows.Forms.Label
Me.Lbl1 = New System.Windows.Forms.Label
Me.LblAge = New System.Windows.Forms.Label
Me.LblCPV = New System.Windows.Forms.Label
Me.LblAdrss = New System.Windows.Forms.Label
Me.LblNP = New System.Windows.Forms.Label
Me.CmdAff = New System.Windows.Forms.Button
Me.Lbl4 = New System.Windows.Forms.Label
Me.RBId = New System.Windows.Forms.RadioButton
Me.CBNP = New System.Windows.Forms.ComboBox
Me.TxtId = New System.Windows.Forms.TextBox
Me.RBNP = New System.Windows.Forms.RadioButton
Me.CmdAnnul = New System.Windows.Forms.Button
Me.PictureBox1 = New System.Windows.Forms.PictureBox
Me.GroupBox1 = New System.Windows.Forms.GroupBox
Me.PictureBox2 = New System.Windows.Forms.PictureBox
Me.CmdBM = New System.Windows.Forms.Button
Me.CmdBS = New System.Windows.Forms.Button
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GroupBox1.SuspendLayout()
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'LBexam
'
Me.LBexam.FormattingEnabled = True
Me.LBexam.Location = New System.Drawing.Point(194, 31)
Me.LBexam.Name = "LBexam"
Me.LBexam.Size = New System.Drawing.Size(132, 108)
Me.LBexam.TabIndex = 6
'
'Lbl2
'
Me.Lbl2.AutoSize = True
Me.Lbl2.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.Lbl2.Location = New System.Drawing.Point(177, 15)
Me.Lbl2.Name = "Lbl2"
Me.Lbl2.Size = New System.Drawing.Size(56, 13)
Me.Lbl2.TabIndex = 5
Me.Lbl2.Text = "Examens :"
'
'Lbl1
'
Me.Lbl1.AutoSize = True
Me.Lbl1.Location = New System.Drawing.Point(6, 16)
Me.Lbl1.Name = "Lbl1"
Me.Lbl1.Size = New System.Drawing.Size(55, 13)
Me.Lbl1.TabIndex = 0
Me.Lbl1.Text = "Candidat :"
'
'LblAge
'
Me.LblAge.AutoSize = True
Me.LblAge.Font = New System.Drawing.Font("Tahoma", 9.0!)
Me.LblAge.Location = New System.Drawing.Point(20, 111)
Me.LblAge.Name = "LblAge"
Me.LblAge.Size = New System.Drawing.Size(142, 14)
Me.LblAge.TabIndex = 4
Me.LblAge.Text = "Date de naissance (Age)"
'
'LblCPV
'
Me.LblCPV.AutoSize = True
Me.LblCPV.Font = New System.Drawing.Font("Tahoma", 9.0!)
Me.LblCPV.Location = New System.Drawing.Point(20, 91)
Me.LblCPV.Name = "LblCPV"
Me.LblCPV.Size = New System.Drawing.Size(100, 14)
Me.LblCPV.TabIndex = 3
Me.LblCPV.Text = "Code postal, Ville"
'
'LblAdrss
'
Me.LblAdrss.AutoSize = True
Me.LblAdrss.Font = New System.Drawing.Font("Tahoma", 9.0!)
Me.LblAdrss.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.LblAdrss.Location = New System.Drawing.Point(20, 71)
Me.LblAdrss.Name = "LblAdrss"
Me.LblAdrss.Size = New System.Drawing.Size(50, 14)
Me.LblAdrss.TabIndex = 2
Me.LblAdrss.Text = "Adresse"
'
'LblNP
'
Me.LblNP.AutoSize = True
Me.LblNP.Font = New System.Drawing.Font("Tahoma", 9.0!)
Me.LblNP.Location = New System.Drawing.Point(20, 51)
Me.LblNP.Name = "LblNP"
Me.LblNP.Size = New System.Drawing.Size(82, 14)
Me.LblNP.TabIndex = 1
Me.LblNP.Text = "Nom, Prénom"
'
'CmdAff
'
Me.CmdAff.Location = New System.Drawing.Point(15, 118)
Me.CmdAff.Name = "CmdAff"
Me.CmdAff.Size = New System.Drawing.Size(75, 23)
Me.CmdAff.TabIndex = 4
Me.CmdAff.Text = "Afficher"
Me.CmdAff.UseVisualStyleBackColor = True
'
'Lbl4
'
Me.Lbl4.AutoSize = True
Me.Lbl4.BackColor = System.Drawing.SystemColors.Control
Me.Lbl4.Location = New System.Drawing.Point(12, 9)
Me.Lbl4.Name = "Lbl4"
Me.Lbl4.Size = New System.Drawing.Size(208, 13)
Me.Lbl4.TabIndex = 9
Me.Lbl4.Text = "Comment voulez-vous choisir le candidat ?"
'
'RBId
'
Me.RBId.AutoSize = True
Me.RBId.BackColor = System.Drawing.SystemColors.Control
Me.RBId.Location = New System.Drawing.Point(29, 35)
Me.RBId.Name = "RBId"
Me.RBId.Size = New System.Drawing.Size(148, 17)
Me.RBId.TabIndex = 0
Me.RBId.TabStop = True
Me.RBId.Text = "En entrant son identifiant :"
Me.RBId.UseVisualStyleBackColor = False
'
'CBNP
'
Me.CBNP.FormattingEnabled = True
Me.CBNP.Location = New System.Drawing.Point(46, 83)
Me.CBNP.Name = "CBNP"
Me.CBNP.Size = New System.Drawing.Size(210, 21)
Me.CBNP.TabIndex = 3
'
'TxtId
'
Me.TxtId.Location = New System.Drawing.Point(183, 34)
Me.TxtId.Name = "TxtId"
Me.TxtId.Size = New System.Drawing.Size(73, 20)
Me.TxtId.TabIndex = 1
'
'RBNP
'
Me.RBNP.AutoSize = True
Me.RBNP.BackColor = System.Drawing.SystemColors.Control
Me.RBNP.Location = New System.Drawing.Point(29, 60)
Me.RBNP.Name = "RBNP"
Me.RBNP.Size = New System.Drawing.Size(223, 17)
Me.RBNP.TabIndex = 2
Me.RBNP.TabStop = True
Me.RBNP.Text = "En sélectionnant son nom et son prénom :"
Me.RBNP.UseVisualStyleBackColor = False
'
'CmdAnnul
'
Me.CmdAnnul.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.CmdAnnul.Location = New System.Drawing.Point(268, 312)
Me.CmdAnnul.Name = "CmdAnnul"
Me.CmdAnnul.Size = New System.Drawing.Size(75, 23)
Me.CmdAnnul.TabIndex = 6
Me.CmdAnnul.Text = "Fermer"
Me.CmdAnnul.UseVisualStyleBackColor = True
'
'PictureBox1
'
Me.PictureBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
Me.PictureBox1.Location = New System.Drawing.Point(-1, 298)
Me.PictureBox1.Margin = New System.Windows.Forms.Padding(0)
Me.PictureBox1.MaximumSize = New System.Drawing.Size(800, 2)
Me.PictureBox1.MinimumSize = New System.Drawing.Size(0, 2)
Me.PictureBox1.Name = "PictureBox1"
Me.PictureBox1.Size = New System.Drawing.Size(356, 2)
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox1.TabIndex = 68
Me.PictureBox1.TabStop = False
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.Lbl1)
Me.GroupBox1.Controls.Add(Me.LblNP)
Me.GroupBox1.Controls.Add(Me.LBexam)
Me.GroupBox1.Controls.Add(Me.LblAdrss)
Me.GroupBox1.Controls.Add(Me.Lbl2)
Me.GroupBox1.Controls.Add(Me.LblCPV)
Me.GroupBox1.Controls.Add(Me.LblAge)
Me.GroupBox1.Location = New System.Drawing.Point(13, 147)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(332, 146)
Me.GroupBox1.TabIndex = 5
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Informations : "
'
'PictureBox2
'
Me.PictureBox2.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.PictureBox2.Image = CType(resources.GetObject("PictureBox2.Image"), System.Drawing.Image)
Me.PictureBox2.Location = New System.Drawing.Point(15, 111)
Me.PictureBox2.Margin = New System.Windows.Forms.Padding(0)
Me.PictureBox2.MaximumSize = New System.Drawing.Size(800, 2)
Me.PictureBox2.MinimumSize = New System.Drawing.Size(0, 2)
Me.PictureBox2.Name = "PictureBox2"
Me.PictureBox2.Size = New System.Drawing.Size(328, 2)
Me.PictureBox2.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox2.TabIndex = 68
Me.PictureBox2.TabStop = False
'
'CmdBM
'
Me.CmdBM.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.CmdBM.Location = New System.Drawing.Point(12, 312)
Me.CmdBM.Name = "CmdBM"
Me.CmdBM.Size = New System.Drawing.Size(75, 23)
Me.CmdBM.TabIndex = 7
Me.CmdBM.Text = "Par &matière"
Me.CmdBM.UseVisualStyleBackColor = True
'
'CmdBS
'
Me.CmdBS.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.CmdBS.Location = New System.Drawing.Point(93, 312)
Me.CmdBS.Name = "CmdBS"
Me.CmdBS.Size = New System.Drawing.Size(75, 23)
Me.CmdBS.TabIndex = 8
Me.CmdBS.Text = "&Supprimés"
Me.CmdBS.UseVisualStyleBackColor = True
'
'FrmBilanID
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(355, 347)
Me.Controls.Add(Me.CmdBM)
Me.Controls.Add(Me.CmdBS)
Me.Controls.Add(Me.CmdAnnul)
Me.Controls.Add(Me.PictureBox2)
Me.Controls.Add(Me.PictureBox1)
Me.Controls.Add(Me.CmdAff)
Me.Controls.Add(Me.Lbl4)
Me.Controls.Add(Me.RBId)
Me.Controls.Add(Me.CBNP)
Me.Controls.Add(Me.TxtId)
Me.Controls.Add(Me.RBNP)
Me.Controls.Add(Me.GroupBox1)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.MaximizeBox = False
Me.Name = "FrmBilanID"
Me.ShowIcon = False
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Bilan individuel"
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
Me.GroupBox1.ResumeLayout(False)
Me.GroupBox1.PerformLayout()
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents LBexam As System.Windows.Forms.ListBox
Friend WithEvents Lbl2 As System.Windows.Forms.Label
Friend WithEvents Lbl1 As System.Windows.Forms.Label
Friend WithEvents LblAge As System.Windows.Forms.Label
Friend WithEvents LblCPV As System.Windows.Forms.Label
Friend WithEvents LblAdrss As System.Windows.Forms.Label
Friend WithEvents LblNP As System.Windows.Forms.Label
Friend WithEvents CmdAff As System.Windows.Forms.Button
Friend WithEvents Lbl4 As System.Windows.Forms.Label
Friend WithEvents RBId As System.Windows.Forms.RadioButton
Friend WithEvents CBNP As System.Windows.Forms.ComboBox
Friend WithEvents TxtId As System.Windows.Forms.TextBox
Friend WithEvents RBNP As System.Windows.Forms.RadioButton
Friend WithEvents CmdAnnul As System.Windows.Forms.Button
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents PictureBox2 As System.Windows.Forms.PictureBox
Friend WithEvents CmdBM As System.Windows.Forms.Button
Friend WithEvents CmdBS As System.Windows.Forms.Button
End Class

247
FrmBilanID.resx Normal file
View File

@ -0,0 +1,247 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="PictureBox1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
Qk3GDQAAAAAAADYAAAAoAAAAQgIAAAIAAAABABgAAAAAAAAAAADEDgAAxA4AAAAAAAAAAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////C0OgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKALQw==
</value>
</data>
<data name="PictureBox2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
Qk3GDQAAAAAAADYAAAAoAAAAQgIAAAIAAAABABgAAAAAAAAAAADEDgAAxA4AAAAAAAAAAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////C0OgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKALQw==
</value>
</data>
</root>

22
FrmBilanID.vb Normal file
View File

@ -0,0 +1,22 @@
Public Class FrmBilanID
Private Sub CmdAnnul_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdAnnul.Click
Me.Hide()
FrmAccueil.Show()
End Sub
Private Sub CmdBM_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdBM.Click
Me.Hide()
FrmBilanMat.Show()
End Sub
Private Sub CmdBS_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdBS.Click
Me.Hide()
FrmBilanSupp.Show()
End Sub
Private Sub FrmBilanID_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Tag = "Bilan individuel"
Me.Text = Me.Tag & " |" & TimeOfDay
End Sub
End Class

159
FrmBilanMat.Designer.vb generated Normal file
View File

@ -0,0 +1,159 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class FrmBilanMat
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()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FrmBilanMat))
Me.LstRegion = New System.Windows.Forms.ListBox
Me.CboMat = New System.Windows.Forms.ComboBox
Me.LstNP = New System.Windows.Forms.ListBox
Me.LstEtat = New System.Windows.Forms.ListBox
Me.CmdAnnul = New System.Windows.Forms.Button
Me.PictureBox1 = New System.Windows.Forms.PictureBox
Me.Label1 = New System.Windows.Forms.Label
Me.CmdBI = New System.Windows.Forms.Button
Me.CmdBS = New System.Windows.Forms.Button
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'LstRegion
'
Me.LstRegion.FormattingEnabled = True
Me.LstRegion.Location = New System.Drawing.Point(12, 39)
Me.LstRegion.Name = "LstRegion"
Me.LstRegion.Size = New System.Drawing.Size(114, 56)
Me.LstRegion.TabIndex = 2
'
'CboMat
'
Me.CboMat.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.CboMat.FormattingEnabled = True
Me.CboMat.Location = New System.Drawing.Point(155, 12)
Me.CboMat.Name = "CboMat"
Me.CboMat.Size = New System.Drawing.Size(121, 21)
Me.CboMat.TabIndex = 1
'
'LstNP
'
Me.LstNP.FormattingEnabled = True
Me.LstNP.Location = New System.Drawing.Point(132, 39)
Me.LstNP.Name = "LstNP"
Me.LstNP.Size = New System.Drawing.Size(103, 56)
Me.LstNP.TabIndex = 3
'
'LstEtat
'
Me.LstEtat.FormattingEnabled = True
Me.LstEtat.Location = New System.Drawing.Point(241, 39)
Me.LstEtat.Name = "LstEtat"
Me.LstEtat.Size = New System.Drawing.Size(122, 56)
Me.LstEtat.TabIndex = 4
'
'CmdAnnul
'
Me.CmdAnnul.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.CmdAnnul.Location = New System.Drawing.Point(293, 122)
Me.CmdAnnul.Name = "CmdAnnul"
Me.CmdAnnul.Size = New System.Drawing.Size(75, 23)
Me.CmdAnnul.TabIndex = 5
Me.CmdAnnul.Text = "Fermer"
Me.CmdAnnul.UseVisualStyleBackColor = True
'
'PictureBox1
'
Me.PictureBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
Me.PictureBox1.Location = New System.Drawing.Point(-1, 107)
Me.PictureBox1.Margin = New System.Windows.Forms.Padding(0)
Me.PictureBox1.MaximumSize = New System.Drawing.Size(800, 2)
Me.PictureBox1.MinimumSize = New System.Drawing.Size(0, 2)
Me.PictureBox1.Name = "PictureBox1"
Me.PictureBox1.Size = New System.Drawing.Size(381, 2)
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox1.TabIndex = 70
Me.PictureBox1.TabStop = False
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Location = New System.Drawing.Point(12, 15)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(135, 13)
Me.Label1.TabIndex = 0
Me.Label1.Text = "Selectionnez une matière : "
'
'CmdBI
'
Me.CmdBI.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.CmdBI.Location = New System.Drawing.Point(12, 122)
Me.CmdBI.Name = "CmdBI"
Me.CmdBI.Size = New System.Drawing.Size(75, 23)
Me.CmdBI.TabIndex = 6
Me.CmdBI.Text = "&Individuel"
Me.CmdBI.UseVisualStyleBackColor = True
'
'CmdBS
'
Me.CmdBS.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.CmdBS.Location = New System.Drawing.Point(93, 122)
Me.CmdBS.Name = "CmdBS"
Me.CmdBS.Size = New System.Drawing.Size(75, 23)
Me.CmdBS.TabIndex = 7
Me.CmdBS.Text = "&Supprimés"
Me.CmdBS.UseVisualStyleBackColor = True
'
'FrmBilanMat
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(380, 157)
Me.Controls.Add(Me.CmdBI)
Me.Controls.Add(Me.CmdBS)
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.LstRegion)
Me.Controls.Add(Me.CmdAnnul)
Me.Controls.Add(Me.CboMat)
Me.Controls.Add(Me.LstNP)
Me.Controls.Add(Me.PictureBox1)
Me.Controls.Add(Me.LstEtat)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.MaximizeBox = False
Me.Name = "FrmBilanMat"
Me.ShowIcon = False
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Bilan des matières"
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents LstRegion As System.Windows.Forms.ListBox
Friend WithEvents CboMat As System.Windows.Forms.ComboBox
Friend WithEvents LstNP As System.Windows.Forms.ListBox
Friend WithEvents LstEtat As System.Windows.Forms.ListBox
Friend WithEvents CmdAnnul As System.Windows.Forms.Button
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents CmdBI As System.Windows.Forms.Button
Friend WithEvents CmdBS As System.Windows.Forms.Button
End Class

184
FrmBilanMat.resx Normal file
View File

@ -0,0 +1,184 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="PictureBox1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
Qk3GDQAAAAAAADYAAAAoAAAAQgIAAAIAAAABABgAAAAAAAAAAADEDgAAxA4AAAAAAAAAAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////C0OgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKALQw==
</value>
</data>
</root>

21
FrmBilanMat.vb Normal file
View File

@ -0,0 +1,21 @@
Public Class FrmBilanMat
Private Sub CmdAnnul_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdAnnul.Click
Me.Hide()
FrmAccueil.Show()
End Sub
Private Sub CmdBI_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdBI.Click
Me.Hide()
FrmBilanID.Show()
End Sub
Private Sub CmdBS_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdBS.Click
Me.Hide()
FrmBilanSupp.Show()
End Sub
Private Sub FrmBilanMat_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Tag = "Bilan des matières"
Me.Text = Me.Tag & " |" & TimeOfDay
End Sub
End Class

143
FrmBilanSelect.Designer.vb generated Normal file
View File

@ -0,0 +1,143 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class FrmBilanSelect
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()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FrmBilanSelect))
Me.CmdBS = New System.Windows.Forms.Button
Me.CmdBM = New System.Windows.Forms.Button
Me.CmdBI = New System.Windows.Forms.Button
Me.LblInfo = New System.Windows.Forms.Label
Me.PictureBox1 = New System.Windows.Forms.PictureBox
Me.CmdQuit = New System.Windows.Forms.Button
Me.CmdReturn = New System.Windows.Forms.Button
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'CmdBS
'
Me.CmdBS.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.CmdBS.Location = New System.Drawing.Point(351, 70)
Me.CmdBS.Name = "CmdBS"
Me.CmdBS.Size = New System.Drawing.Size(75, 23)
Me.CmdBS.TabIndex = 2
Me.CmdBS.Text = "&Supprimés"
Me.CmdBS.UseVisualStyleBackColor = True
'
'CmdBM
'
Me.CmdBM.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.CmdBM.Location = New System.Drawing.Point(270, 70)
Me.CmdBM.Name = "CmdBM"
Me.CmdBM.Size = New System.Drawing.Size(75, 23)
Me.CmdBM.TabIndex = 3
Me.CmdBM.Text = "Par &matière"
Me.CmdBM.UseVisualStyleBackColor = True
'
'CmdBI
'
Me.CmdBI.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.CmdBI.Location = New System.Drawing.Point(189, 70)
Me.CmdBI.Name = "CmdBI"
Me.CmdBI.Size = New System.Drawing.Size(75, 23)
Me.CmdBI.TabIndex = 4
Me.CmdBI.Text = "&Individuel"
Me.CmdBI.UseVisualStyleBackColor = True
'
'LblInfo
'
Me.LblInfo.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.LblInfo.Location = New System.Drawing.Point(59, 9)
Me.LblInfo.Name = "LblInfo"
Me.LblInfo.Size = New System.Drawing.Size(371, 58)
Me.LblInfo.TabIndex = 5
Me.LblInfo.Text = "Avant de fermer les inscriptions, vous pouvez afficher un bilan individuel pour u" & _
"n candidat, un bilan par matière, et un bilan des candidats supprimés." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Que voul" & _
"ez-vous faire ?" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10)
'
'PictureBox1
'
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
Me.PictureBox1.Location = New System.Drawing.Point(12, 12)
Me.PictureBox1.Name = "PictureBox1"
Me.PictureBox1.Size = New System.Drawing.Size(41, 38)
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize
Me.PictureBox1.TabIndex = 5
Me.PictureBox1.TabStop = False
'
'CmdQuit
'
Me.CmdQuit.Anchor = System.Windows.Forms.AnchorStyles.Bottom
Me.CmdQuit.Location = New System.Drawing.Point(93, 70)
Me.CmdQuit.Name = "CmdQuit"
Me.CmdQuit.Size = New System.Drawing.Size(75, 23)
Me.CmdQuit.TabIndex = 7
Me.CmdQuit.Text = "&Quitter"
Me.CmdQuit.UseVisualStyleBackColor = True
'
'CmdReturn
'
Me.CmdReturn.Anchor = System.Windows.Forms.AnchorStyles.Bottom
Me.CmdReturn.DialogResult = System.Windows.Forms.DialogResult.Cancel
Me.CmdReturn.Location = New System.Drawing.Point(12, 70)
Me.CmdReturn.Name = "CmdReturn"
Me.CmdReturn.Size = New System.Drawing.Size(75, 23)
Me.CmdReturn.TabIndex = 8
Me.CmdReturn.Text = "&Retour"
Me.CmdReturn.UseVisualStyleBackColor = True
'
'FrmBilanSelect
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
Me.ClientSize = New System.Drawing.Size(438, 105)
Me.Controls.Add(Me.CmdReturn)
Me.Controls.Add(Me.CmdQuit)
Me.Controls.Add(Me.PictureBox1)
Me.Controls.Add(Me.LblInfo)
Me.Controls.Add(Me.CmdBI)
Me.Controls.Add(Me.CmdBM)
Me.Controls.Add(Me.CmdBS)
Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "FrmBilanSelect"
Me.ShowIcon = False
Me.ShowInTaskbar = False
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Afficher des bilans"
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents CmdBS As System.Windows.Forms.Button
Friend WithEvents CmdBM As System.Windows.Forms.Button
Friend WithEvents CmdBI As System.Windows.Forms.Button
Friend WithEvents LblInfo As System.Windows.Forms.Label
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
Friend WithEvents CmdQuit As System.Windows.Forms.Button
Friend WithEvents CmdReturn As System.Windows.Forms.Button
End Class

205
FrmBilanSelect.resx Normal file
View File

@ -0,0 +1,205 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="PictureBox1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
Qk2eEgAAAAAAADYAAAAoAAAAKQAAACYAAAABABgAAAAAAAAAAADEDgAAxA4AAAAAAAAAAAAA2Ons2Ons
2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons
2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Onsstjp
7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp
7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp
7LLY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY
6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY
6ezY6eyy2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons
2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons
2Ons2Ons2Onsstjp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp
7Njp7Njp7Njp7NDh5Km3uYqVl8HQ09bn6tjp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp
7Njp7Njp7Njp7Njp7LLY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY
6ezY6ezY6ezY6ezR4uWqq6Ogg2RhYl20wsTV5ejY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY
6ezY6ezY6ezY6ezY6ezY6eyy2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons
2Ons2Ons2Ons2Ons1eXosK+lwZdr06FxYl5VtMLE1eXo2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons
2Ons2Ons2Ons2Ons2Ons2Ons2Onsstjp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp
7Njp7Njp7Njp7Njp7Nfo67/EvreSa9myi8+hcmJeVrTCxNXl6Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp
7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7LLY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY
6ezY6ezY6ezX6OvU5OfS4+bM2NnCoHvQqoXpwJbPonVkYFquvL/V5unY6ezY6ezY6ezY6ezY6ezY6ezY
6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6eyy2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons
2Ons1+jr0eLlytrdv8/RrLm8oq+xqaOXxKWC3LWN7sSa0Kd+YF5akJudwM/SzNzf1ufq2Ons2Ons2Ons
2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Onsstjp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp
7Nfo687e4bnHypqmqICGhn15cXhxaId7a7KWe8WjgeO8lerCm82phXhoV0lPUGRsbYGLjbG/wcvb3tXl
6Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7LLY6ezY6ezY6ezY6ezY6ezY6ezY6ezY
6ezU5Oe5x8qQmJZ+cmSReWCpjG62l3e3l3m4l3m+nX7QrovpwpzqwpzUr4u9mXaggF6JblJISEZRWFmA
ioytur3O3uHY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6eyy2Ons2Ons2Ons2Ons2Ons2Ons
2Onsz9/iqbKxlIVzsZFwuJt/u6CFvqGFxaWDy6mGz66M2LWU58Kf+NGq9M6n4LuYzq2MwaKCvZ1+t5Js
iG9VVlJLW2NkmKSmx9fZ1+jr2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Onsstjp7Njp7Njp7Njp7Njp
7Njp7M3d4KKln6aLb7WbgMCmjsquk9W2mdy8nePCou3LqPXTsPbRrPvTrv/btP/ctfXPqubCntu4ldCv
j8epirydfa2LZ2pcTE5UVYaQksPS1dfo69jp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7LLY6ezY6ezY6ezY
6ezY6ezR4uWwqp60l3q8pY3JsJfYu6DnyKrz07P72bf927n/377wxJ+lWDLGcEH3roHoson/3rn92LL3
0q3syKTfvZrRs5LFp4q/mniEbFROUlKKlZfK2dzY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6eyy2Ons2Ons
2Ons2Ons1ufqvLuytJqBvKeSzrWd4car89a4/t+//+DB/9+//9++/+LBrGpDdB0AoT8Pq0obmkgd+dOu
/925/9u3/9q2+NSv6cek17eXx6qNvZx7fmlTUFdYnqqs0uPm2Ons2Ons2Ons2Ons2Ons2Ons2Onsstjp
7Njp7Njp7Njp7MfR0LWcg72qls64oePKsPncwP/jxv/ixP/hw//hw//gwf/jw5lYNGwfAIcrAHYhAH0x
CfXMqP/hv//cu//duv/duv3ZtuzKqdi5m8itkMGffV5XSmNrbLjGydXm6djp7Njp7Njp7Njp7Njp7Njp
7LLY6ezY6ezY6ezU5OfCr5q9q5jOuaTiy7T438X/5cr/48n/48j/48f/48b/4sb/58rQoH9dGwBXFwBb
FQCrbUn/5MT/37//37//3r3/3r3/3rz93LnrzKzZu57Kr5O2k3JQUU6Pm5zI2NrY6ezY6ezY6ezY6ezY
6ezY6eyy2Ons2Ons2Ons0dbQvqmTyrim4Mq099/H/+fP/+bM/+XM/+XK/+TK/+PJ/+PI/+TJ/+bL26+Q
v4pq0qOE/N2+/+PF/+DD/+HC/+DB/+DA/9+//9+//Ny86syu17ugyKyOgXBdcXh6tsTH2Ons2Ons2Ons
2Ons2Ons2Onsstjp7Njp7Njp7M3EtMOzotfDse/axP/o0v/o0f/nz//nz//nz//nzv/mzP/lzf/ly//l
zP/ozfzbv//kyf/mzP/jx//jx//jxf/ixf/ixf/gxP/hw//iw/jZu+PHqs+3nqaNdmhqaqKvsdjp7Njp
7Njp7Njp7Njp7Njp7LLY6ezY6ezY6ezGtJ/Ov7Dj0L755dD/69b/6tX/6tT/6dP/6dL/6NH/6NH/6ND/
58//69Lyz7OmTiDerIr/79f/5cv/5cr/48n/48j/48j/48f/4sb/48b+4sXt0rbbw6rBqI1vbmqHkpTY
6ezY6ezY6ezY6ezY6ezY6eyy2Ons2Ons2Onsyreo1ca47NrK/uzZ/+zZ/+zZ/+vX/+vW/+rW/+rU/+rU
/+nT/+jS/+zW8tK3lDAAyIdi//Te/+jQ/+bN/+bN/+XL/+XL/+TL/+TK/+TJ/+XK9tvB4sqyzbWdhHx0
eH5+2Ons2Ons2Ons2Ons2Ons2Onsstjp7Njp7Njp7MzAs9fJvO7f0P/v3v/u3f/t3P/t3P/t2//s2v/s
2f/s2P/r1//r1v/r1v3s1p9KH5w7DOe3l/7s1v/r1f/n0P/nz//nzv/nzv/mzf/mzP/ozvngyOXMtdXB
rKKWiXp+fNjp7Njp7Njp7Njp7Njp7Njp7LLY6ezY6ezY6ezNwrjYzL/v4dT/8eP/8OH/79//7t//79//
7t7/7t3/7dv/7dv/7Nr/7Nn/8+HPoYV/HwDCYjH3tY/64Mn/7dj/6NP/6NL/6NH/6NH/59D/69L548zl
0LjZxLCtopSAhIPY6ezY6ezY6ezY6ezY6ezY6eyy2Ons2Ons2OnszcK32c/E8OTY//Tn//Ll//Lk//Di
//Hi/+/h//Dg/+/f//Hh//Tl//Pj//Tk893JiD4ajS0Dzmo50INa9tzF/+7a/+rV/+rV/+rV/+nT/+3X
+efQ59K91sOtraSVjpaV2Ons2Ons2Ons2Ons2Ons2Onsstjp7Njp7Njp7M/FudzUy/Hl3P/37P/16v/y
5//z5v/z5v/y5P/y5P/z5fzr3fPUv/nbxv3t3f/67Kx8X3QaAJs5B5QzBrp9Wv/15P/t2v/s2f/r2P/r
1//14Prp1unVwdG+qqihl624utjp7Njp7Njp7Njp7Njp7Njp7LLY6ezY6ezY6ezZ0MLd19Dt49v89+3/
+vD/9Ov/9er/9On/8+j/9Oj/9em8hmirUiTJbT7Llnj//vTKpY1yIQCUMACAJACZTij44c3/8+P/7tz/
7Nv/8N3/++r45tPax7PSvqmYnJvE09TY6ezY6ezY6ezY6ezY6ezY6eyy2Ons2Ons2Ons3N7Y29XQ6OHa
+PDp///4//jw//ft//bu//bs//fs+ezidykDjy0AiCgApl86//vu0rCadCUAlDAAfSQAkkci9NzK//Xo
/+/g//Df//vv/vjp8uHR1sKuwLCdprGz0uPm2Ons2Ons2Ons2Ons2Ons2Onsstjp7Njp7Njp7Nnl5dzU
y+He2vDq5P369//+/P/58//38P/48P/48Pvx6Hg1FIUpAIAkALyKcP///72VgG4bAJQxAHQdAJZSMPvs
3v/16P/x4//77///+/ns3+3f097Ou5mWjsXV2Njp7Njp7Njp7Njp7Njp7Njp7Njp7LLY6ezY6ezY6ezY
6ezd39jg3djp5eH28Oz//fv///7/+vX/+fL/+fP//PaugWlmEgCQPRTw2sz67eSVVDVzIAB4JABpHADI
oIf//fT/9en//PP////89evz5tnq39K8rp62xMfX6OvY6ezY6ezY6ezY6ezY6ezY6ezY6eyy2Ons2Ons
2Ons2Ons2Ons4d7W4+Hf6+jl9vPv///9///+//36//v2//36+PDrqndcgScAplIqqFUrdhwAXxcAbSwP
v5eA//zz//rx//36/////Pfx8+jf7OPa0sOzqbS11OTn2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Onsstjp
7Njp7Njp7Njp7Njp7Nnn6eTe1uTj4uvp6Pj18v/+/P///////v/+/P///v/9+enUyMuZgMWOccOTec2u
nu/j2////v///////////vz48/Ts5O3l39rOwbS5tdDh5Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp
7LLY6ezY6ezY6ezY6ezY6ezY6ezZ5+jh39fn5eTt7e318/L7+vn//v7/////////////////////////
///////////////////+/Pr69e/17unu6OLUyr3ByMTT5ObY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY
6ezY6eyy2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons3+Th6OXg7ezs8fHw9vX1+vn5/v39////////////
/////////////////fv5+vf09vPv8u7q6uPc0c3FytfY1+jr2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons
2Ons2Ons2Onsstjp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Nnn6ePm4+nn4+7t7O/w8fT09Pn4+Pv6
+fv7+fv7+fz7+fv6+Pj29fTz8/Lv7e3n4djX0c/W1dXl6Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp
7Njp7Njp7Njp7Njp7LLY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6eza6Onc5uTi4Njo5ODr
6ejr6+vr6+vr6+vs6+vs6uns6OPk3tXW29jX4uHU5OfY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY6ezY
6ezY6ezY6ezY6ezY6ezY6eyy2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons
2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons2Ons
2Ons2Ons2Ons2Ons2Ons2Ons2Onsstjp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp
7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp
7Njp7Njp7Njp7Njp7Njp7Njp7Njp7Njp7LI=
</value>
</data>
</root>

41
FrmBilanSelect.vb Normal file
View File

@ -0,0 +1,41 @@
Public Class FrmBilanSelect
Private Sub FrmBilanSelect_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Text = Me.Tag & " | " & TimeOfDay
End Sub
Private Sub CmdBI_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdBI.Click
Me.Hide()
FrmAccueil.Hide()
FrmBilanID.Show()
End Sub
Private Sub CmdBM_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdBM.Click
Me.Hide()
FrmAccueil.Hide()
FrmBilanMat.Show()
End Sub
Private Sub CmdBS_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdBS.Click
Me.Hide()
FrmAccueil.Hide()
FrmBilanSupp.Show()
End Sub
Private Sub CmdQuit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdQuit.Click
Dim quit As Integer
quit = MsgBox("Vous êtes sur le point de quitter Candidat 7 Pro. Voulez-vous continuer ?", MsgBoxStyle.Question + MsgBoxStyle.YesNo, "Quitter Candidat 7 Pro")
If quit = vbYes Then
FileClose(nf)
'Kill("Candidats.AFF")
End
End If
End Sub
Private Sub CmdReturn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdReturn.Click
Me.Close()
FrmAccueil.Show()
End Sub
End Class

112
FrmBilanSupp.Designer.vb generated Normal file
View File

@ -0,0 +1,112 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class FrmBilanSupp
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()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FrmBilanSupp))
Me.LstSupp = New System.Windows.Forms.ListBox
Me.CmdAnnul = New System.Windows.Forms.Button
Me.PictureBox1 = New System.Windows.Forms.PictureBox
Me.CmdBI = New System.Windows.Forms.Button
Me.CmdBM = New System.Windows.Forms.Button
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'LstSupp
'
Me.LstSupp.FormattingEnabled = True
Me.LstSupp.Location = New System.Drawing.Point(12, 12)
Me.LstSupp.Name = "LstSupp"
Me.LstSupp.Size = New System.Drawing.Size(351, 69)
Me.LstSupp.TabIndex = 0
'
'CmdAnnul
'
Me.CmdAnnul.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.CmdAnnul.Location = New System.Drawing.Point(285, 112)
Me.CmdAnnul.Name = "CmdAnnul"
Me.CmdAnnul.Size = New System.Drawing.Size(75, 23)
Me.CmdAnnul.TabIndex = 1
Me.CmdAnnul.Text = "Fermer"
Me.CmdAnnul.UseVisualStyleBackColor = True
'
'PictureBox1
'
Me.PictureBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
Me.PictureBox1.Location = New System.Drawing.Point(-2, 97)
Me.PictureBox1.Margin = New System.Windows.Forms.Padding(0)
Me.PictureBox1.MaximumSize = New System.Drawing.Size(800, 2)
Me.PictureBox1.MinimumSize = New System.Drawing.Size(0, 2)
Me.PictureBox1.Name = "PictureBox1"
Me.PictureBox1.Size = New System.Drawing.Size(374, 2)
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox1.TabIndex = 72
Me.PictureBox1.TabStop = False
'
'CmdBI
'
Me.CmdBI.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.CmdBI.Location = New System.Drawing.Point(12, 112)
Me.CmdBI.Name = "CmdBI"
Me.CmdBI.Size = New System.Drawing.Size(75, 23)
Me.CmdBI.TabIndex = 2
Me.CmdBI.Text = "&Individuel"
Me.CmdBI.UseVisualStyleBackColor = True
'
'CmdBM
'
Me.CmdBM.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.CmdBM.Location = New System.Drawing.Point(93, 112)
Me.CmdBM.Name = "CmdBM"
Me.CmdBM.Size = New System.Drawing.Size(75, 23)
Me.CmdBM.TabIndex = 3
Me.CmdBM.Text = "Par &matière"
Me.CmdBM.UseVisualStyleBackColor = True
'
'FrmBilanSupp
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(372, 147)
Me.Controls.Add(Me.CmdBI)
Me.Controls.Add(Me.CmdBM)
Me.Controls.Add(Me.CmdAnnul)
Me.Controls.Add(Me.PictureBox1)
Me.Controls.Add(Me.LstSupp)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.MaximizeBox = False
Me.Name = "FrmBilanSupp"
Me.ShowIcon = False
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Bilan des candidats supprimés"
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
Friend WithEvents LstSupp As System.Windows.Forms.ListBox
Friend WithEvents CmdAnnul As System.Windows.Forms.Button
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
Friend WithEvents CmdBI As System.Windows.Forms.Button
Friend WithEvents CmdBM As System.Windows.Forms.Button
End Class

184
FrmBilanSupp.resx Normal file
View File

@ -0,0 +1,184 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="PictureBox1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
Qk3GDQAAAAAAADYAAAAoAAAAQgIAAAIAAAABABgAAAAAAAAAAADEDgAAxA4AAAAAAAAAAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////C0OgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKALQw==
</value>
</data>
</root>

22
FrmBilanSupp.vb Normal file
View File

@ -0,0 +1,22 @@
Public Class FrmBilanSupp
Private Sub CmdAnnul_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdAnnul.Click
Me.Hide()
FrmAccueil.Show()
End Sub
Private Sub CmdBM_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdBM.Click
Me.Hide()
FrmBilanMat.Show()
End Sub
Private Sub CmdBI_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdBI.Click
Me.Hide()
FrmBilanID.Show()
End Sub
Private Sub FrmBilanSupp_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Tag = "Bilan des candidats supprimés"
Me.Text = Me.Tag & " |" & TimeOfDay
End Sub
End Class

42
FrmEdit.Designer.vb generated
View File

@ -35,10 +35,13 @@ Partial Class FrmEdit
Me.PictureBox2 = New System.Windows.Forms.PictureBox
Me.PictureBox3 = New System.Windows.Forms.PictureBox
Me.FrmInput1BindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.PictureBox4 = New System.Windows.Forms.PictureBox
Me.LblWarn = New System.Windows.Forms.Label
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.FrmInput1BindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox4, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'LblNext
@ -72,7 +75,7 @@ Partial Class FrmEdit
'
Me.CBNP.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.CBNP.FormattingEnabled = True
Me.CBNP.Location = New System.Drawing.Point(218, 228)
Me.CBNP.Location = New System.Drawing.Point(218, 245)
Me.CBNP.Name = "CBNP"
Me.CBNP.Size = New System.Drawing.Size(219, 21)
Me.CBNP.TabIndex = 33
@ -81,7 +84,7 @@ Partial Class FrmEdit
'
Me.RBNP.AutoSize = True
Me.RBNP.BackColor = System.Drawing.Color.White
Me.RBNP.Location = New System.Drawing.Point(188, 205)
Me.RBNP.Location = New System.Drawing.Point(188, 222)
Me.RBNP.Name = "RBNP"
Me.RBNP.Size = New System.Drawing.Size(226, 17)
Me.RBNP.TabIndex = 32
@ -91,7 +94,7 @@ Partial Class FrmEdit
'
'TxtId
'
Me.TxtId.Location = New System.Drawing.Point(370, 177)
Me.TxtId.Location = New System.Drawing.Point(370, 198)
Me.TxtId.Name = "TxtId"
Me.TxtId.Size = New System.Drawing.Size(89, 21)
Me.TxtId.TabIndex = 31
@ -100,7 +103,7 @@ Partial Class FrmEdit
'
Me.RBId.AutoSize = True
Me.RBId.BackColor = System.Drawing.Color.White
Me.RBId.Location = New System.Drawing.Point(188, 178)
Me.RBId.Location = New System.Drawing.Point(188, 199)
Me.RBId.Name = "RBId"
Me.RBId.Size = New System.Drawing.Size(154, 17)
Me.RBId.TabIndex = 30
@ -112,7 +115,7 @@ Partial Class FrmEdit
'
Me.Lbl2.AutoSize = True
Me.Lbl2.BackColor = System.Drawing.Color.White
Me.Lbl2.Location = New System.Drawing.Point(176, 152)
Me.Lbl2.Location = New System.Drawing.Point(176, 180)
Me.Lbl2.Name = "Lbl2"
Me.Lbl2.Size = New System.Drawing.Size(209, 13)
Me.Lbl2.TabIndex = 29
@ -177,12 +180,36 @@ Partial Class FrmEdit
'
Me.FrmInput1BindingSource.DataSource = GetType(Projet_VS_100_Priet_Sabourin.FrmInput1)
'
'PictureBox4
'
Me.PictureBox4.Image = CType(resources.GetObject("PictureBox4.Image"), System.Drawing.Image)
Me.PictureBox4.Location = New System.Drawing.Point(174, 118)
Me.PictureBox4.Name = "PictureBox4"
Me.PictureBox4.Size = New System.Drawing.Size(16, 16)
Me.PictureBox4.SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize
Me.PictureBox4.TabIndex = 36
Me.PictureBox4.TabStop = False
'
'LblWarn
'
Me.LblWarn.BackColor = System.Drawing.Color.White
Me.LblWarn.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.LblWarn.Location = New System.Drawing.Point(192, 120)
Me.LblWarn.Margin = New System.Windows.Forms.Padding(5, 5, 5, 10)
Me.LblWarn.Name = "LblWarn"
Me.LblWarn.Size = New System.Drawing.Size(267, 52)
Me.LblWarn.TabIndex = 35
Me.LblWarn.Text = "Attention : Vous n'aurez qu'une minute (1:00) pour modifier votre identité, et un" & _
"e minute quinze secondes (1:15) pour choisir vos examens."
'
'FrmEdit
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(482, 323)
Me.ClientSize = New System.Drawing.Size(482, 327)
Me.ControlBox = False
Me.Controls.Add(Me.PictureBox4)
Me.Controls.Add(Me.LblWarn)
Me.Controls.Add(Me.PictureBox3)
Me.Controls.Add(Me.CBNP)
Me.Controls.Add(Me.RBNP)
@ -210,6 +237,7 @@ Partial Class FrmEdit
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.FrmInput1BindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox4, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
@ -228,4 +256,6 @@ Partial Class FrmEdit
Friend WithEvents PictureBox2 As System.Windows.Forms.PictureBox
Friend WithEvents FrmInput1BindingSource As System.Windows.Forms.BindingSource
Friend WithEvents PictureBox3 As System.Windows.Forms.PictureBox
Friend WithEvents PictureBox4 As System.Windows.Forms.PictureBox
Friend WithEvents LblWarn As System.Windows.Forms.Label
End Class

885
FrmEdit.resx
View File

@ -185,441 +185,441 @@
<value>
Qk1eZgAAAAAAAD4AAAAoAAAAQgIAAFgBAAABAAEAAAAAAAAAAADEDgAAxA4AAAIAAAACAAAAAAAA////
////////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAA==
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjC///////////////////
/////////////////////////////////////////////////////////////////////////////8CK
owv/////////////////////////////////////////////////////////////////////////////
///////////////////AiqML////////////////////////////////////////////////////////
////////////////////////////////////////wIqjC///////////////////////////////////
/////////////////////////////////////////////////////////////8CKowv/////////////
////////////////////////////////////////////////////////////////////////////////
///AiqML////////////////////////////////////////////////////////////////////////
////////////////////////wIqjC///////////////////////////////////////////////////
/////////////////////////////////////////////8CKowv/////////////////////////////
///////////////////////////////////////////////////////////////////AiqML////////
////////////////////////////////////////////////////////////////////////////////
////////wIqjC///////////////////////////////////////////////////////////////////
/////////////////////////////8CKowv/////////////////////////////////////////////
///////////////////////////////////////////////////AiqML////////////////////////
////////////////////////////////////////////////////////////////////////wIqjC///
////////////////////////////////////////////////////////////////////////////////
/////////////8CKowv/////////////////////////////////////////////////////////////
///////////////////////////////////AiqML////////////////////////////////////////
////////////////////////////////////////////////////////wIqjCw==
</value>
</data>
<data name="PictureBox3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@ -1356,4 +1356,19 @@
<metadata name="FrmInput1BindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<data name="PictureBox4.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAAlwSFlzAAALDwAA
Cw8BkvkDpQAAAftJREFUOE+Vkt1Lk2EYhx+RBCNoRkTG6MCgc2EdBB3sT+igg16JMKvRZEtKDDI6kIRA
ChYdFBnRQVILSUPscxYRiYaW7aNNt+mar27ivqSayCZXe97harmNeuCCH/fzvtfzO7gFFc76epZMZq3S
J4hyt/Jn84lqLCdrKkrKCoafdjNob+bVUBuD/ZfKtigpSKdTnDXVkow7SSVcdFjriMe+lZSUFPQ/6sDx
zILvSyfuCQsf3nZif9D2bwJ13pl7cTux6AhvBrbieLKF5cVhui7q8U+/3yTZ1KDvvpnxd+eZ9bTjm1Q0
Aq5WpsYuc/dWU2WB1zOSe2k3kZCNoOsYRqNRI+BUiMz1cO1KA+OjfUWSoga3bx7h0+hp/JONhL1KQSCz
7+M+pqfa6ek+VFogzbare4kGW5gZE0T8CgaDQUPm/KyJO7b9OF7aCpJCA2n2ThxmwV1P+LMgFlLQ6/Ua
MsuZ6tQRch/lTHMVctHk0QSvn1+n98YeEnMHWfoqNFZUBZ1OpyHzxjw+24j9XgNDA115gdz11pYqVI+B
lWAtqYDQ+D5v4GdU0ZB5Y54K1rA0cyC3aNUkEypCrunD3jpWF+pJh0WBtdjvBjL/ebeq7uTF413IhRPW
U/kXM4vFZJcNZJNKnlz++/5HSHDBIvINzpl3YDou/guraZvW4Bf+EytxAKqx/wAAAABJRU5ErkJggg==
</value>
</data>
</root>

32
FrmEdit.vb
View File

@ -1,10 +1,8 @@
Public Class FrmEdit
Public SelectedID As Integer
Private Sub FrmEdit1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
RBId.Checked = True REM "Check par défaut" au chargement.
'SelectedID = FrmAccueil.IDlu
Call FrmAccueil.LectBdD() REM Contruit la liste des candidats NON supprimés a partir du tableau d'index.
'Selectedclef = FrmAccueil.IDlu
Call LectBdD() REM Contruit la liste des candidats NON supprimés a partir du tableau d'index.
End Sub
@ -30,12 +28,27 @@ Public Class FrmEdit
Private Sub CmdNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdNext.Click
If RBId.Checked Then
SelectedID = TxtId.Text
Else
SelectedID = FrmAccueil.Tindex(CBNP.SelectedIndex).no
Dim court As Integer
If RBId.Checked Then REM Via la textbox
If TxtId.Text = "" Then Exit Sub
Selectedclef = TxtId.Text
If Selectedclef >= ClefMAX Or Selectedclef < 1 Then
MsgBox("L'identifiant que vous avez saisie n'est pas valide.", MsgBoxStyle.Exclamation, "Candidat introuvable")
Exit Sub
Else
If Tindex(Selectedclef).Suppr Then
MsgBox("Ce candidat a été supprimé, il ne peut pas être modifié.", MsgBoxStyle.Exclamation, "Candidat indisponible")
Exit Sub
End If
End If
ElseIf CBNP.SelectedIndex <> -1 Then REM Via le CBox
If IsNumeric(Microsoft.VisualBasic.Left(CBNP.SelectedItem, 2)) Then
court = Microsoft.VisualBasic.Left(CBNP.SelectedItem, 2)
End If
Selectedclef = court
End If
FileGet(FrmAccueil.nf, FrmAccueil.cddts, SelectedID)
FileGet(nf, cddts, Selectedclef)
Me.Hide() REM On utilise hide pour naviger entre les feuilles sans devoir modifier la BdD, le bouton "MaJ" a la dernière feuille (Input3) enregistrera tout les modifications.
FrmInput1.Show()
End Sub
@ -56,5 +69,4 @@ Public Class FrmEdit
End If
End Sub
End Class

76
FrmInput1.Designer.vb generated
View File

@ -37,7 +37,6 @@ Partial Class FrmInput1
Me.CmdNext = New System.Windows.Forms.Button
Me.CmdAnnul = New System.Windows.Forms.Button
Me.PictureBox1 = New System.Windows.Forms.PictureBox
Me.CmdPre = New System.Windows.Forms.Button
Me.TmrCaR = New System.Windows.Forms.Timer(Me.components)
Me.Tlt1 = New System.Windows.Forms.ToolTip(Me.components)
Me.SBHAge = New System.Windows.Forms.HScrollBar
@ -64,7 +63,7 @@ Partial Class FrmInput1
'TxtVille
'
Me.TxtVille.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper
Me.TxtVille.Location = New System.Drawing.Point(169, 143)
Me.TxtVille.Location = New System.Drawing.Point(146, 158)
Me.TxtVille.MaxLength = 15
Me.TxtVille.Name = "TxtVille"
Me.TxtVille.Size = New System.Drawing.Size(108, 21)
@ -73,7 +72,7 @@ Partial Class FrmInput1
'
'TxtCP
'
Me.TxtCP.Location = New System.Drawing.Point(169, 116)
Me.TxtCP.Location = New System.Drawing.Point(146, 131)
Me.TxtCP.MaxLength = 5
Me.TxtCP.Name = "TxtCP"
Me.TxtCP.Size = New System.Drawing.Size(69, 21)
@ -82,7 +81,7 @@ Partial Class FrmInput1
'
'TxtAdrss
'
Me.TxtAdrss.Location = New System.Drawing.Point(169, 89)
Me.TxtAdrss.Location = New System.Drawing.Point(146, 104)
Me.TxtAdrss.MaxLength = 10
Me.TxtAdrss.Name = "TxtAdrss"
Me.TxtAdrss.Size = New System.Drawing.Size(215, 21)
@ -92,7 +91,7 @@ Partial Class FrmInput1
'TxtPrenom
'
Me.TxtPrenom.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper
Me.TxtPrenom.Location = New System.Drawing.Point(169, 62)
Me.TxtPrenom.Location = New System.Drawing.Point(146, 77)
Me.TxtPrenom.MaxLength = 6
Me.TxtPrenom.Name = "TxtPrenom"
Me.TxtPrenom.Size = New System.Drawing.Size(108, 21)
@ -102,7 +101,7 @@ Partial Class FrmInput1
'TxtNom
'
Me.TxtNom.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper
Me.TxtNom.Location = New System.Drawing.Point(169, 35)
Me.TxtNom.Location = New System.Drawing.Point(146, 50)
Me.TxtNom.MaxLength = 8
Me.TxtNom.Name = "TxtNom"
Me.TxtNom.Size = New System.Drawing.Size(108, 21)
@ -113,18 +112,18 @@ Partial Class FrmInput1
'
Me.LblAge.Anchor = System.Windows.Forms.AnchorStyles.Top
Me.LblAge.AutoSize = True
Me.LblAge.Location = New System.Drawing.Point(130, 172)
Me.LblAge.Location = New System.Drawing.Point(38, 187)
Me.LblAge.Name = "LblAge"
Me.LblAge.Size = New System.Drawing.Size(33, 13)
Me.LblAge.Size = New System.Drawing.Size(102, 13)
Me.LblAge.TabIndex = 19
Me.LblAge.Text = "Age :"
Me.LblAge.Text = "Date de naissance :"
Me.LblAge.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'LblVille
'
Me.LblVille.Anchor = System.Windows.Forms.AnchorStyles.Top
Me.LblVille.AutoSize = True
Me.LblVille.Location = New System.Drawing.Point(131, 146)
Me.LblVille.Location = New System.Drawing.Point(108, 161)
Me.LblVille.Name = "LblVille"
Me.LblVille.Size = New System.Drawing.Size(32, 13)
Me.LblVille.TabIndex = 18
@ -135,7 +134,7 @@ Partial Class FrmInput1
'
Me.LblCP.Anchor = System.Windows.Forms.AnchorStyles.Top
Me.LblCP.AutoSize = True
Me.LblCP.Location = New System.Drawing.Point(92, 119)
Me.LblCP.Location = New System.Drawing.Point(69, 134)
Me.LblCP.Name = "LblCP"
Me.LblCP.Size = New System.Drawing.Size(71, 13)
Me.LblCP.TabIndex = 17
@ -146,7 +145,7 @@ Partial Class FrmInput1
'
Me.LblAdrss.Anchor = System.Windows.Forms.AnchorStyles.Top
Me.LblAdrss.AutoSize = True
Me.LblAdrss.Location = New System.Drawing.Point(110, 92)
Me.LblAdrss.Location = New System.Drawing.Point(87, 107)
Me.LblAdrss.Name = "LblAdrss"
Me.LblAdrss.Size = New System.Drawing.Size(53, 13)
Me.LblAdrss.TabIndex = 16
@ -157,7 +156,7 @@ Partial Class FrmInput1
'
Me.LblPrenom.Anchor = System.Windows.Forms.AnchorStyles.Top
Me.LblPrenom.AutoSize = True
Me.LblPrenom.Location = New System.Drawing.Point(113, 65)
Me.LblPrenom.Location = New System.Drawing.Point(90, 80)
Me.LblPrenom.Name = "LblPrenom"
Me.LblPrenom.Size = New System.Drawing.Size(50, 13)
Me.LblPrenom.TabIndex = 15
@ -168,7 +167,7 @@ Partial Class FrmInput1
'
Me.LblNom.Anchor = System.Windows.Forms.AnchorStyles.Top
Me.LblNom.AutoSize = True
Me.LblNom.Location = New System.Drawing.Point(128, 38)
Me.LblNom.Location = New System.Drawing.Point(105, 53)
Me.LblNom.Name = "LblNom"
Me.LblNom.Size = New System.Drawing.Size(35, 13)
Me.LblNom.TabIndex = 14
@ -215,27 +214,24 @@ Partial Class FrmInput1
Me.PictureBox1.TabIndex = 19
Me.PictureBox1.TabStop = False
'
'CmdPre
'
Me.CmdPre.Location = New System.Drawing.Point(224, 288)
Me.CmdPre.Name = "CmdPre"
Me.CmdPre.Size = New System.Drawing.Size(75, 23)
Me.CmdPre.TabIndex = 11
Me.CmdPre.Text = "< &Précédent"
Me.CmdPre.UseVisualStyleBackColor = True
Me.CmdPre.Visible = False
'
'TmrCaR
'
Me.TmrCaR.Interval = 1000
'
'Tlt1
'
Me.Tlt1.AutoPopDelay = 5000
Me.Tlt1.InitialDelay = 100
Me.Tlt1.ReshowDelay = 1
'
'SBHAge
'
Me.SBHAge.LargeChange = 60
Me.SBHAge.Location = New System.Drawing.Point(169, 193)
Me.SBHAge.Location = New System.Drawing.Point(146, 208)
Me.SBHAge.Maximum = 660
Me.SBHAge.Minimum = 300
Me.SBHAge.Name = "SBHAge"
Me.SBHAge.RightToLeft = System.Windows.Forms.RightToLeft.Yes
Me.SBHAge.Size = New System.Drawing.Size(215, 22)
Me.SBHAge.SmallChange = 12
Me.SBHAge.TabIndex = 7
@ -244,7 +240,7 @@ Partial Class FrmInput1
'
'TxtMois
'
Me.TxtMois.Location = New System.Drawing.Point(210, 169)
Me.TxtMois.Location = New System.Drawing.Point(187, 184)
Me.TxtMois.Name = "TxtMois"
Me.TxtMois.Size = New System.Drawing.Size(35, 21)
Me.TxtMois.TabIndex = 5
@ -253,7 +249,7 @@ Partial Class FrmInput1
'
'TxtAns
'
Me.TxtAns.Location = New System.Drawing.Point(328, 169)
Me.TxtAns.Location = New System.Drawing.Point(305, 184)
Me.TxtAns.Name = "TxtAns"
Me.TxtAns.Size = New System.Drawing.Size(56, 21)
Me.TxtAns.TabIndex = 6
@ -263,10 +259,11 @@ Partial Class FrmInput1
'LblAns
'
Me.LblAns.AutoSize = True
Me.LblAns.Location = New System.Drawing.Point(390, 172)
Me.LblAns.Location = New System.Drawing.Point(384, 200)
Me.LblAns.Name = "LblAns"
Me.LblAns.Size = New System.Drawing.Size(0, 13)
Me.LblAns.Size = New System.Drawing.Size(61, 13)
Me.LblAns.TabIndex = 20
Me.LblAns.Text = "Aujourd'hui"
'
'LblID
'
@ -282,7 +279,7 @@ Partial Class FrmInput1
'LblINFmois
'
Me.LblINFmois.AutoSize = True
Me.LblINFmois.Location = New System.Drawing.Point(169, 172)
Me.LblINFmois.Location = New System.Drawing.Point(146, 187)
Me.LblINFmois.Name = "LblINFmois"
Me.LblINFmois.Size = New System.Drawing.Size(35, 13)
Me.LblINFmois.TabIndex = 21
@ -291,27 +288,28 @@ Partial Class FrmInput1
'LblINFAnn
'
Me.LblINFAnn.AutoSize = True
Me.LblINFAnn.Location = New System.Drawing.Point(272, 172)
Me.LblINFAnn.Location = New System.Drawing.Point(254, 187)
Me.LblINFAnn.Name = "LblINFAnn"
Me.LblINFAnn.Size = New System.Drawing.Size(50, 13)
Me.LblINFAnn.Size = New System.Drawing.Size(45, 13)
Me.LblINFAnn.TabIndex = 22
Me.LblINFAnn.Text = "Années :"
Me.LblINFAnn.Text = "Année :"
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Location = New System.Drawing.Point(12, 256)
Me.Label1.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.ForeColor = System.Drawing.SystemColors.GrayText
Me.Label1.Location = New System.Drawing.Point(367, 107)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(426, 13)
Me.Label1.Size = New System.Drawing.Size(60, 13)
Me.Label1.TabIndex = 23
Me.Label1.Text = "Remarque : L'age peut-être rapidement séléctionné avec l'assenseur présent ci des" & _
"sus." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10)
Me.Label1.Text = "(Facultatif)"
'
'FrmInput1
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(482, 323)
Me.ClientSize = New System.Drawing.Size(482, 327)
Me.ControlBox = False
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.LblID)
@ -337,7 +335,6 @@ Partial Class FrmInput1
Me.Controls.Add(Me.CmdNext)
Me.Controls.Add(Me.CmdAnnul)
Me.Controls.Add(Me.PictureBox1)
Me.Controls.Add(Me.CmdPre)
Me.Font = New System.Drawing.Font("Tahoma", 8.25!)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
Me.MaximizeBox = False
@ -369,7 +366,6 @@ Partial Class FrmInput1
Friend WithEvents CmdNext As System.Windows.Forms.Button
Friend WithEvents CmdAnnul As System.Windows.Forms.Button
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
Friend WithEvents CmdPre As System.Windows.Forms.Button
Friend WithEvents TmrCaR As System.Windows.Forms.Timer
Friend WithEvents Tlt1 As System.Windows.Forms.ToolTip
Friend WithEvents SBHAge As System.Windows.Forms.HScrollBar

7
FrmInput1.resx
View File

@ -152,7 +152,7 @@
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////wCgoKCgoKCgoKCg
////////////////////////////////////////////////////////////////Gy6goKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
@ -181,15 +181,12 @@
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKD/AA==
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKAbLg==
</value>
</data>
<metadata name="TmrCaR.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>87, 17</value>
</metadata>
<metadata name="Tlt1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<metadata name="$this.Locked" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>

391
FrmInput1.vb
View File

@ -1,9 +1,138 @@
Public Class FrmInput1
Public nais As Integer REM en mois. ANS*12 + MOIS
Dim auj As Integer REM en mois. Today.Year*12 + Today.Month
Dim agem As Integer REM en mois, différence entre auj et nais
Dim agea As Integer REM en années (entière), calculé a partir de agem
Dim agemin, agemax As Integer REM Intervalle de l'age, calculé a partir d'aujourd'hui
Dim agemin, agemax As Integer REM Intervalle de l'age, calculé a partir d'aujourd'hui - AGEMAX:25 AGEMIN:55
Private Sub FrmIsc2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
auj = Today.Year * 12 + Today.Month
agemin = auj - (56 * 12) REM Permet aux personnes ayant 55 ans et quelques mois de se présenter. 56 ans pile est une valeur exclue : Df=[25, 56[
agemax = auj - (25 * 12)
SBHAge.Maximum = agemax + (SBHAge.LargeChange - SBHAge.SmallChange) + 6 REM Réajuste la scrollbar pour toujours donner un age dans l'interval.
SBHAge.Minimum = agemin + 12 REM Réajuste la scrollbar pour toujours donner un age dans l'interval.
End Sub
Private Sub FrmInput1_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown
End Sub
Private Sub FrmInput1_VisibleChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.VisibleChanged
If Me.Visible Then
If Boule = True Then REM true == édition
Me.Tag = "Assistant édition de candidature (2/4)"
Lbl1.Text = "Editez votre identité ici :"
TxtNom.Text = cddts.Nom
TxtPrenom.Text = cddts.Prenom
TxtAdrss.Text = cddts.Adresse
TxtCP.Text = cddts.CP
TxtVille.Text = cddts.Ville
TxtMois.Text = cddts.Age Mod 12
TxtAns.Text = cddts.Age \ 12
Call conv(cddts.Age, 0)
If cddts.Age > SBHAge.Minimum And cddts.Age <= SBHAge.Maximum Then SBHAge.Value = cddts.Age
LblID.Visible = True
LblID.Text = "Id : " & Format(Selectedclef, "00") REM met d'ID en cas d'édition.
End If
If Boule = False Then REM false == inscription
Me.Tag = "Assistant création de candidature (2/4)"
Lbl1.Text = "Renseignez votre identité ici :"
TxtNom.Text = ""
TxtPrenom.Text = ""
TxtAdrss.Text = ""
TxtCP.Text = ""
TxtVille.Text = ""
SBHAge.Value = SBHAge.Minimum
TxtMois.Text = Today.Month
TxtAns.Text = Today.Year
LblAns.Text = "Aujourd'hui"
LblID.Visible = False
End If
LblCaR.Tag = 60
Me.Text = Me.Tag & " | " & Horaire & " | Temps restant : 1:00"
TmrCaR.Start() REM lancement du timer
End If
End Sub
Private Sub CmdNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdNext.Click
Dim OK As Boolean = True REM Retourne un état d'erreur ou non, de manière général.
Dim ChkNom, Chkprenom, ChkCP, ChkVille, ChkMois, chkAge, chkCP00 As Boolean REM retourne un état d'erreur pour tout les tests.
Dim cp As Integer
REM Par defaut, il n'y a pas d'erreur, donc OK = TRUE, et tout les checks = FALSE.
REM Initialisation des test
ChkNom = False
Chkprenom = False
ChkCP = False
ChkVille = False
ChkMois = False
chkAge = False
chkCP00 = False
CmdNext.Tag = ""
REM Cas particulier : pour bien tester le Code Postal ("00" interdit), il faut une sécurité contre les chaines vides.
If TxtCP.Text.Length >= "2" Then cp = Microsoft.VisualBasic.Left(TxtCP.Text, 2)
If TxtNom.Text = "" Then REM Le nom est vide
ChkNom = True
OK = False
LblNom.Tag = "• La saisie du nom n'a pas été effectuée."
LblNom.ForeColor = Color.Red
End If
If TxtPrenom.Text = "" Then REM Le prénom est vide
Chkprenom = True
OK = False
LblPrenom.Tag = "• La saisie du prénom n'a pas été effectuée."
LblPrenom.ForeColor = Color.Red
End If
If TxtCP.TextLength < 5 Then REM Le Code Postal ne fait pas 5 caractères.
ChkCP = True
OK = False
LblCP.Tag = "• La saisie du code postal est vide ou incomplète."
LblCP.ForeColor = Color.Red
End If
If cp = 0 Then REM Le Code Postal commence par 00
chkCP00 = True
OK = False
TxtCP.Tag = "• Le code postal ne peut commencer par '00'."
LblCP.ForeColor = Color.Red
End If
If TxtVille.Text = "" Then REM La ville est vide.
ChkVille = True
OK = False
LblVille.Tag = "• La saisie de la ville n'a pas été effectuée."
LblVille.ForeColor = Color.Red
End If
If (nais > agemax Or nais <= agemin) And ChkMois = False Then REM L'age n'est pas dans [25; 56[
chkAge = True
OK = False
LblAns.Tag = "• L'age n'est pas compris entre 25 et 55 ans."
LblAns.ForeColor = Color.Red
LblAge.ForeColor = Color.Red
End If
If OK = False Then REM Cette partie prépare la MSGBOX a afficher.
'Call erreur(ChkNom, LblNom.Text)
'Call erreur(Chkprenom, LblPrenom.Tag)
'etc
If ChkNom Then CmdNext.Tag = LblNom.Tag & vbNewLine
If Chkprenom Then CmdNext.Tag = CmdNext.Tag & LblPrenom.Tag & vbNewLine
If ChkCP Then CmdNext.Tag = CmdNext.Tag & LblCP.Tag & vbNewLine
If chkCP00 Then CmdNext.Tag = CmdNext.Tag & TxtCP.Tag & vbNewLine
If ChkVille Then CmdNext.Tag = CmdNext.Tag & LblVille.Tag & vbNewLine
If ChkMois Then CmdNext.Tag = CmdNext.Tag & TxtMois.Tag & vbNewLine
If chkAge Then CmdNext.Tag = CmdNext.Tag & LblAns.Tag & vbNewLine
MsgBox("Les erreurs suivantes se sont produites : " & vbNewLine & vbNewLine & CmdNext.Tag, MsgBoxStyle.Exclamation, "Erreur")
End If
REM Après quoi, OK permet de continuer ou de rester.
If OK Then
TmrCaR.Stop() REM fin du timer
Me.Hide() REM cache feuille courante
FrmInput2.Show() REM montre feuille ajout
End If
End Sub
Private Sub CmdAnnul_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdAnnul.Click
TmrCaR.Stop() REM arret du timer
@ -13,9 +142,95 @@ Public Class FrmInput1
FrmAccueil.Show() REM retour a la page d'accueil (show)
End Sub
'Private Sub CmdPre_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
' REM retour au fichier précédant
' Me.Hide()
' FrmEdit.Show()
'End Sub
'Function erreur(ByVal chk As Boolean, ByRef mess As String)
' If chk Then CmdNext.Tag = CmdNext.Tag & mess & vbNewLine
'End Function
Private Sub TxtCP_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TxtCP.KeyPress, TxtMois.KeyPress, TxtAns.KeyPress
If e.KeyChar = vbBack Then
Exit Sub
End If
If e.KeyChar < "0" Or e.KeyChar > "9" Then REM On peut utiliser aussi Not IsNumeric(<Objet>)
e.KeyChar = Chr(0)
End If
End Sub
Private Sub SBHAge_Scroll(ByVal sender As Object, ByVal e As System.Windows.Forms.ScrollEventArgs) Handles SBHAge.Scroll
agea = SBHAge.Value \ 12 REM convertis les mois en années.
TxtAns.Text = agea REM l'affiche
Call conv(Today.Month, agea) REM convertit pour l'affichage de l'age.
TxtMois.Text = Today.Month REM remet le mois au mois pivot, pour ne pas créer d'erreur et parceque la scrollbar ne permet pas de choisir des mois, mais des années.
LblAge.ForeColor = Color.Black REM Comme une valeur choisit par la scrollbar est toujours juste, il ne peut y avoir d'erreur.
LblAns.ForeColor = Color.Black REM idem.
End Sub
'Private Sub SBHAge_ValueChanged1(ByVal sender As Object, ByVal e As System.EventArgs) Handles SBHAge.ValueChanged
' agea = SBHAge.Value / 12
' TxtAns.Text = agea
' Call conv(Today.Month, TxtAns.Text)
' TxtMois.Text = Today.Month
' LblAge.ForeColor = Color.Black
' LblAns.ForeColor = Color.Black
'End Sub
Private Sub TxtMois_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtMois.LostFocus, TxtAns.LostFocus
Dim ans As Integer
Dim mois As Integer
ans = TxtAns.Text
mois = TxtMois.Text
If mois > 12 Then TxtMois.Text = 12 REM Empèche de mettre des mois supérieur a 12
If mois < 1 Then TxtMois.Text = 1 REM et inférieur a 1
Call conv(mois, ans) REM convertit les valeurs entrée pour l'affichage.
If nais > agemin And nais <= agemax Then REM Remet en noir si dans l'interval
LblAge.ForeColor = Color.Black
LblAns.ForeColor = Color.Black
End If
If nais > SBHAge.Minimum And nais <= SBHAge.Maximum Then SBHAge.Value = nais REM replace la scrollbar si dans l'inteval de celle-ci.
End Sub
'Private Sub Txtans_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtAns.LostFocus
' If nais >= SBHAge.Minimum And nais <= SBHAge.Maximum Then
' SBHAge.Value = nais
' End If
'End Sub
REM Cette fonction permet de convertir et d'afficher des mois ou des années,mois en années. Elle prend un delta de mois, un mois ou un année,mois.
Function conv(ByRef mois As Integer, ByRef annee As Integer) As Integer
nais = annee * 12 + mois
'agem = auj - nais REM Pour le développement.
agea = (auj - nais) \ 12
LblAns.Text = agea & " ans"
End Function
Private Sub txtNom_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtNom.LostFocus
If TxtNom.Text <> "" Then LblNom.ForeColor = Color.Black
End Sub
Private Sub txtPrenom_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtPrenom.LostFocus
If TxtPrenom.Text <> "" Then LblPrenom.ForeColor = Color.Black
End Sub
Private Sub txtCP_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtCP.LostFocus
If TxtCP.TextLength = 5 Then LblCP.ForeColor = Color.Black
End Sub
Private Sub txtVille_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtVille.LostFocus
If TxtVille.Text <> "" Then LblVille.ForeColor = Color.Black
End Sub
Private Sub TmrCaR_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TmrCaR.Tick
LblCaR.Tag -= 1 REM décremente le temps
Me.Text = Me.Tag & " | " & FrmAccueil.Horaire & " | Temps restant : " & LblCaR.Tag REM Indicateur compte a rebourt pour la barre de titre
Me.Text = Me.Tag & " | " & Horaire & " | Temps restant : " & LblCaR.Tag REM Indicateur compte a rebourt pour la barre de titre
REM condition d'affichage divers :
If LblCaR.Tag <= 1 Then
@ -38,173 +253,5 @@ Public Class FrmInput1
End If
End Sub
Private Sub FrmIsc2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
LblCaR.Tag = 60 REM initialisation du timer
auj = Today.Year * 12 + Today.Month
agemin = auj - (56 * 12) REM Permet aux personnes ayant 55 ans et quelques mois de se présenter. 56 ans pile est une valeur exclue : Df=[25, 56[
agemax = auj - (25 * 12)
SBHAge.Maximum = agemax + (SBHAge.LargeChange - SBHAge.SmallChange) + 6 REM Le +12 intervient car la Scrollbar va de 0 à 99.
SBHAge.Minimum = agemin + 12
If FrmAccueil.Boule = True Then REM true == édition
Me.Tag = "Assistant édition de candidature (2/4)"
Me.Text = "Assistant édition de candidature (2/4)"
Lbl1.Text = "Editez l'identité du canditat ici :"
TxtNom.Text = FrmAccueil.cddts.Nom
TxtPrenom.Text = FrmAccueil.cddts.Prenom
TxtAdrss.Text = FrmAccueil.cddts.Adresse
TxtCP.Text = FrmAccueil.cddts.CP
TxtVille.Text = FrmAccueil.cddts.Ville
TxtMois.Text = FrmAccueil.cddts.Age Mod 12
TxtAns.Text = FrmAccueil.cddts.Age \ 12
LblAns.Text = conv(FrmAccueil.cddts.Age, 0)
SBHAge.Value = FrmAccueil.cddts.Age
CmdPre.Visible = True
LblCaR.Visible = False
LblID.Visible = True
LblID.Text = "Id : " & FrmEdit.SelectedID REM met d'ID en cas d'édition.
End If
If FrmAccueil.Boule = False Then REM false == inscription
Me.Tag = "Assistant création de candidature (2/4)"
TmrCaR.Start() REM lancement du timer
End If
End Sub
Private Sub CmdNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdNext.Click
Dim OK As Boolean = True
Dim ChkNom, Chkprenom, ChkCP, ChkVille, ChkMois, chkAge As Boolean
ChkNom = False
Chkprenom = False
ChkCP = False
ChkVille = False
ChkMois = False
chkAge = False
CmdNext.Tag = ""
If TxtNom.Text = "" Then
ChkNom = True
OK = False
LblNom.Tag = "• La saisie du nom n'a pas été effectuée."
LblNom.ForeColor = Color.Red
End If
If TxtPrenom.Text = "" Then
Chkprenom = True
OK = False
LblPrenom.Tag = "• La saisie du prénom n'a pas été effectuée."
LblPrenom.ForeColor = Color.Red
End If
If TxtCP.TextLength < 5 Then
ChkCP = True
OK = False
LblCP.Tag = "• La saisie du code postal est vide ou incomplète."
LblCP.ForeColor = Color.Red
End If
If TxtVille.Text = "" Then
ChkVille = True
OK = False
LblVille.Tag = "• La saisie de la ville n'a pas été effectuée."
LblVille.ForeColor = Color.Red
End If
If (nais >= agemax Or nais < agemin) And ChkMois = False Then
chkAge = True
OK = False
LblAns.Tag = "• L'age n'est pas compris entre 25 et 55 ans."
LblAns.ForeColor = Color.Red
LblAge.ForeColor = Color.Red
End If
If OK = False Then
'Call erreur(ChkNom, LblNom.Text)
'Call erreur(Chkprenom, LblPrenom.Tag)
'etc
If ChkNom Then CmdNext.Tag = LblNom.Tag & vbNewLine
If Chkprenom Then CmdNext.Tag = CmdNext.Tag & LblPrenom.Tag & vbNewLine
If ChkCP Then CmdNext.Tag = CmdNext.Tag & LblCP.Tag & vbNewLine
If ChkVille Then CmdNext.Tag = CmdNext.Tag & LblVille.Tag & vbNewLine
If ChkMois Then CmdNext.Tag = CmdNext.Tag & TxtMois.Tag & vbNewLine
If chkAge Then CmdNext.Tag = CmdNext.Tag & LblAns.Tag & vbNewLine
MsgBox("Les erreurs suivantes se sont produites : " & vbNewLine & vbNewLine & CmdNext.Tag, MsgBoxStyle.Exclamation, "Erreur")
End If
If OK Then
TmrCaR.Stop() REM fin du timer
Me.Hide() REM cache feuille courante
FrmInput2.Show() REM montre feuille ajout
End If
End Sub
'Function erreur(ByVal chk As Boolean, ByRef mess As String)
' If chk Then CmdNext.Tag = CmdNext.Tag & mess & vbNewLine
'End Function
Private Sub CmdPre_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdPre.Click
REM retour au fichier précédant
Me.Hide()
FrmEdit.Show()
End Sub
Private Sub TxtCP_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TxtCP.KeyPress, TxtMois.KeyPress, TxtAns.KeyPress
If e.KeyChar = vbBack Then
Exit Sub
End If
If e.KeyChar < "0" Or e.KeyChar > "9" Then REM On peut utiliser aussi Not IsNumeric(<Objet>)
e.KeyChar = Chr(0)
End If
End Sub
'Private Sub SBHAge_Scroll(ByVal sender As Object, ByVal e As System.Windows.Forms.ScrollEventArgs) Handles SBHAge.Scroll
' agea = SBHAge.Value / 12
' TxtAns.Text = agea
' Call conv(Today.Month, TxtAns.Text)
' TxtMois.Text = Today.Month
' LblAge.ForeColor = Color.Black
' LblAnnee.ForeColor = Color.Black
'End Sub
Private Sub SBHAge_ValueChanged1(ByVal sender As Object, ByVal e As System.EventArgs) Handles SBHAge.ValueChanged
agea = SBHAge.Value / 12
TxtAns.Text = agea
Call conv(Today.Month, TxtAns.Text)
TxtMois.Text = Today.Month
LblAge.ForeColor = Color.Black
LblAns.ForeColor = Color.Black
End Sub
Private Sub TxtMois_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtMois.LostFocus, TxtAns.LostFocus
If TxtMois.Text > 12 Then TxtMois.Text = 12
If TxtMois.Text < 1 Then TxtMois.Text = 1
Call conv(TxtMois.Text, TxtAns.Text)
If nais >= agemin And nais <= agemax Then
LblAge.ForeColor = Color.Black
LblAns.ForeColor = Color.Black
End If
End Sub
'Private Sub Txtans_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtAns.LostFocus
' If nais >= SBHAge.Minimum And nais <= SBHAge.Maximum Then
' SBHAge.Value = nais
' End If
'End Sub
Function conv(ByRef mois As Integer, ByRef annee As Integer) As Integer
nais = annee * 12 + mois
agem = auj - nais
agea = agem \ 12
LblAns.Text = agea & " ans"
End Function
Private Sub txtNom_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtNom.LostFocus
If TxtNom.Text <> "" Then LblNom.ForeColor = Color.Black
End Sub
Private Sub txtPrenom_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtPrenom.LostFocus
If TxtPrenom.Text <> "" Then LblPrenom.ForeColor = Color.Black
End Sub
Private Sub txtCP_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtCP.LostFocus
If TxtCP.TextLength = 5 Then LblCP.ForeColor = Color.Black
End Sub
Private Sub txtVille_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtVille.LostFocus
If TxtVille.Text <> "" Then LblVille.ForeColor = Color.Black
End Sub
End Class

129
FrmInput2.Designer.vb generated
View File

@ -31,12 +31,12 @@ Partial Class FrmInput2
Me.LblCaR = New System.Windows.Forms.Label
Me.LblRegion = New System.Windows.Forms.Label
Me.GBOral = New System.Windows.Forms.GroupBox
Me.CheckBox21 = New System.Windows.Forms.CheckBox
Me.CheckBox20 = New System.Windows.Forms.CheckBox
Me.CheckBox19 = New System.Windows.Forms.CheckBox
Me.CheckBox18 = New System.Windows.Forms.CheckBox
Me.CheckBox17 = New System.Windows.Forms.CheckBox
Me.CheckBox16 = New System.Windows.Forms.CheckBox
Me.CheckBox21 = New System.Windows.Forms.CheckBox
Me.CheckBox20 = New System.Windows.Forms.CheckBox
Me.CheckBox19 = New System.Windows.Forms.CheckBox
Me.CheckBox15 = New System.Windows.Forms.CheckBox
Me.CheckBox14 = New System.Windows.Forms.CheckBox
Me.CheckBox13 = New System.Windows.Forms.CheckBox
@ -58,7 +58,6 @@ Partial Class FrmInput2
Me.CmdNext = New System.Windows.Forms.Button
Me.CmdAnnul = New System.Windows.Forms.Button
Me.PictureBox1 = New System.Windows.Forms.PictureBox
Me.CmdPre = New System.Windows.Forms.Button
Me.TmrCaR = New System.Windows.Forms.Timer(Me.components)
Me.Tlt1 = New System.Windows.Forms.ToolTip(Me.components)
Me.LblNbEcr = New System.Windows.Forms.Label
@ -73,7 +72,7 @@ Partial Class FrmInput2
'
Me.CboRegion.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.CboRegion.FormattingEnabled = True
Me.CboRegion.Location = New System.Drawing.Point(181, 27)
Me.CboRegion.Location = New System.Drawing.Point(172, 27)
Me.CboRegion.Name = "CboRegion"
Me.CboRegion.Size = New System.Drawing.Size(104, 21)
Me.CboRegion.TabIndex = 0
@ -155,19 +154,19 @@ Partial Class FrmInput2
Me.LblRegion.AutoSize = True
Me.LblRegion.Location = New System.Drawing.Point(9, 30)
Me.LblRegion.Name = "LblRegion"
Me.LblRegion.Size = New System.Drawing.Size(167, 13)
Me.LblRegion.Size = New System.Drawing.Size(157, 13)
Me.LblRegion.TabIndex = 10
Me.LblRegion.Text = "Choisissez la région de l'examen :"
Me.LblRegion.Text = "Choisissez le centre d'examen :"
Me.Tlt1.SetToolTip(Me.LblRegion, "Sélectionnez la région de passage de vos examens.")
'
'GBOral
'
Me.GBOral.Controls.Add(Me.CheckBox21)
Me.GBOral.Controls.Add(Me.CheckBox20)
Me.GBOral.Controls.Add(Me.CheckBox19)
Me.GBOral.Controls.Add(Me.CheckBox18)
Me.GBOral.Controls.Add(Me.CheckBox17)
Me.GBOral.Controls.Add(Me.CheckBox16)
Me.GBOral.Controls.Add(Me.CheckBox21)
Me.GBOral.Controls.Add(Me.CheckBox20)
Me.GBOral.Controls.Add(Me.CheckBox19)
Me.GBOral.Controls.Add(Me.CheckBox15)
Me.GBOral.Controls.Add(Me.CheckBox14)
Me.GBOral.Controls.Add(Me.CheckBox13)
@ -179,6 +178,39 @@ Partial Class FrmInput2
Me.GBOral.Text = "Passage à l'oral : "
Me.Tlt1.SetToolTip(Me.GBOral, "Choisissez 3 épreuves a l'oral au maximum.")
'
'CheckBox18
'
Me.CheckBox18.AutoSize = True
Me.CheckBox18.Location = New System.Drawing.Point(134, 19)
Me.CheckBox18.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox18.Name = "CheckBox18"
Me.CheckBox18.Size = New System.Drawing.Size(85, 17)
Me.CheckBox18.TabIndex = 25
Me.CheckBox18.Text = "CheckBox18"
Me.CheckBox18.UseVisualStyleBackColor = True
'
'CheckBox17
'
Me.CheckBox17.AutoSize = True
Me.CheckBox17.Location = New System.Drawing.Point(134, 40)
Me.CheckBox17.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox17.Name = "CheckBox17"
Me.CheckBox17.Size = New System.Drawing.Size(85, 17)
Me.CheckBox17.TabIndex = 26
Me.CheckBox17.Text = "CheckBox17"
Me.CheckBox17.UseVisualStyleBackColor = True
'
'CheckBox16
'
Me.CheckBox16.AutoSize = True
Me.CheckBox16.Location = New System.Drawing.Point(134, 61)
Me.CheckBox16.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox16.Name = "CheckBox16"
Me.CheckBox16.Size = New System.Drawing.Size(85, 17)
Me.CheckBox16.TabIndex = 27
Me.CheckBox16.Text = "CheckBox16"
Me.CheckBox16.UseVisualStyleBackColor = True
'
'CheckBox21
'
Me.CheckBox21.AutoSize = True
@ -212,43 +244,10 @@ Partial Class FrmInput2
Me.CheckBox19.Text = "CheckBox19"
Me.CheckBox19.UseVisualStyleBackColor = True
'
'CheckBox18
'
Me.CheckBox18.AutoSize = True
Me.CheckBox18.Location = New System.Drawing.Point(8, 82)
Me.CheckBox18.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox18.Name = "CheckBox18"
Me.CheckBox18.Size = New System.Drawing.Size(85, 17)
Me.CheckBox18.TabIndex = 16
Me.CheckBox18.Text = "CheckBox18"
Me.CheckBox18.UseVisualStyleBackColor = True
'
'CheckBox17
'
Me.CheckBox17.AutoSize = True
Me.CheckBox17.Location = New System.Drawing.Point(8, 103)
Me.CheckBox17.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox17.Name = "CheckBox17"
Me.CheckBox17.Size = New System.Drawing.Size(85, 17)
Me.CheckBox17.TabIndex = 17
Me.CheckBox17.Text = "CheckBox17"
Me.CheckBox17.UseVisualStyleBackColor = True
'
'CheckBox16
'
Me.CheckBox16.AutoSize = True
Me.CheckBox16.Location = New System.Drawing.Point(8, 124)
Me.CheckBox16.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox16.Name = "CheckBox16"
Me.CheckBox16.Size = New System.Drawing.Size(85, 17)
Me.CheckBox16.TabIndex = 18
Me.CheckBox16.Text = "CheckBox16"
Me.CheckBox16.UseVisualStyleBackColor = True
'
'CheckBox15
'
Me.CheckBox15.AutoSize = True
Me.CheckBox15.Location = New System.Drawing.Point(122, 19)
Me.CheckBox15.Location = New System.Drawing.Point(8, 82)
Me.CheckBox15.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox15.Name = "CheckBox15"
Me.CheckBox15.Size = New System.Drawing.Size(85, 17)
@ -259,7 +258,7 @@ Partial Class FrmInput2
'CheckBox14
'
Me.CheckBox14.AutoSize = True
Me.CheckBox14.Location = New System.Drawing.Point(122, 40)
Me.CheckBox14.Location = New System.Drawing.Point(8, 103)
Me.CheckBox14.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox14.Name = "CheckBox14"
Me.CheckBox14.Size = New System.Drawing.Size(85, 17)
@ -270,7 +269,7 @@ Partial Class FrmInput2
'CheckBox13
'
Me.CheckBox13.AutoSize = True
Me.CheckBox13.Location = New System.Drawing.Point(122, 61)
Me.CheckBox13.Location = New System.Drawing.Point(8, 124)
Me.CheckBox13.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox13.Name = "CheckBox13"
Me.CheckBox13.Size = New System.Drawing.Size(85, 17)
@ -336,7 +335,7 @@ Partial Class FrmInput2
'CheckBox9
'
Me.CheckBox9.AutoSize = True
Me.CheckBox9.Location = New System.Drawing.Point(8, 82)
Me.CheckBox9.Location = New System.Drawing.Point(8, 103)
Me.CheckBox9.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox9.Name = "CheckBox9"
Me.CheckBox9.Size = New System.Drawing.Size(79, 17)
@ -347,7 +346,7 @@ Partial Class FrmInput2
'CheckBox8
'
Me.CheckBox8.AutoSize = True
Me.CheckBox8.Location = New System.Drawing.Point(8, 103)
Me.CheckBox8.Location = New System.Drawing.Point(120, 61)
Me.CheckBox8.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox8.Name = "CheckBox8"
Me.CheckBox8.Size = New System.Drawing.Size(79, 17)
@ -358,7 +357,7 @@ Partial Class FrmInput2
'CheckBox7
'
Me.CheckBox7.AutoSize = True
Me.CheckBox7.Location = New System.Drawing.Point(8, 124)
Me.CheckBox7.Location = New System.Drawing.Point(120, 124)
Me.CheckBox7.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox7.Name = "CheckBox7"
Me.CheckBox7.Size = New System.Drawing.Size(79, 17)
@ -369,7 +368,7 @@ Partial Class FrmInput2
'CheckBox6
'
Me.CheckBox6.AutoSize = True
Me.CheckBox6.Location = New System.Drawing.Point(120, 19)
Me.CheckBox6.Location = New System.Drawing.Point(8, 82)
Me.CheckBox6.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox6.Name = "CheckBox6"
Me.CheckBox6.Size = New System.Drawing.Size(79, 17)
@ -380,7 +379,7 @@ Partial Class FrmInput2
'CheckBox5
'
Me.CheckBox5.AutoSize = True
Me.CheckBox5.Location = New System.Drawing.Point(120, 40)
Me.CheckBox5.Location = New System.Drawing.Point(8, 124)
Me.CheckBox5.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox5.Name = "CheckBox5"
Me.CheckBox5.Size = New System.Drawing.Size(79, 17)
@ -391,7 +390,7 @@ Partial Class FrmInput2
'CheckBox4
'
Me.CheckBox4.AutoSize = True
Me.CheckBox4.Location = New System.Drawing.Point(120, 61)
Me.CheckBox4.Location = New System.Drawing.Point(120, 19)
Me.CheckBox4.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox4.Name = "CheckBox4"
Me.CheckBox4.Size = New System.Drawing.Size(79, 17)
@ -402,7 +401,7 @@ Partial Class FrmInput2
'CheckBox3
'
Me.CheckBox3.AutoSize = True
Me.CheckBox3.Location = New System.Drawing.Point(120, 82)
Me.CheckBox3.Location = New System.Drawing.Point(120, 40)
Me.CheckBox3.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox3.Name = "CheckBox3"
Me.CheckBox3.Size = New System.Drawing.Size(79, 17)
@ -413,7 +412,7 @@ Partial Class FrmInput2
'CheckBox2
'
Me.CheckBox2.AutoSize = True
Me.CheckBox2.Location = New System.Drawing.Point(120, 103)
Me.CheckBox2.Location = New System.Drawing.Point(120, 82)
Me.CheckBox2.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox2.Name = "CheckBox2"
Me.CheckBox2.Size = New System.Drawing.Size(79, 17)
@ -424,7 +423,7 @@ Partial Class FrmInput2
'CheckBox1
'
Me.CheckBox1.AutoSize = True
Me.CheckBox1.Location = New System.Drawing.Point(120, 124)
Me.CheckBox1.Location = New System.Drawing.Point(120, 103)
Me.CheckBox1.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox1.Name = "CheckBox1"
Me.CheckBox1.Size = New System.Drawing.Size(79, 17)
@ -482,16 +481,6 @@ Partial Class FrmInput2
Me.PictureBox1.TabIndex = 40
Me.PictureBox1.TabStop = False
'
'CmdPre
'
Me.CmdPre.Location = New System.Drawing.Point(224, 288)
Me.CmdPre.Name = "CmdPre"
Me.CmdPre.Size = New System.Drawing.Size(75, 23)
Me.CmdPre.TabIndex = 6
Me.CmdPre.Text = "< &Précédent"
Me.CmdPre.UseVisualStyleBackColor = True
Me.CmdPre.Visible = False
'
'TmrCaR
'
Me.TmrCaR.Interval = 1000
@ -516,7 +505,7 @@ Partial Class FrmInput2
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(482, 323)
Me.ClientSize = New System.Drawing.Size(482, 327)
Me.ControlBox = False
Me.Controls.Add(Me.LblNbOral)
Me.Controls.Add(Me.LblNbEcr)
@ -530,7 +519,6 @@ Partial Class FrmInput2
Me.Controls.Add(Me.CmdNext)
Me.Controls.Add(Me.CmdAnnul)
Me.Controls.Add(Me.PictureBox1)
Me.Controls.Add(Me.CmdPre)
Me.Controls.Add(Me.LblNP)
Me.Font = New System.Drawing.Font("Tahoma", 8.25!)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
@ -579,20 +567,19 @@ Partial Class FrmInput2
Friend WithEvents CmdNext As System.Windows.Forms.Button
Friend WithEvents CmdAnnul As System.Windows.Forms.Button
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
Friend WithEvents CmdPre As System.Windows.Forms.Button
Friend WithEvents TmrCaR As System.Windows.Forms.Timer
Friend WithEvents Tlt1 As System.Windows.Forms.ToolTip
Friend WithEvents LblNbEcr As System.Windows.Forms.Label
Friend WithEvents LblNbOral As System.Windows.Forms.Label
Friend WithEvents CboFac As System.Windows.Forms.ComboBox
Friend WithEvents LblFac2 As System.Windows.Forms.Label
Friend WithEvents CheckBox15 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox14 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox13 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox21 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox20 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox19 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox18 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox17 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox16 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox15 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox14 As System.Windows.Forms.CheckBox
Friend WithEvents CheckBox13 As System.Windows.Forms.CheckBox
End Class

4
FrmInput2.resx
View File

@ -152,7 +152,7 @@
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////AACgoKCgoKCgoKCg
////////////////////////////////////////////////////////////////LgCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
@ -181,7 +181,7 @@
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKAAAA==
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKAuAA==
</value>
</data>
<metadata name="TmrCaR.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">

171
FrmInput2.vb
View File

@ -1,63 +1,80 @@
Public Class FrmInput2
REM variables public a la feuille (classe)
Dim tme() As String = {"Allemand", "Anglais", "Astronomie", "Biologie", "Espagnol", "Français", "Géographie", "Géologie", "Histoire", "Mathématique", "Philosophie", "Russe"}
Dim tmo() As String = {"Allemand", "Anglais", "Astronomie", "Espagnol", "Histoire", "Russe", "Lancer", "Natation", "Saut"}
Dim treg() As String = {"Auvergne", "Bordelais", "Bretagne", "Morvan", "Nord", "Normandie", "Paris", "Poitou"}
Dim ctro As Integer
Dim ctre As Integer
Dim ctro As Integer REM Compteur d'oral choisit.
Dim ctre As Integer REM Idem pour les ecrits.
Private Sub FrmIsc3_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i As Integer REM pour les for
Dim i As Integer REM Utilise les tableaux pour la compositions des for
Dim CB As CheckBox REM pour les for checkbox
For i = 0 To UBound(treg) REM Charge la liste des régions
CboRegion.Items.Add(treg(i))
Next
i = 0
For Each CB In GBOral.Controls REM Charge l'oral
CB.Text = tme(i)
If i = 8 Then Exit For
i += 1
Next
i = 3
For Each CB In GBEcrit.Controls REM Charge l'écrit
CB.Text = tme(i)
i += 1
Next
i = 0
For Each CB In GBOral.Controls REM Charge l'oral
CB.Text = tmo(i)
i += 1
Next
i = 0
For i = 0 To UBound(treg)
CboRegion.Items.Add(treg(i))
Next
LblNP.Text = FrmInput1.TxtNom.Text & " " & FrmInput1.TxtPrenom.Text REM Reprend le nom et le prénom depuis la feuille input1.
If FrmAccueil.Boule = True Then REM edition
If Boule = True Then REM edition
Me.Tag = "Assistant édition de candidature (3/4)"
CboRegion.SelectedIndex = FrmAccueil.cddts.Region
For Each CB In GBEcrit.Controls
For i = 0 To UBound(FrmAccueil.cddts.Ecrit)
If FrmAccueil.cddts.Ecrit(i) = CB.Text Then CB.Checked = True
Next i
Next
For Each CB In GBOral.Controls
For i = 0 To UBound(FrmAccueil.cddts.Oral)
If FrmAccueil.cddts.Oral(i) = CB.Text Then CB.Checked = True
LblNP.Text = Format(Selectedclef, "00") & " - " & Tindex(Selectedclef - 2).nom & " " & Tindex(Selectedclef - 2).prenom REM Ajoute l'identifiant en cas de modifications.
CboRegion.SelectedIndex = cddts.Region
'For i = 0 To 3
' MsgBox("Ecrit(" & i & ") = " & FrmAccueil.cddts.Ecrit(i) & " -> " & tme(FrmAccueil.cddts.Ecrit(i)))
'Next
'For i = 0 To 3
' MsgBox("Oral(" & i & ") = " & FrmAccueil.cddts.Oral(i) & " -> " & tme(FrmAccueil.cddts.Oral(i)))
'Next
For Each CB In GBEcrit.Controls REM Recompose les CheckBox ECRITS
For i = 0 To 3
If CB.Text = tme(cddts.Ecrit(i)) Then CB.Checked = True
Next
Next
If FrmAccueil.cddts.Fac = Nothing Then
For Each CB In GBOral.Controls REM Recompose les CheckBox ORAUX
For i = 0 To 2
If CB.Text = tme(cddts.Oral(i)) Then CB.Checked = True
Next
Next
REM Retrouve l'examen facultatif
If cddts.Fac = Nothing Then
RBno.Checked = True
Else
RBYes.Checked = True
CboFac.SelectedIndex = FrmAccueil.cddts.Fac
For i = 0 To CboFac.Items.Count - 1
If CboFac.Items.Item(i) = tme(cddts.Fac) Then
CboFac.SelectedIndex = i
End If
Next
CboFac.SelectedIndex = tme(IndexFac)
End If
CmdPre.Visible = True
LblCaR.Visible = False
LblNP.Text = FrmEdit.SelectedID & " - " & FrmInput1.TxtNom.Text & " " & FrmInput1.TxtPrenom.Text REM Ajoute l'identifiant en cas de modifications.
End If
If FrmAccueil.Boule = False Then REM inscription
Me.Tag = "Assistant création de candidature (3/4)"
LblCaR.Tag = 75
RBno.Checked = True
PnlFac.Visible = False
RBno.Checked = True
CboRegion.SelectedIndex = 0 REM met premier en tête...
TmrCaR.Start() REM timer start
End If
If Boule = False Then REM inscription
Me.Tag = "Assistant création de candidature (3/4)"
LblNP.Text = FrmInput1.TxtNom.Text & " " & FrmInput1.TxtPrenom.Text REM Reprend le nom et le prénom depuis la feuille input1.
LblCaR.Tag = 75
RBno.Checked = True
PnlFac.Visible = False
CboRegion.SelectedIndex = 0 REM met premier en tête...
End If
Me.Text = Me.Tag & " | " & Horaire & " | Temps restant : 1:15"
TmrCaR.Start() REM timer start
End Sub
Private Sub CmdAnnul_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdAnnul.Click
TmrCaR.Stop() REM fin timmer
FrmEdit.Close() REM ferme toutes les fenètres...
@ -70,13 +87,13 @@ Public Class FrmInput2
Private Sub TmrCaR_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TmrCaR.Tick
LblCaR.Tag -= 1
If LblCaR.Tag >= 60 Then
Me.Text = Me.Tag & " | " & FrmAccueil.Horaire & " | Temps restant : 1:" & Format(LblCaR.Tag - 60, "00")
Me.Text = Me.Tag & " | " & Horaire & " | Temps restant : 1:" & Format(LblCaR.Tag - 60, "00")
End If
If LblCaR.Tag < 60 And LblCaR.Tag > 0 Then
Me.Text = Me.Tag & " | " & FrmAccueil.Horaire & " | Temps restant : " & LblCaR.Tag
Me.Text = Me.Tag & " | " & Horaire & " | Temps restant : " & LblCaR.Tag
End If
If LblCaR.Tag = 0 Then
Me.Text = Me.Tag & " | " & FrmAccueil.Horaire
Me.Text = Me.Tag & " | " & Horaire
End If
If LblCaR.Tag <= 1 Then
LblCaR.Text = "Vous disposez de " & LblCaR.Tag & " seconde restante."
@ -107,14 +124,30 @@ Public Class FrmInput2
Private Sub CmdNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdNext.Click
'Dim OK As Boolean
Dim i As Integer = 0
REM Convertit l'index du combobox en l'équivalent du tableau tme, et le stocke dans IndexFac, pour la sauvegarde.
For i = 0 To UBound(tme)
If CboFac.SelectedItem = tme(i) Then
IndexFac = i
Exit For
End If
Next
If ctre + ctro = 7 Then
TmrCaR.Stop()
Me.Hide()
FrmInput3.Show()
Else : MsgBox("Vous devez choisir 4 examens écrits et 3 examens oraux. (Vous pouvez dès lors choisir des examens facultatifs.", MsgBoxStyle.Exclamation, "Erreur")
Else : MsgBox("Vous devez choisir 4 examens écrits et 3 examens oraux. (Vous pouvez dès lors choisir des examens facultatifs)", MsgBoxStyle.Exclamation, "Inscription incorrecte")
End If
End Sub
Sub convfac(ByVal index)
Dim i As Integer
For i = 0 To UBound(tme)
If CboFac.SelectedItem = tme(i) Then Exit For
Next
End Sub
Private Sub CmdDelet_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Dim quit As Integer
quit = MsgBox("Vous êtes sur le point de supprimer une candidature. Voulez-vous continuer ?", MsgBoxStyle.YesNo + MsgBoxStyle.Question, "Suppression d'un candidat")
@ -128,32 +161,33 @@ Public Class FrmInput2
End If
End Sub
Private Sub CmdPre_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdPre.Click
REM retour au précédant
Me.Hide()
FrmInput1.Show()
End Sub
'Private Sub CmdPre_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
' REM retour au précédent
' Me.Hide()
' FrmInput1.Show()
'End Sub
REM Dans le panel pour les examens facultatifs
Private Sub RB_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RBno.CheckedChanged, RBYes.CheckedChanged
Private Sub RB_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RBno.CheckedChanged
If RBno.Checked Then
RBYes.Checked = False
LblFac2.Visible = False
CboFac.Visible = False
GBEcrit.Enabled = True
GBOral.Enabled = True
End If
End Sub
REM Dans le panel pour les examens facultatifs
Private Sub RBYes_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RBYes.CheckedChanged
If RBYes.Checked Then
RBno.Checked = False
LblFac2.Visible = True
CboFac.Items.Clear() REM Efface la liste des exams facultatifs
Dim Chb As CheckBox
For Each Chb In GBEcrit.Controls REM Construit la liste des exams facultatifs. Il est plus intelligent de le mettre là plutôt que dans la fonction DeclencheurdeFacultatif car il est recalculé après avoir choisit la possibilité des examens, et non a chaque clique des cases. De plus, ca pose un problème de reset.
If Chb.Checked = False Then CboFac.Items.Add(Chb.Text)
Next
For Each Chb In GBOral.Controls
If Chb.Checked = False Then CboFac.Items.Add(Chb.Text)
If Not Chb.Checked And Chb.Enabled Then CboFac.Items.Add(Chb.Text)
Next
If CheckBox18.Checked = False Then CboFac.Items.Add(CheckBox18.Text)
If CheckBox17.Checked = False Then CboFac.Items.Add(CheckBox17.Text)
If CheckBox16.Checked = False Then CboFac.Items.Add(CheckBox16.Text)
CboFac.Visible = True
CboFac.SelectedIndex = 0 REM met premier en tête...
GBEcrit.Enabled = False
@ -165,7 +199,7 @@ Public Class FrmInput2
If sender.checkstate = CheckState.Checked Then
ctre += 1
If ctre > 4 Then
MsgBox("Vous ne pouvez pas choisir plus de 4 examens ecrits.", MsgBoxStyle.Exclamation, "Erreur")
MsgBox("Vous ne pouvez pas choisir plus de 4 examens ecrits.", MsgBoxStyle.Exclamation, "Trop de choix")
sender.checkstate = CheckState.Unchecked
End If
Else
@ -184,11 +218,11 @@ Public Class FrmInput2
End If
End Sub
Private Sub SecureOralMAX3(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox13.CheckedChanged, CheckBox14.CheckedChanged, CheckBox15.CheckedChanged, CheckBox16.CheckedChanged, CheckBox17.CheckedChanged, CheckBox18.CheckedChanged, CheckBox19.CheckedChanged, CheckBox20.CheckedChanged, CheckBox21.CheckedChanged
Private Sub SecureOralMAX3(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox13.CheckedChanged, CheckBox14.CheckedChanged, CheckBox15.CheckedChanged, CheckBox21.CheckedChanged, CheckBox20.CheckedChanged, CheckBox19.CheckedChanged, CheckBox18.CheckedChanged, CheckBox17.CheckedChanged, CheckBox16.CheckedChanged
If sender.checkstate = CheckState.Checked Then
ctro += 1
If ctro > 3 Then
MsgBox("Vous ne pouvez pas choisir plus de 3 examens oraux.", MsgBoxStyle.Exclamation, "Erreur")
MsgBox("Vous ne pouvez pas choisir plus de 3 examens oraux.", MsgBoxStyle.Exclamation, "Trop de choix")
sender.checkstate = CheckState.Unchecked
End If
Else
@ -220,19 +254,19 @@ Public Class FrmInput2
CheckBox10.Enabled = Not CheckBox19.Checked REM Idem mais en fonction de l'oral
End Sub
Private Sub ChangeEspagnole(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox8.CheckedChanged, CheckBox18.CheckedChanged
CheckBox18.Enabled = Not CheckBox8.Checked REM Active/Désactive la ChB de l'oral en fonction de l'état de la ChB de l'écrit.
CheckBox8.Enabled = Not CheckBox18.Checked REM Idem mais en fonction de l'oral
Private Sub ChangeEspagnol(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox9.CheckedChanged, CheckBox15.CheckedChanged
CheckBox15.Enabled = Not CheckBox9.Checked REM Active/Désactive la ChB de l'oral en fonction de l'état de la ChB de l'écrit.
CheckBox9.Enabled = Not CheckBox15.Checked REM Idem mais en fonction de l'oral
End Sub
Private Sub ChangeHistoire(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox4.CheckedChanged, CheckBox17.CheckedChanged
CheckBox17.Enabled = Not CheckBox4.Checked REM Active/Désactive la ChB de l'oral en fonction de l'état de la ChB de l'écrit.
CheckBox4.Enabled = Not CheckBox17.Checked REM Idem mais en fonction de l'oral
Private Sub ChangeHistoire(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox8.CheckedChanged, CheckBox14.CheckedChanged
CheckBox14.Enabled = Not CheckBox8.Checked REM Active/Désactive la ChB de l'oral en fonction de l'état de la ChB de l'écrit.
CheckBox8.Enabled = Not CheckBox14.Checked REM Idem mais en fonction de l'oral
End Sub
Private Sub ChangeRusse(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged, CheckBox16.CheckedChanged
CheckBox16.Enabled = Not CheckBox1.Checked REM Active/Désactive la ChB de l'oral en fonction de l'état de la ChB de l'écrit.
CheckBox1.Enabled = Not CheckBox16.Checked REM Idem mais en fonction de l'oral
Private Sub ChangeRusse(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox7.CheckedChanged, CheckBox13.CheckedChanged
CheckBox13.Enabled = Not CheckBox7.Checked REM Active/Désactive la ChB de l'oral en fonction de l'état de la ChB de l'écrit.
CheckBox7.Enabled = Not CheckBox13.Checked REM Idem mais en fonction de l'oral
End Sub
Private Sub DeclencheurDeFacultatif()
@ -243,4 +277,5 @@ Public Class FrmInput2
End If
End Sub
End Class

15
FrmInput3.Designer.vb generated
View File

@ -20,7 +20,6 @@ Partial Class FrmInput3
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FrmInput3))
Me.CmdPre = New System.Windows.Forms.Button
Me.Lbl2 = New System.Windows.Forms.Label
Me.Lbl1 = New System.Windows.Forms.Label
Me.LblAge = New System.Windows.Forms.Label
@ -37,16 +36,6 @@ Partial Class FrmInput3
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'CmdPre
'
Me.CmdPre.Location = New System.Drawing.Point(208, 288)
Me.CmdPre.Name = "CmdPre"
Me.CmdPre.Size = New System.Drawing.Size(75, 23)
Me.CmdPre.TabIndex = 2
Me.CmdPre.Text = "< &Précédent"
Me.CmdPre.UseVisualStyleBackColor = True
Me.CmdPre.Visible = False
'
'Lbl2
'
Me.Lbl2.AutoSize = True
@ -180,12 +169,11 @@ Partial Class FrmInput3
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(482, 323)
Me.ClientSize = New System.Drawing.Size(482, 327)
Me.ControlBox = False
Me.Controls.Add(Me.LblID)
Me.Controls.Add(Me.CmdDelet)
Me.Controls.Add(Me.LBexam)
Me.Controls.Add(Me.CmdPre)
Me.Controls.Add(Me.Lbl2)
Me.Controls.Add(Me.Lbl1)
Me.Controls.Add(Me.LblAge)
@ -211,7 +199,6 @@ Partial Class FrmInput3
Me.PerformLayout()
End Sub
Friend WithEvents CmdPre As System.Windows.Forms.Button
Friend WithEvents Lbl2 As System.Windows.Forms.Label
Friend WithEvents Lbl1 As System.Windows.Forms.Label
Friend WithEvents LblAge As System.Windows.Forms.Label

4
FrmInput3.resx
View File

@ -149,7 +149,7 @@
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////gD+goKCgoKCgoKCg
////////////////////////////////////////////////////////////////LgCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
@ -178,7 +178,7 @@
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCAPw==
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKAuAA==
</value>
</data>
<metadata name="$this.Locked" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">

98
FrmInput3.vb
View File

@ -1,55 +1,22 @@
Public Class FrmInput3
Private Sub CmdAnnul_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdAnnul.Click
Me.Close()
FrmNouv.Close()
FrmEdit.Close()
FrmInput1.Close()
FrmInput2.Close()
FrmAccueil.Show()
End Sub
Private Sub CmdNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdNext.Click
If FrmAccueil.Boule = False Then
Call FrmAccueil.InscBdD()
MsgBox("Votre inscription a été effectuée avec succès." & vbCrLf & "Votre numéro de candidature est : " & FrmAccueil.NbID - 1 & vbCrLf & "Gardez le précieusement.", MsgBoxStyle.Information, "Enregistrement réussi.")
FrmInput1.Close()
FrmInput2.Close()
Me.Close()
FrmAccueil.Show() REM retour a l'accueil
End If
If FrmAccueil.Boule = True Then
Call FrmAccueil.MaJBdD()
MsgBox("Votre inscription a été mise à jours avec succès.", MsgBoxStyle.Information, "Mise à jour réussie.")
FrmEdit.Close()
FrmInput1.Close()
FrmInput2.Close()
Me.Close()
FrmAccueil.Show() REM retour a l'accueil
End If
End Sub
Private Sub CmdPre_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdPre.Click
REM retour au précédant
Me.Hide()
FrmInput2.Show()
End Sub
REM INITIALISE
Private Sub FrmInput3_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If FrmAccueil.Boule = False Then
If Boule = False Then
Me.Tag = "Assistant création de candidature (4/4)"
End If
If FrmAccueil.Boule = True Then
Me.Tag = Me.Text = "Assistant édition de candidature (4/4)"
If Boule = True Then
Me.Tag = "Assistant édition de candidature (4/4)"
Call DetectModif()
CmdNext.Text = "&Mettre à jour"
CmdDelet.Visible = True
CmdPre.Visible = True
LblID.Visible = False
LblID.Text = "Id : " & FrmEdit.SelectedID REM met d'ID en cas d'édition.
LblID.Visible = True
LblID.Text = "Id : " & Format(Selectedclef, "00") REM met d'ID en cas d'édition.
End If
Me.Text = Me.Tag & " | " & Horaire
End Sub
REM INITIALISE
Private Sub FrmInput3_VisibleChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.VisibleChanged
REM Reprend et met en forme des informations depuis la feuille input1.
LblNP.Text = FrmInput1.TxtNom.Text & " " & FrmInput1.TxtPrenom.Text
@ -60,6 +27,9 @@ Public Class FrmInput3
REM Reprend et met en forme tous les choix des épreuves depuis la feuille input2.
Dim CB As CheckBox
LBexam.Items.Clear()
LBexam.Items.Add(" Centre :")
LBexam.Items.Add(" " & FrmInput2.CboRegion.SelectedItem)
LBexam.Items.Add(" ")
LBexam.Items.Add("Ecrits :")
For Each CB In FrmInput2.GBEcrit.Controls
If CB.Checked Then
@ -80,13 +50,53 @@ Public Class FrmInput3
LBexam.Items.Add(" ")
End If
End Sub
REM ANNULER
Private Sub CmdAnnul_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdAnnul.Click
FrmEdit.Close()
FrmNouv.Close()
FrmInput1.Close()
FrmInput2.Close()
Me.Close()
FrmAccueil.Show()
End Sub
REM SUIVANT : ENREGISTRER / METTRE A JOUR
Private Sub CmdNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdNext.Click
If Boule = False Then
Call InscBdD()
MsgBox("Votre inscription a été effectuée avec succès." & vbCrLf & "Votre numéro de candidature est : " & ClefMAX - 1 & vbCrLf & "Gardez le précieusement.", MsgBoxStyle.Information, "Enregistrement réussi")
FrmInput1.Close()
FrmInput2.Close()
Me.Close()
FrmAccueil.Show() REM retour a l'accueil
End If
If Boule = True Then
Call MaJBdD()
MsgBox("Votre inscription a été mise à jours avec succès.", MsgBoxStyle.Information, "Mise à jour réussie.")
FrmEdit.Close()
FrmInput1.Close()
FrmInput2.Close()
Me.Close()
FrmAccueil.Show() REM retour a l'accueil
End If
End Sub
'REM PRECEDENT
'Private Sub CmdPre_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
' REM retour au précédant
' Me.Hide()
' FrmInput2.Show()
'End Sub
REM SUPPRIMER LE CANDIDAT
Private Sub CmdDelet_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdDelet.Click
Dim state As Integer
state = MsgBox("Voulez-vous réelement supprimer le candidat n° " & FrmEdit.SelectedID & " ?", MsgBoxStyle.Question & MsgBoxStyle.YesNo, "Confirmation de la supression")
state = MsgBox("Voulez-vous réelement supprimer le candidat n° " & Format(Selectedclef, "00") & " ?", MsgBoxStyle.Question & MsgBoxStyle.YesNo, "Confirmation de la supression")
If state = vbYes Then
Call FrmAccueil.SupprBdD()
Call SupprBdD()
Call CmdAnnul_Click(sender, e)
End If
End Sub
End Class

16
FrmNouv.Designer.vb generated
View File

@ -38,9 +38,9 @@ Partial Class FrmNouv
'
'LblNext
'
Me.LblNext.Location = New System.Drawing.Point(11, 293)
Me.LblNext.Location = New System.Drawing.Point(12, 293)
Me.LblNext.Name = "LblNext"
Me.LblNext.Size = New System.Drawing.Size(278, 18)
Me.LblNext.Size = New System.Drawing.Size(276, 18)
Me.LblNext.TabIndex = 19
Me.LblNext.Text = "Cliquez sur Suivant pour contiuer."
Me.LblNext.TextAlign = System.Drawing.ContentAlignment.TopRight
@ -49,10 +49,10 @@ Partial Class FrmNouv
'
Me.LblWarn.BackColor = System.Drawing.Color.White
Me.LblWarn.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.LblWarn.Location = New System.Drawing.Point(195, 149)
Me.LblWarn.Location = New System.Drawing.Point(192, 149)
Me.LblWarn.Margin = New System.Windows.Forms.Padding(5, 5, 5, 10)
Me.LblWarn.Name = "LblWarn"
Me.LblWarn.Size = New System.Drawing.Size(245, 110)
Me.LblWarn.Size = New System.Drawing.Size(278, 110)
Me.LblWarn.TabIndex = 15
Me.LblWarn.Text = "Attention : Vous n'aurez qu'une minute (1:00) pour renseigner votre identité, et " & _
"une minute quinze secondes (1:15) pour choisir vos examens."
@ -93,7 +93,7 @@ Partial Class FrmNouv
'
'CmdNext
'
Me.CmdNext.Location = New System.Drawing.Point(304, 288)
Me.CmdNext.Location = New System.Drawing.Point(303, 288)
Me.CmdNext.Name = "CmdNext"
Me.CmdNext.Size = New System.Drawing.Size(75, 23)
Me.CmdNext.TabIndex = 10
@ -102,7 +102,7 @@ Partial Class FrmNouv
'
'CmdAnnul
'
Me.CmdAnnul.Location = New System.Drawing.Point(396, 288)
Me.CmdAnnul.Location = New System.Drawing.Point(395, 288)
Me.CmdAnnul.Name = "CmdAnnul"
Me.CmdAnnul.Size = New System.Drawing.Size(75, 23)
Me.CmdAnnul.TabIndex = 11
@ -132,7 +132,7 @@ Partial Class FrmNouv
'PictureBox4
'
Me.PictureBox4.Image = CType(resources.GetObject("PictureBox4.Image"), System.Drawing.Image)
Me.PictureBox4.Location = New System.Drawing.Point(177, 147)
Me.PictureBox4.Location = New System.Drawing.Point(174, 149)
Me.PictureBox4.Name = "PictureBox4"
Me.PictureBox4.Size = New System.Drawing.Size(16, 16)
Me.PictureBox4.SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize
@ -143,7 +143,7 @@ Partial Class FrmNouv
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(482, 323)
Me.ClientSize = New System.Drawing.Size(482, 327)
Me.ControlBox = False
Me.Controls.Add(Me.PictureBox4)
Me.Controls.Add(Me.PictureBox3)

895
FrmNouv.resx
View File

@ -149,7 +149,7 @@
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////h0OgoKCgoKCgoKCg
////////////////////////////////////////////////////////////////AAKgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
@ -178,448 +178,448 @@
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCHQw==
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKAAAg==
</value>
</data>
<data name="PictureBox2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
Qk1eZgAAAAAAAD4AAAAoAAAAQgIAAFgBAAABAAEAAAAAAAAAAADEDgAAxA4AAAIAAAACAAAAAAAA////
////////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAP//////////////////
/////////////////////////////////////////////////////////////////////////////8AA
AAD/////////////////////////////////////////////////////////////////////////////
///////////////////AAAAA////////////////////////////////////////////////////////
////////////////////////////////////////wAAAAP//////////////////////////////////
/////////////////////////////////////////////////////////////8AAAAD/////////////
////////////////////////////////////////////////////////////////////////////////
///AAAAA////////////////////////////////////////////////////////////////////////
////////////////////////wAAAAP//////////////////////////////////////////////////
/////////////////////////////////////////////8AAAAD/////////////////////////////
///////////////////////////////////////////////////////////////////AAAAA////////
////////////////////////////////////////////////////////////////////////////////
////////wAAAAP//////////////////////////////////////////////////////////////////
/////////////////////////////8AAAAD/////////////////////////////////////////////
///////////////////////////////////////////////////AAAAA////////////////////////
////////////////////////////////////////////////////////////////////////wAAAAP//
////////////////////////////////////////////////////////////////////////////////
/////////////8AAAAD/////////////////////////////////////////////////////////////
///////////////////////////////////AAAAA////////////////////////////////////////
////////////////////////////////////////////////////////wAAAAA==
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCf//////////////////
/////////////////////////////////////////////////////////////////////////////8Ax
Gwn/////////////////////////////////////////////////////////////////////////////
///////////////////AMRsJ////////////////////////////////////////////////////////
////////////////////////////////////////wDEbCf//////////////////////////////////
/////////////////////////////////////////////////////////////8AxGwn/////////////
////////////////////////////////////////////////////////////////////////////////
///AMRsJ////////////////////////////////////////////////////////////////////////
////////////////////////wDEbCf//////////////////////////////////////////////////
/////////////////////////////////////////////8AxGwn/////////////////////////////
///////////////////////////////////////////////////////////////////AMRsJ////////
////////////////////////////////////////////////////////////////////////////////
////////wDEbCf//////////////////////////////////////////////////////////////////
/////////////////////////////8AxGwn/////////////////////////////////////////////
///////////////////////////////////////////////////AMRsJ////////////////////////
////////////////////////////////////////////////////////////////////////wDEbCf//
////////////////////////////////////////////////////////////////////////////////
/////////////8AxGwn/////////////////////////////////////////////////////////////
///////////////////////////////////AMRsJ////////////////////////////////////////
////////////////////////////////////////////////////////wDEbCQ==
</value>
</data>
<data name="PictureBox3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@ -1280,17 +1280,16 @@
<data name="PictureBox4.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAAlwSFlzAAALEgAA
CxIB0t1+/AAAAgZJREFUOE+Vkt1LU2Ecx5/hGhhCMyQyhhcK3Quni8CL/QledNGRCNMabmxJiYGGF5Ig
SMHCCyNFukhyIWqI2sssIhKNrWwv7V3XPG6TvUo1kW1+O89zcLncIh/4HL78nsPn+V78ZBAPKXP29/OE
Ipcryv1CCBWUOvl8DtprFdC3K5DN7pX7DWUF8y8GMGtqxeu5TsxO3T2eIJNJ46amEqmEDemkHd2GaiTi
30tKSjaYmuyGeUEP99deOCx6fHzXC9PTzv8TCJs28cVTiEeX8HbmJMzTJxALz6O/RwWf58MRyZEGE0+0
WH1/G+vOLritPMNv12FtpQ9jIy3/FricS+JLZxEJGhGwX4FarWb4bTwiG0O4f68eq8sTRZKiBo+GL+Hz
8g34rI0IufiCgGb3pwZ41rowNNBUWkDNxsE6RANt8K4QRHw8OI5j0CzNWvDYeB7mV8aCpNCAml2WZmw5
ahH6QhAP8lCpVAya6UywKRF0XEZHqwx00dgW08+bxQcYfXgOyY2L2P5GGDsCD6VSyaD5YJ5Yb4RpvB5z
M/2SgK6prk0GwclhJ1CJtJ8wfmxy+BXlGTQfzNMBBba9F8RFq0AqKYDQNX02Wo3drVpkQqTAXvxPA5oP
3+0KNXj5/AzowhHDdenFbLiYXIxDLsVLiPnv+59Bgjt6IjW4pT0NzVVyLAyaKtbgNynK9bSEvXQBAAAA
AElFTkSuQmCC
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAAlwSFlzAAALEAAA
CxABrSO9dQAAAftJREFUOE+Vkt1Lk2EYhx+RBCNoRkTG6MCgc2EdBB3sT+igg16JMKvRZEtKDDI6kIRA
ChYdFBnRQVILSUPscxYRiYaW7aNNt+mar27ivqSayCZXe97harmNeuCCH/fzvtfzO7gFFc76epZMZq3S
J4hyt/Jn84lqLCdrKkrKCoafdjNob+bVUBuD/ZfKtigpSKdTnDXVkow7SSVcdFjriMe+lZSUFPQ/6sDx
zILvSyfuCQsf3nZif9D2bwJ13pl7cTux6AhvBrbieLKF5cVhui7q8U+/3yTZ1KDvvpnxd+eZ9bTjm1Q0
Aq5WpsYuc/dWU2WB1zOSe2k3kZCNoOsYRqNRI+BUiMz1cO1KA+OjfUWSoga3bx7h0+hp/JONhL1KQSCz
7+M+pqfa6ek+VFogzbare4kGW5gZE0T8CgaDQUPm/KyJO7b9OF7aCpJCA2n2ThxmwV1P+LMgFlLQ6/Ua
MsuZ6tQRch/lTHMVctHk0QSvn1+n98YeEnMHWfoqNFZUBZ1OpyHzxjw+24j9XgNDA115gdz11pYqVI+B
lWAtqYDQ+D5v4GdU0ZB5Y54K1rA0cyC3aNUkEypCrunD3jpWF+pJh0WBtdjvBjL/ebeq7uTF413IhRPW
U/kXM4vFZJcNZJNKnlz++/5HSHDBIvINzpl3YDou/guraZvW4Bf+EytxAKqx/wAAAABJRU5ErkJggg==
</value>
</data>
</root>

180
FrmStart.Designer.vb generated Normal file
View File

@ -0,0 +1,180 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class FrmStart
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.components = New System.ComponentModel.Container
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FrmStart))
Me.CmdSave = New System.Windows.Forms.Button
Me.CmdOpen = New System.Windows.Forms.Button
Me.LstFile = New System.Windows.Forms.ListBox
Me.PictureBox1 = New System.Windows.Forms.PictureBox
Me.Lbl1 = New System.Windows.Forms.Label
Me.CmdExit = New System.Windows.Forms.Button
Me.PictureBox2 = New System.Windows.Forms.PictureBox
Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
Me.Lbl2 = New System.Windows.Forms.Label
Me.PictureBox3 = New System.Windows.Forms.PictureBox
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'CmdSave
'
Me.CmdSave.Location = New System.Drawing.Point(223, 106)
Me.CmdSave.Name = "CmdSave"
Me.CmdSave.Size = New System.Drawing.Size(120, 23)
Me.CmdSave.TabIndex = 18
Me.CmdSave.Text = "&Nouvelle base ..."
Me.CmdSave.UseVisualStyleBackColor = True
'
'CmdOpen
'
Me.CmdOpen.Enabled = False
Me.CmdOpen.Location = New System.Drawing.Point(223, 135)
Me.CmdOpen.Name = "CmdOpen"
Me.CmdOpen.Size = New System.Drawing.Size(120, 23)
Me.CmdOpen.TabIndex = 17
Me.CmdOpen.Text = "&Ouvrir une base..."
Me.CmdOpen.UseVisualStyleBackColor = True
'
'LstFile
'
Me.LstFile.BackColor = System.Drawing.SystemColors.ControlLightLight
Me.LstFile.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.LstFile.Enabled = False
Me.LstFile.FormattingEnabled = True
Me.LstFile.Location = New System.Drawing.Point(15, 134)
Me.LstFile.Name = "LstFile"
Me.LstFile.Size = New System.Drawing.Size(163, 171)
Me.LstFile.TabIndex = 16
Me.ToolTip1.SetToolTip(Me.LstFile, "Double-cliquez sur un fichier pour l'ouvrir.")
'
'PictureBox1
'
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
Me.PictureBox1.Location = New System.Drawing.Point(0, 0)
Me.PictureBox1.Name = "PictureBox1"
Me.PictureBox1.Size = New System.Drawing.Size(750, 55)
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize
Me.PictureBox1.TabIndex = 15
Me.PictureBox1.TabStop = False
'
'Lbl1
'
Me.Lbl1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Lbl1.BackColor = System.Drawing.Color.White
Me.Lbl1.Location = New System.Drawing.Point(12, 58)
Me.Lbl1.Name = "Lbl1"
Me.Lbl1.Size = New System.Drawing.Size(424, 36)
Me.Lbl1.TabIndex = 14
Me.Lbl1.Text = "Pour commencer, vous pouvez créer une nouvelle base de candidature, ou en ouvrir " & _
"une déjà existante."
'
'CmdExit
'
Me.CmdExit.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.CmdExit.Location = New System.Drawing.Point(361, 322)
Me.CmdExit.Name = "CmdExit"
Me.CmdExit.Size = New System.Drawing.Size(75, 23)
Me.CmdExit.TabIndex = 20
Me.CmdExit.Text = "&Quitter"
Me.CmdExit.UseVisualStyleBackColor = True
'
'PictureBox2
'
Me.PictureBox2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.PictureBox2.Image = CType(resources.GetObject("PictureBox2.Image"), System.Drawing.Image)
Me.PictureBox2.Location = New System.Drawing.Point(0, 314)
Me.PictureBox2.MaximumSize = New System.Drawing.Size(550, 2)
Me.PictureBox2.Name = "PictureBox2"
Me.PictureBox2.Size = New System.Drawing.Size(550, 2)
Me.PictureBox2.TabIndex = 21
Me.PictureBox2.TabStop = False
'
'ToolTip1
'
Me.ToolTip1.IsBalloon = True
Me.ToolTip1.ToolTipIcon = System.Windows.Forms.ToolTipIcon.Info
Me.ToolTip1.ToolTipTitle = "Information"
'
'Lbl2
'
Me.Lbl2.AutoSize = True
Me.Lbl2.BackColor = System.Drawing.Color.White
Me.Lbl2.Enabled = False
Me.Lbl2.Location = New System.Drawing.Point(12, 111)
Me.Lbl2.Name = "Lbl2"
Me.Lbl2.Size = New System.Drawing.Size(88, 13)
Me.Lbl2.TabIndex = 22
Me.Lbl2.Text = "Fichier existants :"
'
'PictureBox3
'
Me.PictureBox3.Image = CType(resources.GetObject("PictureBox3.Image"), System.Drawing.Image)
Me.PictureBox3.Location = New System.Drawing.Point(0, 49)
Me.PictureBox3.Name = "PictureBox3"
Me.PictureBox3.Size = New System.Drawing.Size(451, 267)
Me.PictureBox3.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox3.TabIndex = 23
Me.PictureBox3.TabStop = False
'
'FrmStart
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(448, 357)
Me.Controls.Add(Me.Lbl2)
Me.Controls.Add(Me.PictureBox2)
Me.Controls.Add(Me.CmdExit)
Me.Controls.Add(Me.CmdSave)
Me.Controls.Add(Me.CmdOpen)
Me.Controls.Add(Me.LstFile)
Me.Controls.Add(Me.PictureBox1)
Me.Controls.Add(Me.Lbl1)
Me.Controls.Add(Me.PictureBox3)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MaximizeBox = False
Me.Name = "FrmStart"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Candidat 7 Pro"
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents CmdSave As System.Windows.Forms.Button
Friend WithEvents CmdOpen As System.Windows.Forms.Button
Friend WithEvents LstFile As System.Windows.Forms.ListBox
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
Friend WithEvents Lbl1 As System.Windows.Forms.Label
Friend WithEvents CmdExit As System.Windows.Forms.Button
Friend WithEvents PictureBox2 As System.Windows.Forms.PictureBox
Friend WithEvents ToolTip1 As System.Windows.Forms.ToolTip
Friend WithEvents Lbl2 As System.Windows.Forms.Label
Friend WithEvents PictureBox3 As System.Windows.Forms.PictureBox
End Class

1538
FrmStart.resx Normal file
View File

File diff suppressed because it is too large Load Diff

45
FrmStart.vb Normal file
View File

@ -0,0 +1,45 @@
Public Class FrmStart
Private Sub CmdExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdExit.Click
Application.Exit()
End Sub
Private Sub FrmStart_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim Dossier As String
Dossier = My.Computer.FileSystem.CurrentDirectory
LstFile.Items.Add(My.Computer.FileSystem.GetFiles(Dossier).ToString)
End Sub
Private Sub CmdOpen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdOpen.Click
Dim OpF As New OpenFileDialog
OpF.FileName = ""
OpF.Title = "Ouvrir un fichier Candidat 7 Pro"
OpF.Filter = "Fichier Candidate 7 Pro (*.C7P)|*.C7P"
OpF.ShowDialog()
nf = FreeFile()
FileOpen(nf, OpF.FileName, OpenMode.Random, OpenAccess.ReadWrite, OpenShare.Shared, lgcddts)
Me.Hide()
FrmAccueil.Show()
End Sub
Private Sub CmdSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdSave.Click
ReDim cddts.Ecrit(3)
ReDim cddts.Oral(2)
ReDim Tindex(3)
cddts.CP = ClefMAX REM ClefMAX qui est initialisé a 1.
Boule = False
nf = FreeFile()
lgcddts = Len(cddts) REM REF au mail de DG : La longeur de cddts n'est pas la même une fois le tableau redimentionné, il faut donc recalculer ladire longueur.
FileOpen(nf, "Candidats.C7P", OpenMode.Random, OpenAccess.ReadWrite, OpenShare.Shared, lgcddts) REM FileOpen(...ared, Len(cddts)) ne pourrait-il pas marcher vue que les tableaux ont étés modifés avant ?
FilePut(nf, cddts, ClefMAX)
ClefMAX += 1 REM Il passe a 2 pour la prochaine clef dans le fichier.
Me.Hide()
FrmAccueil.Show()
End Sub
End Class

55
LISEZ MOI.txt
View File

@ -13,48 +13,73 @@ Dans l'ensemble, le programme apparais maintenant comme stable.
>>> A faire pour la Release Candidate :
1) Activer les Timers : #DESACTIVES
FrmInput1.vb Ligne 46, Caractère 13
FrmInput2.vb Ligne 35, Caractère 13
2) Activer les contraites de saisies : #DESACTIVES
FrmInput1.vb Private Sub CmdNext_Click
FrmInput2.vb
1) Activer les Timers : #ACTIVES
FrmInput1.vb ACTIVES
FrmInput2.vb ACTIVES
2) Activer les contraites de saisies : #ACTIVES
FrmEdit.vb ACTIVES
FrmInput1.vb ACTIVES
FrmInput2.vb ACTIVES
Renommer les nom de fonction pour correspondre aux Handles
>>> Difficultées & Avancement :
Globalement :
• Renommer les nom de fonction pour correspondre aux Handles
• [Résolu] IMPORTANT : ACTIVER LES TIMERS pour l'édition d'une candidature !!!
• Prévoir un système de "Soft-Reset" par appel de fonctions faites pour, plutot que de passer par du Hard-reset (.close; .show)
REMARQUE : Le soft-reset peut passer par un système de load de feuilles, car cette fonction est destinné a les préparer (Problème : Timers).
Le Soft-reset et le load d'une feuille peuvent simplement appeler une fonction d'initialisation.
• [Résolu] IMPORTANT : Choisir l'item du facultatif dans FrmInput2.vb, faire une correspondance avec le tableau et stoquer l'indice du tableau dans les variables.
FrmAccueil :
• Design satisfaisant.
• Quelques fonctions sont manquantes.
• Améliorer la structure de sauvegarde : Faire appel a des indexs pour stoquer Ecrit et Oral plutot que les nom de variables ?
• [Résolu] Améliorer la structure de sauvegarde : Faire appel a des indexs pour stoquer Ecrit et Oral plutot que les nom de variables ?
FrmEdit :
• La textbox et la combobox n'ont pas encore étés programmées.
• Repenser la programmation du CmdNext, pas clair.
• Lors du test de la selection de l'ID, ajouter un "=" a "Or Selectedclef < 1" pour empècher de choisir la première clef.
Remarque : Même comme cela, ça marche.
• [Résolu] Bogue si on entre rien.
• Programmer CmdNext pour réinitaliser les autres feuilles qu'en cas de modifications. (soft-reset)
(Appeler les loads ?)
FrmNouv :
FrmBilan :
• Beaucoup de chose à faire.
• Utiliser l'indice du tableau pour chercher dans le tableau d'ecrit, puit d'oral, puis le facultatif (seulement)
FrmAff :
• Beaucoup de chose à faire.
FrmInput1 :
• Il existe une erreur lors de la sélection d'un age à 25 ans par la scrollbar : Elle est refusée par le vérificateur.
• Programmer un soft-reset.
• [Résolu] Il existe une erreur lors de la sélection d'un age à 25 ans par la scrollbar : Elle est refusée par le vérificateur.
[Résolu]
Problème : L'âge n'est pas entre 25 et 55 ans, mais entre 1955 (Today.year - 25 et Today.year - 55) et 1985.
Solution : FAUX : L'age se sélectionne de deux manières : Par la scrollbar en age, OU par la saisie du mois et de l'année de naissance.
• L'âge doit être maintenant obtenue par le calcul.
• [Résolu] L'âge doit être maintenant obtenue par le calcul.
• [Résolu] trouver un .tag pour erreur cp00.
FrmInput2 :
• La liste des factultatifs présentes des ecrits et des oraux. Les écrits doivent êtres convertit en oraux.
• Programmer un soft-reset.
• [Résolu] Les écrits et les oraux doivent êtres indexés.
FrmInput3 :
• Faire des testes de robustesse (Edition, Suppression).
[Résolu]
• Il existe des dysfonctionnements dans la procédure de sauvegarde : Un élément supprimé est définitivement choisit pour modification.
[Résolu]
Problème : Comment mettre a jour les élément de la fonction alors que la feuille est simplement cachée (.hide)
Solution : Utiliser .visible
Solution : Utiliser .visiblechange ou .enable
Question : Cela ne risque-t-il pas de ne pas initialiser la feuille du tout au premier démarrage ?
Réponse : Aucune gène observée.

BIN
Logo16-16.ico Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 25 KiB

BIN
Logo64-64.ico Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 128 KiB

BIN
Logo64.ico Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 41 KiB

180
Module1.vb Normal file
View File

@ -0,0 +1,180 @@
Module Module1
Structure PERS
<VBFixedString(8)> Dim Nom As String
<VBFixedString(6)> Dim Prenom As String
<VBFixedString(10)> Dim Adresse As String
<VBFixedString(5)> Dim CP As Integer
<VBFixedString(15)> Dim Ville As String
<VBFixedString(5)> Dim Age As Integer REM Stocke la date de naissance en mois (plus facile pour convertir après)
<VBFixedString(1)> Dim Region As Integer REM Stocke l'index
<VBFixedArray(16)> Dim Ecrit() As Integer REM index
<VBFixedArray(16)> Dim Oral() As Integer REM index
<VBFixedString(2)> Dim Fac As Integer REM Stocke l'index
End Structure
Structure Index
'Dim no As Integer
Dim nom As String
Dim prenom As String
Dim Suppr As Boolean
End Structure
Public tme() As String = {"Lancer", "Natation", "Saut", "Allemand", "Anglais", "Astronomie", "Espagnol", "Histoire", "Russe", "Biologie", "Français", "Géographie", "Géologie", "Mathématique", "Philosophie"}
Public nais As Integer REM en mois. ANS*12 + MOIS
Public cddts As PERS REM sert de "Tampon" entre les données entrées dans les feuilles et le fichier.
Public Tindex() As Index REM Sert pour le bilan des supprimés, et pour générer la liste des candidats valides (sans consulter le fichier).
Public Boule As Boolean REM inscription ou édition
Public Horaire As String REM Sert a stoquer l'heure pour les autres fenetres QUI ONT DES TIMERS.
Public nf As Integer REM Numéro de flux.
Public lgcddts As Integer REM Sert a obtenir la bonne longueur.
Public ClefMAX As Integer = 1 REM Dernier/Nombre de candidats dans le Fichier.
Public PosMAX As Integer = 0 REM Dernier/Nombre de candidats dans le tableau de structure.
REM Pour s'y retrouver entre ClefMAX et PosMAX :
REM ClefMAX indique le nombre de clefs dans le fichier.
REM PosMAX indique le nombre de poste dans le tableau d'index.
REM La relation entre ces deux variables sont PosMAX = ClefMAX - 2. Le premier candidat stocké dans le fichier (clef = 2), il a la position 0 dans le fichier.
Public IndexFac As Integer REM Retient l'index de l'examen (du tableau) pour l'examen facultatif. L'ancien index retenait la position dans la CboBox, et ne correspondait pas toujours a celui du tableau.
Public Selectedclef As Integer REM Pour la feuille FrmEdit : elle contient le n° d'inscription choisit donné par l'utilisateur
Public Sub InscBdD()
If ClefMAX - 3 >= UBound(Tindex) Then
ReDim Preserve Tindex(2)
End If
REM Entrée depuis la feuille 1
cddts.Nom = FrmInput1.TxtNom.Text
cddts.Prenom = FrmInput1.TxtPrenom.Text
cddts.Adresse = FrmInput1.TxtAdrss.Text
cddts.CP = FrmInput1.TxtCP.Text
cddts.Ville = FrmInput1.TxtVille.Text
cddts.Age = nais
'Tindex(ClefMAX - 2).no = ClefMAX
Tindex(PosMAX).nom = cddts.Nom
Tindex(PosMAX).prenom = cddts.Prenom
REM Entrée depuis la feuille 2
cddts.Region = FrmInput2.CboRegion.SelectedIndex
Dim b As CheckBox
Dim j As Integer = 0
Dim i As Integer = 0
For Each b In FrmInput2.GBEcrit.Controls
If b.Checked Then
cddts.Ecrit(j) = i + 3
j += 1
End If
If j >= 4 Then Exit For
i += 1
Next
j = 0
i = 0
For Each b In FrmInput2.GBOral.Controls
If b.Checked Then
cddts.Oral(j) = i
If j >= 3 Then Exit For
j += 1
End If
i += 1
Next
If FrmInput2.RBYes.Checked Then cddts.Fac = IndexFac
MsgBox(cddts.Fac)
REM Entrée depuis la feuille 3
Tindex(PosMAX).Suppr = False
REM Sauvegarde
FilePut(nf, cddts, ClefMAX)
FilePut(nf, cddts.CP = ClefMAX, 1)
ClefMAX += 1
PosMAX += 1
End Sub
Public Sub MaJBdD()
REM EST-IL NECESSAIRE DE FAIRE DES TESTS POUR VOIR DES MODIFICATIONS UTILISATEURS, OU MODIFIER TOUT DE MÊME ?
REM OUI.
REM Entrée depuis la feuille 1
cddts.Nom = FrmInput1.TxtNom.Text
cddts.Prenom = FrmInput1.TxtPrenom.Text
cddts.Adresse = FrmInput1.TxtAdrss.Text
cddts.CP = FrmInput1.TxtCP.Text
cddts.Ville = FrmInput1.TxtVille.Text
cddts.Age = nais
REM Entrée depuis la feuille 2
cddts.Region = FrmInput2.CboRegion.SelectedIndex
Dim b As CheckBox
Dim j As Integer = 0
Dim i As Integer = 0
For Each b In FrmInput2.GBEcrit.Controls
If b.Checked Then
cddts.Ecrit(j) = i + 3
j += 1
End If
If j >= 4 Then Exit For
i += 1
Next
j = 0
i = 0
For Each b In FrmInput2.GBOral.Controls
If b.Checked Then
cddts.Oral(j) = i
If j >= 3 Then Exit For
j += 1
End If
i += 1
Next
If FrmInput2.RBYes.Checked Then
cddts.Fac = IndexFac
End If
REM Sauvegarde
FilePut(nf, cddts, Selectedclef)
End Sub
Public Sub SupprBdD()
Dim i As Integer = 0
REM Entrée depuis la feuille 1
cddts.Nom = ""
cddts.Prenom = ""
cddts.Adresse = ""
cddts.CP = 0
cddts.Ville = ""
cddts.Age = 0
REM Entrée depuis la feuille 2
For i = 0 To UBound(cddts.Ecrit) - 1
cddts.Ecrit(i) = 0
Next
For i = 0 To UBound(cddts.Oral) - 1
cddts.Oral(i) = 0
Next
cddts.Fac = 0
cddts.Region = 0
Tindex(Selectedclef - 2).Suppr = True
FilePut(nf, cddts, Selectedclef)
End Sub
Public Sub LectBdD() REM destiné a évoluer
Dim i As Integer
For i = 0 To PosMAX - 1 REM UBound(Tindex) -1, car le tableau est déjà alloué, mais ajoute des items vides dans CBNP.
'MsgBox("i : " & i & vbNewLine & "ClefMax : " & ClefMAX & vbNewLine & "Nom : " & Tindex(i).nom)
If Tindex(i).Suppr = False Then
FrmEdit.CBNP.Items.Add(Format(i + 2, "00") & " - " & Tindex(i).nom & " " & Tindex(i).prenom)
End If
'FileGet(nf, cddts, i)
'FrmEdit.CBNP.Items.Add(Format(i + 2, "00") & " - " & cddts.Nom & " " & cddts.Prenom)
Next i
End Sub
Sub DetectModif()
End Sub
End Module

2
My Project/Application.Designer.vb generated
View File

@ -1,7 +1,7 @@
'------------------------------------------------------------------------------
' <auto-generated>
' Ce code a été généré par un outil.
' Version du runtime :2.0.50727.4927
' Version du runtime :2.0.50727.3603
'
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
' le code est régénéré.

4
My Project/AssemblyInfo.vb
View File

@ -33,7 +33,7 @@ Imports System.Runtime.InteropServices
' en utilisant '*', comme indiqué ci-dessous :
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("7.0.5.30")>
<Assembly: AssemblyFileVersion("7.0.5.30")>
<Assembly: AssemblyVersion("7.0.8.22")>
<Assembly: AssemblyFileVersion("7.0.8.22")>
<Assembly: NeutralResourcesLanguageAttribute("fr")>

39
My Project/Resources.Designer.vb generated
View File

@ -1,26 +1,27 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:2.0.50727.4927
' Ce code a été généré par un outil.
' Version du runtime :2.0.50727.3603
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
' le code est régénéré.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Imports System
Namespace My.Resources
'This class was auto-generated by the StronglyTypedResourceBuilder
'class via a tool like ResGen or Visual Studio.
'To add or remove a member, edit your .ResX file then rerun ResGen
'with the /str option, or rebuild your VS project.
'<summary>
' A strongly-typed resource class, for looking up localized strings, etc.
'</summary>
'Cette classe a été générée automatiquement par la classe StronglyTypedResourceBuilder
'à l'aide d'un outil, tel que ResGen ou Visual Studio.
'Pour ajouter ou supprimer un membre, modifiez votre fichier .ResX, puis réexécutez ResGen
'avec l'option /str ou régénérez votre projet VS.
'''<summary>
''' Une classe de ressource fortement typée destinée, entre autres, à la consultation des chaînes localisées.
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "2.0.0.0"), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
@ -31,9 +32,9 @@ Namespace My.Resources
Private resourceCulture As Global.System.Globalization.CultureInfo
'<summary>
' Returns the cached ResourceManager instance used by this class.
'</summary>
'''<summary>
''' Retourne l'instance ResourceManager mise en cache utilisée par cette classe.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
Get
@ -45,16 +46,16 @@ Namespace My.Resources
End Get
End Property
'<summary>
' Overrides the current thread's CurrentUICulture property for all
' resource lookups using this strongly typed resource class.
'</summary>
'''<summary>
''' Remplace la propriété CurrentUICulture du thread actuel pour toutes
''' les recherches de ressources à l'aide de cette classe de ressource fortement typée.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend Property Culture() As Global.System.Globalization.CultureInfo
Get
Return resourceCulture
End Get
Set(ByVal value As Global.System.Globalization.CultureInfo)
Set
resourceCulture = value
End Set
End Property

46
My Project/Settings.Designer.vb generated
View File

@ -1,10 +1,10 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:2.0.50727.4927
' Ce code a été généré par un outil.
' Version du runtime :2.0.50727.3603
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
' le code est régénéré.
' </auto-generated>
'------------------------------------------------------------------------------
@ -13,27 +13,27 @@ Option Explicit On
Namespace My
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "8.0.0.0"), _
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings), MySettings)
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings),MySettings)
#Region "My.Settings Auto-Save Functionality"
#Region "Fonctionnalité Enregistrement automatique My.Settings"
#If _MyType = "WindowsForms" Then
Private Shared addedHandler As Boolean
Private Shared addedHandler As Boolean
Private Shared addedHandlerLockObject As New Object
Private Shared addedHandlerLockObject As New Object
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
If My.Application.SaveMySettingsOnExit Then
My.Settings.Save()
End If
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
If My.Application.SaveMySettingsOnExit Then
My.Settings.Save()
End If
End Sub
#End If
#End Region
@ -41,14 +41,14 @@ Namespace My
Get
#If _MyType = "WindowsForms" Then
If Not addedHandler Then
SyncLock addedHandlerLockObject
If Not addedHandler Then
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
addedHandler = True
End If
End SyncLock
End If
If Not addedHandler Then
SyncLock addedHandlerLockObject
If Not addedHandler Then
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
addedHandler = True
End If
End SyncLock
End If
#End If
Return defaultInstance
End Get

43
Projet-VS_100_Priet-Sabourin.vbproj
View File

@ -11,6 +11,7 @@
<RootNamespace>Projet_VS_100_Priet_Sabourin</RootNamespace>
<AssemblyName>Projet-VS_100_Priet-Sabourin</AssemblyName>
<MyType>WindowsForms</MyType>
<ApplicationIcon>Logo64.ico</ApplicationIcon>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<DebugSymbols>true</DebugSymbols>
@ -49,6 +50,18 @@
<Import Include="System.Windows.Forms" />
</ItemGroup>
<ItemGroup>
<Compile Include="FrmBilanID.Designer.vb">
<DependentUpon>FrmBilanID.vb</DependentUpon>
</Compile>
<Compile Include="FrmBilanID.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="FrmBilanMat.Designer.vb">
<DependentUpon>FrmBilanMat.vb</DependentUpon>
</Compile>
<Compile Include="FrmBilanMat.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="FrmAccueil.vb">
<SubType>Form</SubType>
</Compile>
@ -62,10 +75,16 @@
<Compile Include="FrmAff.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="FrmBilan.Designer.vb">
<DependentUpon>FrmBilan.vb</DependentUpon>
<Compile Include="FrmBilanSelect.Designer.vb">
<DependentUpon>FrmBilanSelect.vb</DependentUpon>
</Compile>
<Compile Include="FrmBilan.vb">
<Compile Include="FrmBilanSelect.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="FrmBilanSupp.Designer.vb">
<DependentUpon>FrmBilanSupp.vb</DependentUpon>
</Compile>
<Compile Include="FrmBilanSupp.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="FrmEdit.Designer.vb">
@ -98,6 +117,7 @@
<Compile Include="FrmNouv.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="Module1.vb" />
<Compile Include="My Project\AssemblyInfo.vb" />
<Compile Include="My Project\Application.Designer.vb">
<AutoGen>True</AutoGen>
@ -123,9 +143,21 @@
<SubType>Designer</SubType>
<DependentUpon>FrmAff.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="FrmBilan.resx">
<EmbeddedResource Include="FrmBilanID.resx">
<SubType>Designer</SubType>
<DependentUpon>FrmBilan.vb</DependentUpon>
<DependentUpon>FrmBilanID.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="FrmBilanMat.resx">
<SubType>Designer</SubType>
<DependentUpon>FrmBilanMat.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="FrmBilanSelect.resx">
<SubType>Designer</SubType>
<DependentUpon>FrmBilanSelect.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="FrmBilanSupp.resx">
<SubType>Designer</SubType>
<DependentUpon>FrmBilanSupp.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="FrmEdit.resx">
<SubType>Designer</SubType>
@ -168,6 +200,7 @@
</ItemGroup>
<ItemGroup>
<Content Include="LISEZ MOI.txt" />
<Content Include="Logo64.ico" />
</ItemGroup>
<Import Project="$(MSBuildBinPath)\Microsoft.VisualBasic.targets" />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.

87
Selecteur.Designer.vb generated Normal file
View File

@ -0,0 +1,87 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Selecteur
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.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel
Me.OK_Button = New System.Windows.Forms.Button
Me.Cancel_Button = New System.Windows.Forms.Button
Me.TableLayoutPanel1.SuspendLayout()
Me.SuspendLayout()
'
'TableLayoutPanel1
'
Me.TableLayoutPanel1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.TableLayoutPanel1.ColumnCount = 2
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel1.Controls.Add(Me.OK_Button, 0, 0)
Me.TableLayoutPanel1.Controls.Add(Me.Cancel_Button, 1, 0)
Me.TableLayoutPanel1.Location = New System.Drawing.Point(277, 274)
Me.TableLayoutPanel1.Name = "TableLayoutPanel1"
Me.TableLayoutPanel1.RowCount = 1
Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel1.Size = New System.Drawing.Size(146, 29)
Me.TableLayoutPanel1.TabIndex = 0
'
'OK_Button
'
Me.OK_Button.Anchor = System.Windows.Forms.AnchorStyles.None
Me.OK_Button.Location = New System.Drawing.Point(3, 3)
Me.OK_Button.Name = "OK_Button"
Me.OK_Button.Size = New System.Drawing.Size(67, 23)
Me.OK_Button.TabIndex = 0
Me.OK_Button.Text = "OK"
'
'Cancel_Button
'
Me.Cancel_Button.Anchor = System.Windows.Forms.AnchorStyles.None
Me.Cancel_Button.Location = New System.Drawing.Point(76, 3)
Me.Cancel_Button.Name = "Cancel_Button"
Me.Cancel_Button.Size = New System.Drawing.Size(67, 23)
Me.Cancel_Button.TabIndex = 1
Me.Cancel_Button.Text = "Annuler"
'
'Selecteur
'
Me.AcceptButton = Me.OK_Button
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.CancelButton = Me.Cancel_Button
Me.ClientSize = New System.Drawing.Size(435, 315)
Me.Controls.Add(Me.TableLayoutPanel1)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "Selecteur"
Me.ShowInTaskbar = False
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
Me.Text = "Selecteur"
Me.TableLayoutPanel1.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
Friend WithEvents TableLayoutPanel1 As System.Windows.Forms.TableLayoutPanel
Friend WithEvents OK_Button As System.Windows.Forms.Button
Friend WithEvents Cancel_Button As System.Windows.Forms.Button
End Class

15
Selecteur.vb Normal file
View File

@ -0,0 +1,15 @@
Imports System.Windows.Forms
Public Class Selecteur
Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click
Me.DialogResult = System.Windows.Forms.DialogResult.OK
Me.Close()
End Sub
Private Sub Cancel_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel_Button.Click
Me.DialogResult = System.Windows.Forms.DialogResult.Cancel
Me.Close()
End Sub
End Class

BIN
blanc.bmp
View File

Binary file not shown.
Side by Side

Before

Width:  |  Height:  |  Size: 26 KiB

BIN
public/Dossier Projet VS 110 Priet-Sabourin.docx
View File

Binary file not shown.

BIN
public/Full-HD Logo.png
View File

Binary file not shown.
Side by Side

Before

Width:  |  Height:  |  Size: 208 KiB

BIN
public/Logo16-16.ico Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 25 KiB

BIN
public/Logo64-64.ico Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 128 KiB