diff --git a/FrmBilan.Designer.vb b/FrmBilan.Designer.vb deleted file mode 100644 index a6447a7..0000000 --- a/FrmBilan.Designer.vb +++ /dev/null @@ -1,353 +0,0 @@ - _ -Partial Class FrmBilan - Inherits System.Windows.Forms.Form - - 'Form remplace la méthode Dispose pour nettoyer la liste des composants. - _ - Protected Overrides Sub Dispose(ByVal disposing As Boolean) - Try - If disposing AndAlso components IsNot Nothing Then - components.Dispose() - End If - Finally - MyBase.Dispose(disposing) - End Try - End Sub - - 'Requise par le Concepteur Windows Form - Private components As System.ComponentModel.IContainer - - 'REMARQUE : la procédure suivante est requise par le Concepteur Windows Form - 'Elle peut être modifiée à l'aide du Concepteur Windows Form. - 'Ne la modifiez pas à l'aide de l'éditeur de code. - _ - Private Sub InitializeComponent() - Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FrmBilan)) - Me.CBNP = New System.Windows.Forms.ComboBox - Me.RBNP = New System.Windows.Forms.RadioButton - Me.TxtId = New System.Windows.Forms.TextBox - Me.RBId = New System.Windows.Forms.RadioButton - Me.Lbl4 = New System.Windows.Forms.Label - 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.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.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(42, 77) - Me.CBNP.Name = "CBNP" - 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(25, 54) - Me.RBNP.Name = "RBNP" - Me.RBNP.Size = New System.Drawing.Size(223, 17) - Me.RBNP.TabIndex = 37 - Me.RBNP.TabStop = True - Me.RBNP.Text = "En sélectionnant son nom et son prénom :" - Me.RBNP.UseVisualStyleBackColor = False - ' - 'TxtId - ' - 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 - ' - 'RBId - ' - Me.RBId.AutoSize = True - Me.RBId.BackColor = System.Drawing.SystemColors.Control - Me.RBId.Location = New System.Drawing.Point(25, 29) - Me.RBId.Name = "RBId" - 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.UseVisualStyleBackColor = False - ' - 'Lbl4 - ' - Me.Lbl4.AutoSize = True - Me.Lbl4.BackColor = System.Drawing.SystemColors.Control - 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 ?" - ' - 'CboMat - ' - 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 - ' - 'LstRegion - ' - 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 - ' - 'LstNP - ' - 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 - ' - 'LstEtat - ' - 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 - ' - 'LstSupp - ' - 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.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 - Me.CmdClose.Text = "Fermer" - Me.CmdClose.UseVisualStyleBackColor = True - ' - 'PictureBox1 - ' - Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image) - Me.PictureBox1.Location = New System.Drawing.Point(0, 372) - Me.PictureBox1.MaximumSize = New System.Drawing.Size(0, 2) - Me.PictureBox1.MinimumSize = New System.Drawing.Size(0, 2) - Me.PictureBox1.Name = "PictureBox1" - Me.PictureBox1.Size = New System.Drawing.Size(0, 2) - Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage - Me.PictureBox1.TabIndex = 45 - Me.PictureBox1.TabStop = False - ' - 'CmdAff - ' - 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 - ' - 'TabControl1 - ' - 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 - ' - 'TabPage1 - ' - 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 - ' - 'TabPage2 - ' - 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 - ' - 'TabPage3 - ' - 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(356, 337) - Me.Controls.Add(Me.PictureBox1) - 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 = "Bilans" - CType(Me.PictureBox1, 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 - Friend WithEvents CBNP As System.Windows.Forms.ComboBox - Friend WithEvents RBNP As System.Windows.Forms.RadioButton - 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 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 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 diff --git a/FrmBilan.resx b/FrmBilan.resx deleted file mode 100644 index f7fd417..0000000 --- a/FrmBilan.resx +++ /dev/null @@ -1,184 +0,0 @@ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - text/microsoft-resx - - - 2.0 - - - System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - - - Qk3GDQAAAAAAADYAAAAoAAAAQgIAAAIAAAABABgAAAAAAAAAAADEDgAAxA4AAAAAAAAAAAAA//////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - //////////////////////////////////////////////////////////////////////////////// - ////////////////////////////////////////////////////////////////bQCgoKCgoKCgoKCg - 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 - oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKBtAA== - - - \ No newline at end of file diff --git a/FrmBilan.vb b/FrmBilan.vb deleted file mode 100644 index f940553..0000000 --- a/FrmBilan.vb +++ /dev/null @@ -1,36 +0,0 @@ -Public Class FrmBilan - - Private Sub CmdClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdClose.Click - 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 \ No newline at end of file diff --git a/FrmInput2.Designer.vb b/FrmInput2.Designer.vb index 22eca36..d8d18c7 100644 --- a/FrmInput2.Designer.vb +++ b/FrmInput2.Designer.vb @@ -19,49 +19,49 @@ Partial Class FrmInput2 'Ne la modifiez pas à l'aide de l'éditeur de code. _ Private Sub InitializeComponent() - Me.components = New System.ComponentModel.Container + Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FrmInput2)) - Me.CboRegion = New System.Windows.Forms.ComboBox - Me.PnlFac = New System.Windows.Forms.Panel - Me.LblFac2 = New System.Windows.Forms.Label - Me.CboFac = New System.Windows.Forms.ComboBox - Me.RBno = New System.Windows.Forms.RadioButton - Me.RBYes = New System.Windows.Forms.RadioButton - Me.LblFac1 = New System.Windows.Forms.Label - Me.LblCaR = New System.Windows.Forms.Label - Me.LblRegion = New System.Windows.Forms.Label - Me.GBOral = New System.Windows.Forms.GroupBox - 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 - Me.GBEcrit = New System.Windows.Forms.GroupBox - Me.CheckBox12 = New System.Windows.Forms.CheckBox - Me.CheckBox11 = New System.Windows.Forms.CheckBox - Me.CheckBox10 = New System.Windows.Forms.CheckBox - Me.CheckBox9 = New System.Windows.Forms.CheckBox - Me.CheckBox8 = New System.Windows.Forms.CheckBox - Me.CheckBox7 = New System.Windows.Forms.CheckBox - Me.CheckBox6 = New System.Windows.Forms.CheckBox - Me.CheckBox5 = New System.Windows.Forms.CheckBox - Me.CheckBox4 = New System.Windows.Forms.CheckBox - Me.CheckBox3 = New System.Windows.Forms.CheckBox - Me.CheckBox2 = New System.Windows.Forms.CheckBox - Me.CheckBox1 = New System.Windows.Forms.CheckBox - Me.Lbl1 = New System.Windows.Forms.Label - Me.LblNP = New System.Windows.Forms.Label - Me.CmdNext = New System.Windows.Forms.Button - Me.CmdAnnul = New System.Windows.Forms.Button - Me.PictureBox1 = New System.Windows.Forms.PictureBox + Me.CboRegion = New System.Windows.Forms.ComboBox() + Me.PnlFac = New System.Windows.Forms.Panel() + Me.LblFac2 = New System.Windows.Forms.Label() + Me.CboFac = New System.Windows.Forms.ComboBox() + Me.RBno = New System.Windows.Forms.RadioButton() + Me.RBYes = New System.Windows.Forms.RadioButton() + Me.LblFac1 = New System.Windows.Forms.Label() + Me.LblCaR = New System.Windows.Forms.Label() + Me.LblRegion = New System.Windows.Forms.Label() + Me.GBOral = New System.Windows.Forms.GroupBox() + 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() + Me.GBEcrit = New System.Windows.Forms.GroupBox() + Me.CheckBox12 = New System.Windows.Forms.CheckBox() + Me.CheckBox11 = New System.Windows.Forms.CheckBox() + Me.CheckBox10 = New System.Windows.Forms.CheckBox() + Me.CheckBox9 = New System.Windows.Forms.CheckBox() + Me.CheckBox8 = New System.Windows.Forms.CheckBox() + Me.CheckBox7 = New System.Windows.Forms.CheckBox() + Me.CheckBox6 = New System.Windows.Forms.CheckBox() + Me.CheckBox5 = New System.Windows.Forms.CheckBox() + Me.CheckBox4 = New System.Windows.Forms.CheckBox() + Me.CheckBox3 = New System.Windows.Forms.CheckBox() + Me.CheckBox2 = New System.Windows.Forms.CheckBox() + Me.CheckBox1 = New System.Windows.Forms.CheckBox() + Me.Lbl1 = New System.Windows.Forms.Label() + Me.LblNP = New System.Windows.Forms.Label() + Me.CmdNext = New System.Windows.Forms.Button() + Me.CmdAnnul = New System.Windows.Forms.Button() + Me.PictureBox1 = New System.Windows.Forms.PictureBox() 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 - Me.LblNbOral = New System.Windows.Forms.Label + Me.LblNbEcr = New System.Windows.Forms.Label() + Me.LblNbOral = New System.Windows.Forms.Label() Me.PnlFac.SuspendLayout() Me.GBOral.SuspendLayout() Me.GBEcrit.SuspendLayout() @@ -184,7 +184,7 @@ Partial Class FrmInput2 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.Size = New System.Drawing.Size(87, 17) Me.CheckBox18.TabIndex = 25 Me.CheckBox18.Text = "CheckBox18" Me.CheckBox18.UseVisualStyleBackColor = True @@ -195,7 +195,7 @@ Partial Class FrmInput2 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.Size = New System.Drawing.Size(87, 17) Me.CheckBox17.TabIndex = 26 Me.CheckBox17.Text = "CheckBox17" Me.CheckBox17.UseVisualStyleBackColor = True @@ -206,7 +206,7 @@ Partial Class FrmInput2 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.Size = New System.Drawing.Size(87, 17) Me.CheckBox16.TabIndex = 27 Me.CheckBox16.Text = "CheckBox16" Me.CheckBox16.UseVisualStyleBackColor = True @@ -217,7 +217,7 @@ Partial Class FrmInput2 Me.CheckBox21.Location = New System.Drawing.Point(8, 19) Me.CheckBox21.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.CheckBox21.Name = "CheckBox21" - Me.CheckBox21.Size = New System.Drawing.Size(85, 17) + Me.CheckBox21.Size = New System.Drawing.Size(87, 17) Me.CheckBox21.TabIndex = 13 Me.CheckBox21.Text = "CheckBox21" Me.CheckBox21.UseVisualStyleBackColor = True @@ -228,7 +228,7 @@ Partial Class FrmInput2 Me.CheckBox20.Location = New System.Drawing.Point(8, 40) Me.CheckBox20.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.CheckBox20.Name = "CheckBox20" - Me.CheckBox20.Size = New System.Drawing.Size(85, 17) + Me.CheckBox20.Size = New System.Drawing.Size(87, 17) Me.CheckBox20.TabIndex = 14 Me.CheckBox20.Text = "CheckBox20" Me.CheckBox20.UseVisualStyleBackColor = True @@ -239,7 +239,7 @@ Partial Class FrmInput2 Me.CheckBox19.Location = New System.Drawing.Point(8, 61) Me.CheckBox19.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.CheckBox19.Name = "CheckBox19" - Me.CheckBox19.Size = New System.Drawing.Size(85, 17) + Me.CheckBox19.Size = New System.Drawing.Size(87, 17) Me.CheckBox19.TabIndex = 15 Me.CheckBox19.Text = "CheckBox19" Me.CheckBox19.UseVisualStyleBackColor = True @@ -250,7 +250,7 @@ Partial Class FrmInput2 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) + Me.CheckBox15.Size = New System.Drawing.Size(87, 17) Me.CheckBox15.TabIndex = 19 Me.CheckBox15.Text = "CheckBox15" Me.CheckBox15.UseVisualStyleBackColor = True @@ -261,7 +261,7 @@ Partial Class FrmInput2 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) + Me.CheckBox14.Size = New System.Drawing.Size(87, 17) Me.CheckBox14.TabIndex = 20 Me.CheckBox14.Text = "CheckBox14" Me.CheckBox14.UseVisualStyleBackColor = True @@ -272,7 +272,7 @@ Partial Class FrmInput2 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) + Me.CheckBox13.Size = New System.Drawing.Size(87, 17) Me.CheckBox13.TabIndex = 21 Me.CheckBox13.Text = "CheckBox13" Me.CheckBox13.UseVisualStyleBackColor = True @@ -305,7 +305,7 @@ Partial Class FrmInput2 Me.CheckBox12.Location = New System.Drawing.Point(8, 19) Me.CheckBox12.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.CheckBox12.Name = "CheckBox12" - Me.CheckBox12.Size = New System.Drawing.Size(85, 17) + Me.CheckBox12.Size = New System.Drawing.Size(87, 17) Me.CheckBox12.TabIndex = 1 Me.CheckBox12.Text = "CheckBox12" Me.CheckBox12.UseVisualStyleBackColor = True @@ -316,7 +316,7 @@ Partial Class FrmInput2 Me.CheckBox11.Location = New System.Drawing.Point(8, 40) Me.CheckBox11.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.CheckBox11.Name = "CheckBox11" - Me.CheckBox11.Size = New System.Drawing.Size(85, 17) + Me.CheckBox11.Size = New System.Drawing.Size(87, 17) Me.CheckBox11.TabIndex = 2 Me.CheckBox11.Text = "CheckBox11" Me.CheckBox11.UseVisualStyleBackColor = True @@ -327,7 +327,7 @@ Partial Class FrmInput2 Me.CheckBox10.Location = New System.Drawing.Point(8, 61) Me.CheckBox10.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.CheckBox10.Name = "CheckBox10" - Me.CheckBox10.Size = New System.Drawing.Size(85, 17) + Me.CheckBox10.Size = New System.Drawing.Size(87, 17) Me.CheckBox10.TabIndex = 3 Me.CheckBox10.Text = "CheckBox10" Me.CheckBox10.UseVisualStyleBackColor = True @@ -338,7 +338,7 @@ Partial Class FrmInput2 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) + Me.CheckBox9.Size = New System.Drawing.Size(81, 17) Me.CheckBox9.TabIndex = 4 Me.CheckBox9.Text = "CheckBox9" Me.CheckBox9.UseVisualStyleBackColor = True @@ -349,7 +349,7 @@ Partial Class FrmInput2 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) + Me.CheckBox8.Size = New System.Drawing.Size(81, 17) Me.CheckBox8.TabIndex = 5 Me.CheckBox8.Text = "CheckBox8" Me.CheckBox8.UseVisualStyleBackColor = True @@ -360,7 +360,7 @@ Partial Class FrmInput2 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) + Me.CheckBox7.Size = New System.Drawing.Size(81, 17) Me.CheckBox7.TabIndex = 6 Me.CheckBox7.Text = "CheckBox7" Me.CheckBox7.UseVisualStyleBackColor = True @@ -371,7 +371,7 @@ Partial Class FrmInput2 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) + Me.CheckBox6.Size = New System.Drawing.Size(81, 17) Me.CheckBox6.TabIndex = 7 Me.CheckBox6.Text = "CheckBox6" Me.CheckBox6.UseVisualStyleBackColor = True @@ -382,7 +382,7 @@ Partial Class FrmInput2 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) + Me.CheckBox5.Size = New System.Drawing.Size(81, 17) Me.CheckBox5.TabIndex = 8 Me.CheckBox5.Text = "CheckBox5" Me.CheckBox5.UseVisualStyleBackColor = True @@ -393,7 +393,7 @@ Partial Class FrmInput2 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) + Me.CheckBox4.Size = New System.Drawing.Size(81, 17) Me.CheckBox4.TabIndex = 9 Me.CheckBox4.Text = "CheckBox4" Me.CheckBox4.UseVisualStyleBackColor = True @@ -404,7 +404,7 @@ Partial Class FrmInput2 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) + Me.CheckBox3.Size = New System.Drawing.Size(81, 17) Me.CheckBox3.TabIndex = 10 Me.CheckBox3.Text = "CheckBox3" Me.CheckBox3.UseVisualStyleBackColor = True @@ -415,7 +415,7 @@ Partial Class FrmInput2 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) + Me.CheckBox2.Size = New System.Drawing.Size(81, 17) Me.CheckBox2.TabIndex = 11 Me.CheckBox2.Text = "CheckBox2" Me.CheckBox2.UseVisualStyleBackColor = True @@ -426,7 +426,7 @@ Partial Class FrmInput2 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) + Me.CheckBox1.Size = New System.Drawing.Size(81, 17) Me.CheckBox1.TabIndex = 12 Me.CheckBox1.Text = "CheckBox1" Me.CheckBox1.UseVisualStyleBackColor = True diff --git a/FrmInput2.vb b/FrmInput2.vb index 6f43db8..73e8428 100644 --- a/FrmInput2.vb +++ b/FrmInput2.vb @@ -22,6 +22,7 @@ Public Class FrmInput2 CB.Text = tme(i) i += 1 Next + If Boule = True Then REM edition Me.Tag = "Assistant édition de candidature (3/4)" @@ -51,24 +52,25 @@ Public Class FrmInput2 RBno.Checked = True Else RBYes.Checked = True - For i = 0 To CboFac.Items.Count - 1 + For i = 0 To CboFac.Items.Count If CboFac.Items.Item(i) = tme(cddts.Fac) Then CboFac.SelectedIndex = i + Exit For End If Next - CboFac.SelectedIndex = tme(IndexFac) + 'CboFac.SelectedItem = tme(IndexFac) End If 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" + LblCaR.Tag = 75 TmrCaR.Start() REM timer start End Sub @@ -141,12 +143,12 @@ Public Class FrmInput2 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 + '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 diff --git a/FrmInput3.Designer.vb b/FrmInput3.Designer.vb index e0c5fe8..2a8180b 100644 --- a/FrmInput3.Designer.vb +++ b/FrmInput3.Designer.vb @@ -20,19 +20,19 @@ Partial Class FrmInput3 _ Private Sub InitializeComponent() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FrmInput3)) - 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.LblTitre = New System.Windows.Forms.Label - Me.CmdNext = New System.Windows.Forms.Button - Me.CmdAnnul = New System.Windows.Forms.Button - Me.PictureBox1 = New System.Windows.Forms.PictureBox - Me.LBexam = New System.Windows.Forms.ListBox - Me.CmdDelet = New System.Windows.Forms.Button - Me.LblID = New System.Windows.Forms.Label + 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.LblTitre = New System.Windows.Forms.Label() + Me.CmdNext = New System.Windows.Forms.Button() + Me.CmdAnnul = New System.Windows.Forms.Button() + Me.PictureBox1 = New System.Windows.Forms.PictureBox() + Me.LBexam = New System.Windows.Forms.ListBox() + Me.CmdDelet = New System.Windows.Forms.Button() + Me.LblID = New System.Windows.Forms.Label() CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' @@ -141,7 +141,7 @@ Partial Class FrmInput3 Me.LBexam.FormattingEnabled = True Me.LBexam.Location = New System.Drawing.Point(263, 81) Me.LBexam.Name = "LBexam" - Me.LBexam.Size = New System.Drawing.Size(148, 108) + Me.LBexam.Size = New System.Drawing.Size(207, 173) Me.LBexam.TabIndex = 12 ' 'CmdDelet diff --git a/FrmInput3.resx b/FrmInput3.resx index c643e9a..5fc9885 100644 --- a/FrmInput3.resx +++ b/FrmInput3.resx @@ -149,7 +149,7 @@ //////////////////////////////////////////////////////////////////////////////// //////////////////////////////////////////////////////////////////////////////// //////////////////////////////////////////////////////////////////////////////// - ////////////////////////////////////////////////////////////////LgCgoKCgoKCgoKCg + ////////////////////////////////////////////////////////////////ylOgoKCgoKCgoKCg oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg @@ -178,7 +178,7 @@ oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCg - oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKAuAA== + oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKDKUw== diff --git a/FrmInput3.vb b/FrmInput3.vb index 7599999..d170984 100644 --- a/FrmInput3.vb +++ b/FrmInput3.vb @@ -22,12 +22,12 @@ Public Class FrmInput3 LblNP.Text = FrmInput1.TxtNom.Text & " " & FrmInput1.TxtPrenom.Text LblAdrss.Text = FrmInput1.TxtAdrss.Text LblCPV.Text = FrmInput1.TxtCP.Text & ", " & FrmInput1.TxtVille.Text - LblAge.Text = FrmInput1.SBHAge.Value & " ans" + LblAge.Text = FrmInput1.TxtMois.Text & "/" & FrmInput1.TxtAns.Text & " (" & FrmInput1.LblAns.Text & ")" 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("Centre :") LBexam.Items.Add(" " & FrmInput2.CboRegion.SelectedItem) LBexam.Items.Add(" ") LBexam.Items.Add("Ecrits :") diff --git a/LISEZ MOI.txt b/LISEZ MOI.txt index f329fb8..8eef1f0 100644 --- a/LISEZ MOI.txt +++ b/LISEZ MOI.txt @@ -28,14 +28,17 @@ Dans l'ensemble, le programme apparais maintenant comme stable. 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 : Beaucoup trop lourd a programmer, cela complique beaucoup les appels, les vérifications, c'est finalement aussi lourds de faire un sorf-reset que de laisser la machine faire son hard-reset. 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. + • [Résolu] Quelques fonctions sont manquantes. • [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 : @@ -44,9 +47,6 @@ FrmEdit : 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 : diff --git a/Logo64-64.ico b/Logo64-64.ico deleted file mode 100644 index b5dcab0..0000000 Binary files a/Logo64-64.ico and /dev/null differ diff --git a/Module1.vb b/Module1.vb index 6282b53..5a956d1 100644 --- a/Module1.vb +++ b/Module1.vb @@ -40,8 +40,8 @@ Module Module1 Public Sub InscBdD() - If ClefMAX - 3 >= UBound(Tindex) Then - ReDim Preserve Tindex(2) + If PosMAX - 1 >= UBound(Tindex) Then + ReDim Preserve Tindex(PosMAX + 2) End If REM Entrée depuis la feuille 1 @@ -80,7 +80,6 @@ Module Module1 Next If FrmInput2.RBYes.Checked Then cddts.Fac = IndexFac - MsgBox(cddts.Fac) REM Entrée depuis la feuille 3 Tindex(PosMAX).Suppr = False diff --git a/My Project/Application.Designer.vb b/My Project/Application.Designer.vb index 6644ac0..316a7b1 100644 --- a/My Project/Application.Designer.vb +++ b/My Project/Application.Designer.vb @@ -1,7 +1,7 @@ '------------------------------------------------------------------------------ ' ' Ce code a été généré par un outil. -' Version du runtime :2.0.50727.3603 +' Version du runtime :4.0.30319.237 ' ' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si ' le code est régénéré. @@ -15,8 +15,8 @@ Option Explicit On Namespace My 'REMARQUE : ce fichier étant généré automatiquement, ne le modifiez pas directement. Pour apporter des modifications, - ' ou si vous rencontrez des erreurs de génération dans ce fichier, accédez au Concepteur de projets - ' (allez dans les propriétés du projet ou double-cliquez sur le noeud Mon projet dans + ' ou si vous rencontrez des erreurs de build dans ce fichier, accédez au Concepteur de projets + ' (allez dans les propriétés du projet ou double-cliquez sur le noeud My project dans ' l'Explorateur de solutions), puis apportez vos modifications sous l'onglet Application. ' Partial Friend Class MyApplication diff --git a/My Project/Resources.Designer.vb b/My Project/Resources.Designer.vb index 9b35425..9e2ee8c 100644 --- a/My Project/Resources.Designer.vb +++ b/My Project/Resources.Designer.vb @@ -1,7 +1,7 @@ '------------------------------------------------------------------------------ ' ' Ce code a été généré par un outil. -' Version du runtime :2.0.50727.3603 +' Version du runtime :4.0.30319.237 ' ' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si ' le code est régénéré. @@ -22,7 +22,7 @@ Namespace My.Resources ''' ''' Une classe de ressource fortement typée destinée, entre autres, à la consultation des chaînes localisées. ''' - _ diff --git a/My Project/Settings.Designer.vb b/My Project/Settings.Designer.vb index 454cd01..bc25781 100644 --- a/My Project/Settings.Designer.vb +++ b/My Project/Settings.Designer.vb @@ -1,7 +1,7 @@ '------------------------------------------------------------------------------ ' ' Ce code a été généré par un outil. -' Version du runtime :2.0.50727.3603 +' Version du runtime :4.0.30319.237 ' ' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si ' le code est régénéré. @@ -15,12 +15,12 @@ Option Explicit On Namespace My _ 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 "Fonctionnalité Enregistrement automatique My.Settings" #If _MyType = "WindowsForms" Then diff --git a/Projet-VS_100_Priet-Sabourin.vbproj b/Projet-VS_100_Priet-Sabourin.vbproj index ca1358c..897fcf1 100644 --- a/Projet-VS_100_Priet-Sabourin.vbproj +++ b/Projet-VS_100_Priet-Sabourin.vbproj @@ -1,5 +1,5 @@  - + Debug AnyCPU @@ -12,6 +12,27 @@ Projet-VS_100_Priet-Sabourin WindowsForms Logo64.ico + v2.0 + + + + + 2.0 + publish\ + true + Disk + false + Foreground + 7 + Days + false + false + true + 0 + 1.0.0.%2a + false + false + true true @@ -20,7 +41,8 @@ true bin\Debug\ Projet-VS_100_Priet-Sabourin.xml - 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355 + AllRules.ruleset pdbonly @@ -29,7 +51,8 @@ true bin\Release\ Projet-VS_100_Priet-Sabourin.xml - 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355 + AllRules.ruleset @@ -202,6 +225,23 @@ + + + False + .NET Framework 3.5 SP1 Client Profile + false + + + False + .NET Framework 3.5 SP1 + true + + + False + Windows Installer 3.1 + true + + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - text/microsoft-resx - - - 2.0 - - - System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - - Image 1.jpg;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - - LigneH.bmp;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - - Resources\Warning.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - \ No newline at end of file diff --git a/Resources/Thumbs.db b/Resources/Thumbs.db deleted file mode 100644 index d15d7bc..0000000 Binary files a/Resources/Thumbs.db and /dev/null differ diff --git a/Resources/Warning.png b/Resources/Warning.png deleted file mode 100644 index 3e9d6ed..0000000 Binary files a/Resources/Warning.png and /dev/null differ diff --git a/Selecteur.Designer.vb b/Selecteur.Designer.vb deleted file mode 100644 index 68ff23f..0000000 --- a/Selecteur.Designer.vb +++ /dev/null @@ -1,87 +0,0 @@ - _ -Partial Class Selecteur - Inherits System.Windows.Forms.Form - - 'Form remplace la méthode Dispose pour nettoyer la liste des composants. - _ - Protected Overrides Sub Dispose(ByVal disposing As Boolean) - Try - If disposing AndAlso components IsNot Nothing Then - components.Dispose() - End If - Finally - MyBase.Dispose(disposing) - End Try - End Sub - - 'Requise par le Concepteur Windows Form - Private components As System.ComponentModel.IContainer - - 'REMARQUE : la procédure suivante est requise par le Concepteur Windows Form - 'Elle peut être modifiée à l'aide du Concepteur Windows Form. - 'Ne la modifiez pas à l'aide de l'éditeur de code. - _ - Private Sub InitializeComponent() - Me.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 diff --git a/Selecteur.vb b/Selecteur.vb deleted file mode 100644 index 2bf6508..0000000 --- a/Selecteur.vb +++ /dev/null @@ -1,15 +0,0 @@ -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