Compare commits
3 Commits
7.0.8.22
...
candidate-
| Author | SHA1 | Date | |
|---|---|---|---|
|
eb74185d38 | ||
|
|
4f596789fb | ||
|
|
9e182ba3de |
4
.gitignore
vendored
4
.gitignore
vendored
@@ -1,2 +1,2 @@
|
|||||||
bin/
|
/bin
|
||||||
obj/
|
/obj
|
||||||
|
|||||||
20
Candidat Reader.sln
Normal file
20
Candidat Reader.sln
Normal file
@@ -0,0 +1,20 @@
|
|||||||
|
|
||||||
|
Microsoft Visual Studio Solution File, Format Version 9.00
|
||||||
|
# Visual Studio 2005
|
||||||
|
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Candidat Reader", "Candidat Reader\Candidat Reader.vbproj", "{05FC157A-F4C5-4714-AB7A-D2D8907FAFAB}"
|
||||||
|
EndProject
|
||||||
|
Global
|
||||||
|
GlobalSection(SolutionConfigurationPlatforms) = preSolution
|
||||||
|
Debug|Any CPU = Debug|Any CPU
|
||||||
|
Release|Any CPU = Release|Any CPU
|
||||||
|
EndGlobalSection
|
||||||
|
GlobalSection(ProjectConfigurationPlatforms) = postSolution
|
||||||
|
{05FC157A-F4C5-4714-AB7A-D2D8907FAFAB}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
|
||||||
|
{05FC157A-F4C5-4714-AB7A-D2D8907FAFAB}.Debug|Any CPU.Build.0 = Debug|Any CPU
|
||||||
|
{05FC157A-F4C5-4714-AB7A-D2D8907FAFAB}.Release|Any CPU.ActiveCfg = Release|Any CPU
|
||||||
|
{05FC157A-F4C5-4714-AB7A-D2D8907FAFAB}.Release|Any CPU.Build.0 = Release|Any CPU
|
||||||
|
EndGlobalSection
|
||||||
|
GlobalSection(SolutionProperties) = preSolution
|
||||||
|
HideSolutionNode = FALSE
|
||||||
|
EndGlobalSection
|
||||||
|
EndGlobal
|
||||||
BIN
Candidat Reader.suo
Normal file
BIN
Candidat Reader.suo
Normal file
Binary file not shown.
106
Candidat Reader.vbproj
Normal file
106
Candidat Reader.vbproj
Normal file
@@ -0,0 +1,106 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<Project DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||||
|
<PropertyGroup>
|
||||||
|
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||||
|
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||||
|
<ProductVersion>8.0.50727</ProductVersion>
|
||||||
|
<SchemaVersion>2.0</SchemaVersion>
|
||||||
|
<ProjectGuid>{05FC157A-F4C5-4714-AB7A-D2D8907FAFAB}</ProjectGuid>
|
||||||
|
<OutputType>WinExe</OutputType>
|
||||||
|
<StartupObject>WindowsApplication1.My.MyApplication</StartupObject>
|
||||||
|
<RootNamespace>WindowsApplication1</RootNamespace>
|
||||||
|
<AssemblyName>Candidat Reader</AssemblyName>
|
||||||
|
<MyType>WindowsForms</MyType>
|
||||||
|
</PropertyGroup>
|
||||||
|
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||||
|
<DebugSymbols>true</DebugSymbols>
|
||||||
|
<DebugType>full</DebugType>
|
||||||
|
<DefineDebug>true</DefineDebug>
|
||||||
|
<DefineTrace>true</DefineTrace>
|
||||||
|
<OutputPath>bin\Debug\</OutputPath>
|
||||||
|
<DocumentationFile>Candidat Reader.xml</DocumentationFile>
|
||||||
|
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||||
|
</PropertyGroup>
|
||||||
|
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
||||||
|
<DebugType>pdbonly</DebugType>
|
||||||
|
<DefineDebug>false</DefineDebug>
|
||||||
|
<DefineTrace>true</DefineTrace>
|
||||||
|
<Optimize>true</Optimize>
|
||||||
|
<OutputPath>bin\Release\</OutputPath>
|
||||||
|
<DocumentationFile>Candidat Reader.xml</DocumentationFile>
|
||||||
|
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||||
|
</PropertyGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<Reference Include="System" />
|
||||||
|
<Reference Include="System.Data" />
|
||||||
|
<Reference Include="System.Deployment" />
|
||||||
|
<Reference Include="System.Drawing" />
|
||||||
|
<Reference Include="System.Windows.Forms" />
|
||||||
|
<Reference Include="System.Xml" />
|
||||||
|
</ItemGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<Import Include="Microsoft.VisualBasic" />
|
||||||
|
<Import Include="System" />
|
||||||
|
<Import Include="System.Collections" />
|
||||||
|
<Import Include="System.Collections.Generic" />
|
||||||
|
<Import Include="System.Data" />
|
||||||
|
<Import Include="System.Drawing" />
|
||||||
|
<Import Include="System.Diagnostics" />
|
||||||
|
<Import Include="System.Windows.Forms" />
|
||||||
|
</ItemGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<Compile Include="Form1.vb">
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Form1.Designer.vb">
|
||||||
|
<DependentUpon>Form1.vb</DependentUpon>
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="My Project\AssemblyInfo.vb" />
|
||||||
|
<Compile Include="My Project\Application.Designer.vb">
|
||||||
|
<AutoGen>True</AutoGen>
|
||||||
|
<DependentUpon>Application.myapp</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="My Project\Resources.Designer.vb">
|
||||||
|
<AutoGen>True</AutoGen>
|
||||||
|
<DesignTime>True</DesignTime>
|
||||||
|
<DependentUpon>Resources.resx</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="My Project\Settings.Designer.vb">
|
||||||
|
<AutoGen>True</AutoGen>
|
||||||
|
<DependentUpon>Settings.settings</DependentUpon>
|
||||||
|
<DesignTimeSharedInput>True</DesignTimeSharedInput>
|
||||||
|
</Compile>
|
||||||
|
</ItemGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<EmbeddedResource Include="Form1.resx">
|
||||||
|
<SubType>Designer</SubType>
|
||||||
|
<DependentUpon>Form1.vb</DependentUpon>
|
||||||
|
</EmbeddedResource>
|
||||||
|
<EmbeddedResource Include="My Project\Resources.resx">
|
||||||
|
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
|
||||||
|
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
|
||||||
|
<CustomToolNamespace>My.Resources</CustomToolNamespace>
|
||||||
|
<SubType>Designer</SubType>
|
||||||
|
</EmbeddedResource>
|
||||||
|
</ItemGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<None Include="My Project\Application.myapp">
|
||||||
|
<Generator>MyApplicationCodeGenerator</Generator>
|
||||||
|
<LastGenOutput>Application.Designer.vb</LastGenOutput>
|
||||||
|
</None>
|
||||||
|
<None Include="My Project\Settings.settings">
|
||||||
|
<Generator>SettingsSingleFileGenerator</Generator>
|
||||||
|
<CustomToolNamespace>My</CustomToolNamespace>
|
||||||
|
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
|
||||||
|
</None>
|
||||||
|
</ItemGroup>
|
||||||
|
<Import Project="$(MSBuildBinPath)\Microsoft.VisualBasic.targets" />
|
||||||
|
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
|
||||||
|
Other similar extension points exist, see Microsoft.Common.targets.
|
||||||
|
<Target Name="BeforeBuild">
|
||||||
|
</Target>
|
||||||
|
<Target Name="AfterBuild">
|
||||||
|
</Target>
|
||||||
|
-->
|
||||||
|
</Project>
|
||||||
97
Form1.Designer.vb
generated
Normal file
97
Form1.Designer.vb
generated
Normal file
@@ -0,0 +1,97 @@
|
|||||||
|
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||||
|
Partial Class Form1
|
||||||
|
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.Label1 = New System.Windows.Forms.Label
|
||||||
|
Me.ListBox1 = New System.Windows.Forms.ListBox
|
||||||
|
Me.Button1 = New System.Windows.Forms.Button
|
||||||
|
Me.Button2 = New System.Windows.Forms.Button
|
||||||
|
Me.SuspendLayout()
|
||||||
|
'
|
||||||
|
'Label1
|
||||||
|
'
|
||||||
|
Me.Label1.AutoSize = True
|
||||||
|
Me.Label1.Location = New System.Drawing.Point(13, 13)
|
||||||
|
Me.Label1.Name = "Label1"
|
||||||
|
Me.Label1.Size = New System.Drawing.Size(39, 13)
|
||||||
|
Me.Label1.TabIndex = 0
|
||||||
|
Me.Label1.Text = "Label1"
|
||||||
|
'
|
||||||
|
'ListBox1
|
||||||
|
'
|
||||||
|
Me.ListBox1.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.ListBox1.Font = New System.Drawing.Font("Lucida Console", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.ListBox1.FormattingEnabled = True
|
||||||
|
Me.ListBox1.HorizontalExtent = 20
|
||||||
|
Me.ListBox1.HorizontalScrollbar = True
|
||||||
|
Me.ListBox1.ItemHeight = 11
|
||||||
|
Me.ListBox1.Location = New System.Drawing.Point(16, 30)
|
||||||
|
Me.ListBox1.Name = "ListBox1"
|
||||||
|
Me.ListBox1.Size = New System.Drawing.Size(638, 301)
|
||||||
|
Me.ListBox1.TabIndex = 1
|
||||||
|
'
|
||||||
|
'Button1
|
||||||
|
'
|
||||||
|
Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||||
|
Me.Button1.Location = New System.Drawing.Point(498, 3)
|
||||||
|
Me.Button1.Name = "Button1"
|
||||||
|
Me.Button1.Size = New System.Drawing.Size(75, 23)
|
||||||
|
Me.Button1.TabIndex = 2
|
||||||
|
Me.Button1.Text = "Open..."
|
||||||
|
Me.Button1.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'Button2
|
||||||
|
'
|
||||||
|
Me.Button2.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||||
|
Me.Button2.Enabled = False
|
||||||
|
Me.Button2.Location = New System.Drawing.Point(579, 3)
|
||||||
|
Me.Button2.Name = "Button2"
|
||||||
|
Me.Button2.Size = New System.Drawing.Size(75, 23)
|
||||||
|
Me.Button2.TabIndex = 3
|
||||||
|
Me.Button2.Text = "Convertir..."
|
||||||
|
Me.Button2.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'Form1
|
||||||
|
'
|
||||||
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||||
|
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||||
|
Me.ClientSize = New System.Drawing.Size(666, 345)
|
||||||
|
Me.Controls.Add(Me.Button2)
|
||||||
|
Me.Controls.Add(Me.Button1)
|
||||||
|
Me.Controls.Add(Me.ListBox1)
|
||||||
|
Me.Controls.Add(Me.Label1)
|
||||||
|
Me.MaximizeBox = False
|
||||||
|
Me.Name = "Form1"
|
||||||
|
Me.Text = "Candidat Reader"
|
||||||
|
Me.ResumeLayout(False)
|
||||||
|
Me.PerformLayout()
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||||
|
Friend WithEvents ListBox1 As System.Windows.Forms.ListBox
|
||||||
|
Friend WithEvents Button1 As System.Windows.Forms.Button
|
||||||
|
Friend WithEvents Button2 As System.Windows.Forms.Button
|
||||||
|
|
||||||
|
End Class
|
||||||
@@ -117,68 +117,4 @@
|
|||||||
<resheader name="writer">
|
<resheader name="writer">
|
||||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||||
</resheader>
|
</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////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////AAKgoKCgoKCgoKCg
|
|
||||||
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
|
|
||||||
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKAAAg==
|
|
||||||
</value>
|
|
||||||
</data>
|
|
||||||
</root>
|
</root>
|
||||||
87
Form1.vb
Normal file
87
Form1.vb
Normal file
@@ -0,0 +1,87 @@
|
|||||||
|
Public Class Form1
|
||||||
|
Dim nf As Integer
|
||||||
|
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<70>s)
|
||||||
|
<VBFixedString(1)> Dim Region As Integer REM Stocke l'index
|
||||||
|
<VBFixedArray(3)> Dim Ecrit() As Integer REM index
|
||||||
|
<VBFixedArray(2)> Dim Oral() As Integer REM index
|
||||||
|
<VBFixedString(2)> Dim Fac As Integer REM Stocke l'index
|
||||||
|
End Structure
|
||||||
|
Dim cddts As PERS
|
||||||
|
Dim NbPers As Integer
|
||||||
|
Dim lght As Integer
|
||||||
|
|
||||||
|
|
||||||
|
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||||
|
ReDim cddts.Ecrit(3)
|
||||||
|
ReDim cddts.Oral(2)
|
||||||
|
lght = Len(cddts)
|
||||||
|
'
|
||||||
|
'nf = FreeFile()
|
||||||
|
'FileOpen(nf, "Candidats.C7P", OpenMode.Random, OpenAccess.ReadWrite, OpenShare.Shared, lght)
|
||||||
|
|
||||||
|
'FileGet(nf, cddts, 1)
|
||||||
|
'Label1.Text = cddts.CP
|
||||||
|
|
||||||
|
'Dim i As Integer
|
||||||
|
'For i = 1 To 5
|
||||||
|
' FileGet(nf, cddts, i)
|
||||||
|
' ListBox1.Items.Add(cddts.Nom & " " & cddts.Prenom & " " & cddts.Adresse & " " & cddts.CP & " " & cddts.Ville & " " & cddts.Age & " " & cddts.Ecrit(0) & " " & cddts.Oral(0) & " " & cddts.Fac)
|
||||||
|
'Next
|
||||||
|
'FileClose(nf)
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
|
||||||
|
ListBox1.Items.Clear()
|
||||||
|
|
||||||
|
|
||||||
|
Dim OpenFile As New OpenFileDialog
|
||||||
|
OpenFile.FileName = ""
|
||||||
|
OpenFile.Filter = "Fichier Candidate 7 Pro (*.C7P)|*.C7P"
|
||||||
|
OpenFile.Title = "Ouvrir une base de candidat C7P"
|
||||||
|
OpenFile.ShowDialog()
|
||||||
|
Try
|
||||||
|
Dim i As Integer = 0
|
||||||
|
nf = FreeFile()
|
||||||
|
'Dim Read As New System.IO.StreamReader(OpenFile.FileName)
|
||||||
|
FileOpen(nf, OpenFile.FileName, OpenMode.Random, OpenAccess.ReadWrite, OpenShare.Shared, lght)
|
||||||
|
FileGet(nf, cddts, 1)
|
||||||
|
NbPers = cddts.CP
|
||||||
|
Label1.Text = "Nombre de candidats : " & NbPers
|
||||||
|
For i = 1 To NbPers
|
||||||
|
FileGet(nf, cddts, i)
|
||||||
|
ListBox1.Items.Add(cddts.Nom & ", " & cddts.Prenom & ", " & cddts.Adresse & " " & cddts.CP & ", " & cddts.Ville & ", " & cddts.Age & ", (" & cddts.Ecrit(0) & "-" & cddts.Ecrit(1) & "-" & cddts.Ecrit(2) & "-" & cddts.Ecrit(3) & ") (" & cddts.Oral(0) & "-" & cddts.Oral(1) & "-" & cddts.Oral(2) & ") " & cddts.Fac)
|
||||||
|
Next
|
||||||
|
Catch ex As Exception
|
||||||
|
|
||||||
|
End Try
|
||||||
|
FileClose(nf)
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
|
||||||
|
'Dim Savefile As New SaveFileDialog
|
||||||
|
'Savefile.FileName = ""
|
||||||
|
'Savefile.Filter = "Fichier texte (*.txt)|*.txt"
|
||||||
|
'Savefile.Title = "Sauvegarder en clair"
|
||||||
|
'Savefile.ShowDialog()
|
||||||
|
'Try
|
||||||
|
Dim i As Integer = 0
|
||||||
|
nf = FreeFile()
|
||||||
|
FileOpen(nf, "Liste.txt", OpenMode.Output, OpenAccess.Write, OpenShare.Shared)
|
||||||
|
For i = 0 To ListBox1.Items.Count - 1
|
||||||
|
FilePutObject(nf, ListBox1.Items.Item(i), i + 1)
|
||||||
|
Next
|
||||||
|
'Catch ex As Exception
|
||||||
|
' MsgBox("L'enregistrement a <20>chou<6F>.")
|
||||||
|
|
||||||
|
'End Try
|
||||||
|
'FileClose(nf)
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
End Class
|
||||||
233
FrmAccueil.Designer.vb
generated
233
FrmAccueil.Designer.vb
generated
@@ -1,233 +0,0 @@
|
|||||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
|
||||||
Partial Class FrmAccueil
|
|
||||||
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)
|
|
||||||
If disposing AndAlso components IsNot Nothing Then
|
|
||||||
components.Dispose()
|
|
||||||
End If
|
|
||||||
MyBase.Dispose(disposing)
|
|
||||||
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(FrmAccueil))
|
|
||||||
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()
|
|
||||||
'
|
|
||||||
'CmdQuit
|
|
||||||
'
|
|
||||||
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, 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, 170)
|
|
||||||
Me.CmdBilan.Name = "CmdBilan"
|
|
||||||
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
|
|
||||||
Me.CmdBilan.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'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, 135)
|
|
||||||
Me.CmdAff.Name = "CmdAff"
|
|
||||||
Me.CmdAff.Size = New System.Drawing.Size(141, 29)
|
|
||||||
Me.CmdAff.TabIndex = 2
|
|
||||||
Me.CmdAff.Text = "&Liste..."
|
|
||||||
Me.CmdAff.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
|
||||||
Me.CmdAff.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageBeforeText
|
|
||||||
Me.CmdAff.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CmdEdit
|
|
||||||
'
|
|
||||||
Me.CmdEdit.Location = New System.Drawing.Point(42, 170)
|
|
||||||
Me.CmdEdit.Name = "CmdEdit"
|
|
||||||
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(42, 135)
|
|
||||||
Me.CmdNew.Name = "CmdNew"
|
|
||||||
Me.CmdNew.Size = New System.Drawing.Size(141, 29)
|
|
||||||
Me.CmdNew.TabIndex = 0
|
|
||||||
Me.CmdNew.Text = "&Nouvelle candidature..."
|
|
||||||
Me.CmdNew.UseVisualStyleBackColor = False
|
|
||||||
'
|
|
||||||
'TmrHor
|
|
||||||
'
|
|
||||||
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(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 = 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(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.CmdNew)
|
|
||||||
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.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 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
|
|
||||||
1571
FrmAccueil.resx
1571
FrmAccueil.resx
File diff suppressed because it is too large
Load Diff
@@ -1,63 +0,0 @@
|
|||||||
Public Class FrmAccueil
|
|
||||||
|
|
||||||
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)
|
|
||||||
TmrHor.Start()
|
|
||||||
cddts.CP = ClefMAX REM ClefMAX qui est initialis<69> 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<6E>, 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 <20>t<EFBFBD>s modif<69>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
|
|
||||||
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<74>re, et un bilan des candidats supprim<69>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
|
|
||||||
Me.Hide()
|
|
||||||
Boule = False REM boule change pour nouveau (ou ne change pas la premi<6D>re fois)
|
|
||||||
FrmNouv.Show()
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Private Sub CmdEdit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdEdit.Click
|
|
||||||
Me.Hide()
|
|
||||||
Boule = True REM bool change pour edition
|
|
||||||
FrmEdit.Show()
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Private Sub CmdBilan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdBilan.Click
|
|
||||||
'Me.Hide()
|
|
||||||
FrmBilanSelect.Tag = "Choisir un bilan"
|
|
||||||
FrmBilanSelect.LblInfo.Text = "Vous pouvez afficher un bilan individuel pour un candidat, un bilan par mati<74>re, et un bilan des candidats supprim<69>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
|
|
||||||
FrmAff.Show()
|
|
||||||
Me.Hide()
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
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) 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
|
|
||||||
129
FrmAff.Designer.vb
generated
129
FrmAff.Designer.vb
generated
@@ -1,129 +0,0 @@
|
|||||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
|
||||||
Partial Class FrmAff
|
|
||||||
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)
|
|
||||||
If disposing AndAlso components IsNot Nothing Then
|
|
||||||
components.Dispose()
|
|
||||||
End If
|
|
||||||
MyBase.Dispose(disposing)
|
|
||||||
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(FrmAff))
|
|
||||||
Me.CmdAnnul = New System.Windows.Forms.Button
|
|
||||||
Me.PictureBox1 = New System.Windows.Forms.PictureBox
|
|
||||||
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.ListBox5 = New System.Windows.Forms.ListBox
|
|
||||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
||||||
Me.SuspendLayout()
|
|
||||||
'
|
|
||||||
'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)
|
|
||||||
Me.CmdAnnul.TabIndex = 20
|
|
||||||
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(0, 124)
|
|
||||||
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(653, 2)
|
|
||||||
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
|
||||||
Me.PictureBox1.TabIndex = 21
|
|
||||||
Me.PictureBox1.TabStop = False
|
|
||||||
'
|
|
||||||
'ListBox1
|
|
||||||
'
|
|
||||||
Me.ListBox1.FormattingEnabled = True
|
|
||||||
Me.ListBox1.Location = New System.Drawing.Point(12, 12)
|
|
||||||
Me.ListBox1.Name = "ListBox1"
|
|
||||||
Me.ListBox1.Size = New System.Drawing.Size(120, 95)
|
|
||||||
Me.ListBox1.TabIndex = 26
|
|
||||||
'
|
|
||||||
'ListBox2
|
|
||||||
'
|
|
||||||
Me.ListBox2.FormattingEnabled = True
|
|
||||||
Me.ListBox2.Location = New System.Drawing.Point(138, 12)
|
|
||||||
Me.ListBox2.Name = "ListBox2"
|
|
||||||
Me.ListBox2.Size = New System.Drawing.Size(120, 95)
|
|
||||||
Me.ListBox2.TabIndex = 27
|
|
||||||
'
|
|
||||||
'ListBox3
|
|
||||||
'
|
|
||||||
Me.ListBox3.FormattingEnabled = True
|
|
||||||
Me.ListBox3.Location = New System.Drawing.Point(264, 12)
|
|
||||||
Me.ListBox3.Name = "ListBox3"
|
|
||||||
Me.ListBox3.Size = New System.Drawing.Size(120, 95)
|
|
||||||
Me.ListBox3.TabIndex = 28
|
|
||||||
'
|
|
||||||
'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"
|
|
||||||
Me.ListBox4.Size = New System.Drawing.Size(120, 95)
|
|
||||||
Me.ListBox4.TabIndex = 29
|
|
||||||
'
|
|
||||||
'ListBox5
|
|
||||||
'
|
|
||||||
Me.ListBox5.FormattingEnabled = True
|
|
||||||
Me.ListBox5.Location = New System.Drawing.Point(518, 13)
|
|
||||||
Me.ListBox5.Name = "ListBox5"
|
|
||||||
Me.ListBox5.Size = New System.Drawing.Size(120, 95)
|
|
||||||
Me.ListBox5.TabIndex = 30
|
|
||||||
'
|
|
||||||
'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)
|
|
||||||
Me.Controls.Add(Me.ListBox2)
|
|
||||||
Me.Controls.Add(Me.ListBox1)
|
|
||||||
Me.Controls.Add(Me.CmdAnnul)
|
|
||||||
Me.Controls.Add(Me.PictureBox1)
|
|
||||||
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()
|
|
||||||
Me.ResumeLayout(False)
|
|
||||||
|
|
||||||
End Sub
|
|
||||||
Friend WithEvents CmdAnnul As System.Windows.Forms.Button
|
|
||||||
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
|
|
||||||
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 ListBox5 As System.Windows.Forms.ListBox
|
|
||||||
End Class
|
|
||||||
@@ -1,7 +0,0 @@
|
|||||||
Public Class FrmAff
|
|
||||||
|
|
||||||
Private Sub CmdAnnul_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdAnnul.Click
|
|
||||||
Me.Close()
|
|
||||||
FrmAccueil.Show()
|
|
||||||
End Sub
|
|
||||||
End Class
|
|
||||||
302
FrmBilanID.Designer.vb
generated
302
FrmBilanID.Designer.vb
generated
@@ -1,302 +0,0 @@
|
|||||||
<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
247
FrmBilanID.resx
@@ -1,247 +0,0 @@
|
|||||||
<?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>
|
|
||||||
@@ -1,22 +0,0 @@
|
|||||||
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
159
FrmBilanMat.Designer.vb
generated
@@ -1,159 +0,0 @@
|
|||||||
<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
184
FrmBilanMat.resx
@@ -1,184 +0,0 @@
|
|||||||
<?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>
|
|
||||||
@@ -1,21 +0,0 @@
|
|||||||
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<74>res"
|
|
||||||
Me.Text = Me.Tag & " |" & TimeOfDay
|
|
||||||
End Sub
|
|
||||||
End Class
|
|
||||||
143
FrmBilanSelect.Designer.vb
generated
143
FrmBilanSelect.Designer.vb
generated
@@ -1,143 +0,0 @@
|
|||||||
<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
|
|
||||||
@@ -1,205 +0,0 @@
|
|||||||
<?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>
|
|
||||||
@@ -1,41 +0,0 @@
|
|||||||
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 <20>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
112
FrmBilanSupp.Designer.vb
generated
@@ -1,112 +0,0 @@
|
|||||||
<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
|
|
||||||
@@ -1,184 +0,0 @@
|
|||||||
<?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>
|
|
||||||
@@ -1,22 +0,0 @@
|
|||||||
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<69>s"
|
|
||||||
Me.Text = Me.Tag & " |" & TimeOfDay
|
|
||||||
End Sub
|
|
||||||
End Class
|
|
||||||
261
FrmEdit.Designer.vb
generated
261
FrmEdit.Designer.vb
generated
@@ -1,261 +0,0 @@
|
|||||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
|
||||||
Partial Class FrmEdit
|
|
||||||
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)
|
|
||||||
If disposing AndAlso components IsNot Nothing Then
|
|
||||||
components.Dispose()
|
|
||||||
End If
|
|
||||||
MyBase.Dispose(disposing)
|
|
||||||
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(FrmEdit))
|
|
||||||
Me.LblNext = New System.Windows.Forms.Label
|
|
||||||
Me.CmdNext = New System.Windows.Forms.Button
|
|
||||||
Me.CmdAnnul = New System.Windows.Forms.Button
|
|
||||||
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.Lbl2 = New System.Windows.Forms.Label
|
|
||||||
Me.Lbl1 = New System.Windows.Forms.Label
|
|
||||||
Me.LblTitre = New System.Windows.Forms.Label
|
|
||||||
Me.PictureBox1 = New System.Windows.Forms.PictureBox
|
|
||||||
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
|
|
||||||
'
|
|
||||||
Me.LblNext.Location = New System.Drawing.Point(10, 293)
|
|
||||||
Me.LblNext.Name = "LblNext"
|
|
||||||
Me.LblNext.Size = New System.Drawing.Size(278, 18)
|
|
||||||
Me.LblNext.TabIndex = 22
|
|
||||||
Me.LblNext.Text = "Cliquez sur Suivant pour contiuer."
|
|
||||||
Me.LblNext.TextAlign = System.Drawing.ContentAlignment.TopRight
|
|
||||||
'
|
|
||||||
'CmdNext
|
|
||||||
'
|
|
||||||
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 = 20
|
|
||||||
Me.CmdNext.Text = "&Suivant >"
|
|
||||||
Me.CmdNext.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CmdAnnul
|
|
||||||
'
|
|
||||||
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 = 21
|
|
||||||
Me.CmdAnnul.Text = "Annuler"
|
|
||||||
Me.CmdAnnul.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CBNP
|
|
||||||
'
|
|
||||||
Me.CBNP.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
|
||||||
Me.CBNP.FormattingEnabled = True
|
|
||||||
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
|
|
||||||
'
|
|
||||||
'RBNP
|
|
||||||
'
|
|
||||||
Me.RBNP.AutoSize = True
|
|
||||||
Me.RBNP.BackColor = System.Drawing.Color.White
|
|
||||||
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
|
|
||||||
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(370, 198)
|
|
||||||
Me.TxtId.Name = "TxtId"
|
|
||||||
Me.TxtId.Size = New System.Drawing.Size(89, 21)
|
|
||||||
Me.TxtId.TabIndex = 31
|
|
||||||
'
|
|
||||||
'RBId
|
|
||||||
'
|
|
||||||
Me.RBId.AutoSize = True
|
|
||||||
Me.RBId.BackColor = System.Drawing.Color.White
|
|
||||||
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
|
|
||||||
Me.RBId.TabStop = True
|
|
||||||
Me.RBId.Text = "En entrant son identifiant :"
|
|
||||||
Me.RBId.UseVisualStyleBackColor = False
|
|
||||||
'
|
|
||||||
'Lbl2
|
|
||||||
'
|
|
||||||
Me.Lbl2.AutoSize = True
|
|
||||||
Me.Lbl2.BackColor = System.Drawing.Color.White
|
|
||||||
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
|
|
||||||
Me.Lbl2.Text = "Comment voulez-vous choisir le candidat ?"
|
|
||||||
'
|
|
||||||
'Lbl1
|
|
||||||
'
|
|
||||||
Me.Lbl1.AutoSize = True
|
|
||||||
Me.Lbl1.BackColor = System.Drawing.Color.White
|
|
||||||
Me.Lbl1.Location = New System.Drawing.Point(176, 67)
|
|
||||||
Me.Lbl1.Name = "Lbl1"
|
|
||||||
Me.Lbl1.Size = New System.Drawing.Size(175, 39)
|
|
||||||
Me.Lbl1.TabIndex = 26
|
|
||||||
Me.Lbl1.Text = "Cet Assistant vous permet :" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "• De modifier une candidature," & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "• De supprim" & _
|
|
||||||
"er une candidature."
|
|
||||||
'
|
|
||||||
'LblTitre
|
|
||||||
'
|
|
||||||
Me.LblTitre.AutoEllipsis = True
|
|
||||||
Me.LblTitre.BackColor = System.Drawing.Color.White
|
|
||||||
Me.LblTitre.Font = New System.Drawing.Font("Segoe UI", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
|
||||||
Me.LblTitre.Location = New System.Drawing.Point(172, 10)
|
|
||||||
Me.LblTitre.Name = "LblTitre"
|
|
||||||
Me.LblTitre.Size = New System.Drawing.Size(298, 57)
|
|
||||||
Me.LblTitre.TabIndex = 25
|
|
||||||
Me.LblTitre.Text = "Bienvenue dans l'Assistant édition de candidature"
|
|
||||||
'
|
|
||||||
'PictureBox1
|
|
||||||
'
|
|
||||||
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
|
|
||||||
Me.PictureBox1.Location = New System.Drawing.Point(0, 272)
|
|
||||||
Me.PictureBox1.MaximumSize = New System.Drawing.Size(495, 2)
|
|
||||||
Me.PictureBox1.MinimumSize = New System.Drawing.Size(0, 2)
|
|
||||||
Me.PictureBox1.Name = "PictureBox1"
|
|
||||||
Me.PictureBox1.Size = New System.Drawing.Size(481, 2)
|
|
||||||
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
|
||||||
Me.PictureBox1.TabIndex = 23
|
|
||||||
Me.PictureBox1.TabStop = False
|
|
||||||
'
|
|
||||||
'PictureBox2
|
|
||||||
'
|
|
||||||
Me.PictureBox2.Image = CType(resources.GetObject("PictureBox2.Image"), System.Drawing.Image)
|
|
||||||
Me.PictureBox2.Location = New System.Drawing.Point(159, 1)
|
|
||||||
Me.PictureBox2.Name = "PictureBox2"
|
|
||||||
Me.PictureBox2.Size = New System.Drawing.Size(322, 271)
|
|
||||||
Me.PictureBox2.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
|
||||||
Me.PictureBox2.TabIndex = 24
|
|
||||||
Me.PictureBox2.TabStop = False
|
|
||||||
'
|
|
||||||
'PictureBox3
|
|
||||||
'
|
|
||||||
Me.PictureBox3.Image = CType(resources.GetObject("PictureBox3.Image"), System.Drawing.Image)
|
|
||||||
Me.PictureBox3.Location = New System.Drawing.Point(0, 0)
|
|
||||||
Me.PictureBox3.Margin = New System.Windows.Forms.Padding(1, 1, 0, 0)
|
|
||||||
Me.PictureBox3.Name = "PictureBox3"
|
|
||||||
Me.PictureBox3.Size = New System.Drawing.Size(159, 272)
|
|
||||||
Me.PictureBox3.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
|
||||||
Me.PictureBox3.TabIndex = 34
|
|
||||||
Me.PictureBox3.TabStop = False
|
|
||||||
'
|
|
||||||
'FrmInput1BindingSource
|
|
||||||
'
|
|
||||||
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, 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)
|
|
||||||
Me.Controls.Add(Me.TxtId)
|
|
||||||
Me.Controls.Add(Me.RBId)
|
|
||||||
Me.Controls.Add(Me.Lbl2)
|
|
||||||
Me.Controls.Add(Me.Lbl1)
|
|
||||||
Me.Controls.Add(Me.LblTitre)
|
|
||||||
Me.Controls.Add(Me.PictureBox1)
|
|
||||||
Me.Controls.Add(Me.PictureBox2)
|
|
||||||
Me.Controls.Add(Me.LblNext)
|
|
||||||
Me.Controls.Add(Me.CmdNext)
|
|
||||||
Me.Controls.Add(Me.CmdAnnul)
|
|
||||||
Me.Font = New System.Drawing.Font("Tahoma", 8.25!)
|
|
||||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
|
|
||||||
Me.MaximizeBox = False
|
|
||||||
Me.MaximumSize = New System.Drawing.Size(488, 355)
|
|
||||||
Me.MinimizeBox = False
|
|
||||||
Me.MinimumSize = New System.Drawing.Size(488, 355)
|
|
||||||
Me.Name = "FrmEdit"
|
|
||||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
|
||||||
Me.Tag = "Assistant édition de candidature (1/4)"
|
|
||||||
Me.Text = "Assistant édition de candidature (1/4)"
|
|
||||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
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()
|
|
||||||
|
|
||||||
End Sub
|
|
||||||
Friend WithEvents LblNext As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents CmdNext As System.Windows.Forms.Button
|
|
||||||
Friend WithEvents CmdAnnul As System.Windows.Forms.Button
|
|
||||||
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 Lbl2 As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents Lbl1 As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents LblTitre As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
|
|
||||||
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
|
|
||||||
1374
FrmEdit.resx
1374
FrmEdit.resx
File diff suppressed because it is too large
Load Diff
72
FrmEdit.vb
72
FrmEdit.vb
@@ -1,72 +0,0 @@
|
|||||||
Public Class FrmEdit
|
|
||||||
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.
|
|
||||||
'Selectedclef = FrmAccueil.IDlu
|
|
||||||
Call LectBdD() REM Contruit la liste des candidats NON supprim<69>s a partir du tableau d'index.
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
REM Fonctionne comme ca par defaut.
|
|
||||||
'Private Sub RBId_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RBId.CheckedChanged, RBNP.CheckedChanged
|
|
||||||
' If RBId.Checked Then
|
|
||||||
' RBNP.Checked = False
|
|
||||||
' End If
|
|
||||||
' If RBNP.Checked Then
|
|
||||||
' RBId.Checked = False
|
|
||||||
' End If
|
|
||||||
'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 CmdNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdNext.Click
|
|
||||||
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 <20>t<EFBFBD> supprim<69>, il ne peut pas <20>tre modifi<66>.", 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(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<6E>re feuille (Input3) enregistrera tout les modifications.
|
|
||||||
FrmInput1.Show()
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Private Sub CmdAnnul_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdAnnul.Click
|
|
||||||
Me.Close() REM On close pour r<>initialiser. Peut-<2D>tre on programmera une fonction pour reset plus vite, mais on remplacera par des hides. Plus dangereux a programmer.
|
|
||||||
FrmAccueil.Show()
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
Private Sub TxtId_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TxtId.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
|
|
||||||
|
|
||||||
End Class
|
|
||||||
379
FrmInput1.Designer.vb
generated
379
FrmInput1.Designer.vb
generated
@@ -1,379 +0,0 @@
|
|||||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
|
||||||
Partial Class FrmInput1
|
|
||||||
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)
|
|
||||||
If disposing AndAlso components IsNot Nothing Then
|
|
||||||
components.Dispose()
|
|
||||||
End If
|
|
||||||
MyBase.Dispose(disposing)
|
|
||||||
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(FrmInput1))
|
|
||||||
Me.LblCaR = New System.Windows.Forms.Label
|
|
||||||
Me.TxtVille = New System.Windows.Forms.TextBox
|
|
||||||
Me.TxtCP = New System.Windows.Forms.TextBox
|
|
||||||
Me.TxtAdrss = New System.Windows.Forms.TextBox
|
|
||||||
Me.TxtPrenom = New System.Windows.Forms.TextBox
|
|
||||||
Me.TxtNom = New System.Windows.Forms.TextBox
|
|
||||||
Me.LblAge = New System.Windows.Forms.Label
|
|
||||||
Me.LblVille = New System.Windows.Forms.Label
|
|
||||||
Me.LblCP = New System.Windows.Forms.Label
|
|
||||||
Me.LblAdrss = New System.Windows.Forms.Label
|
|
||||||
Me.LblPrenom = New System.Windows.Forms.Label
|
|
||||||
Me.LblNom = New System.Windows.Forms.Label
|
|
||||||
Me.Lbl1 = 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.SBHAge = New System.Windows.Forms.HScrollBar
|
|
||||||
Me.TxtMois = New System.Windows.Forms.TextBox
|
|
||||||
Me.TxtAns = New System.Windows.Forms.TextBox
|
|
||||||
Me.LblAns = New System.Windows.Forms.Label
|
|
||||||
Me.LblID = New System.Windows.Forms.Label
|
|
||||||
Me.LblINFmois = New System.Windows.Forms.Label
|
|
||||||
Me.LblINFAnn = New System.Windows.Forms.Label
|
|
||||||
Me.Label1 = New System.Windows.Forms.Label
|
|
||||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
||||||
Me.SuspendLayout()
|
|
||||||
'
|
|
||||||
'LblCaR
|
|
||||||
'
|
|
||||||
Me.LblCaR.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
|
||||||
Me.LblCaR.Location = New System.Drawing.Point(10, 293)
|
|
||||||
Me.LblCaR.Name = "LblCaR"
|
|
||||||
Me.LblCaR.Size = New System.Drawing.Size(279, 16)
|
|
||||||
Me.LblCaR.TabIndex = 10
|
|
||||||
Me.LblCaR.Text = "Vous disposez d'une minute restante."
|
|
||||||
Me.LblCaR.TextAlign = System.Drawing.ContentAlignment.TopRight
|
|
||||||
'
|
|
||||||
'TxtVille
|
|
||||||
'
|
|
||||||
Me.TxtVille.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper
|
|
||||||
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)
|
|
||||||
Me.TxtVille.TabIndex = 4
|
|
||||||
Me.Tlt1.SetToolTip(Me.TxtVille, "15 caractères alphabétiques au maximum.")
|
|
||||||
'
|
|
||||||
'TxtCP
|
|
||||||
'
|
|
||||||
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)
|
|
||||||
Me.TxtCP.TabIndex = 3
|
|
||||||
Me.Tlt1.SetToolTip(Me.TxtCP, "5 caractères numériques.")
|
|
||||||
'
|
|
||||||
'TxtAdrss
|
|
||||||
'
|
|
||||||
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)
|
|
||||||
Me.TxtAdrss.TabIndex = 2
|
|
||||||
Me.Tlt1.SetToolTip(Me.TxtAdrss, "10 caractères alphabétiques au maximum. Facultatif.")
|
|
||||||
'
|
|
||||||
'TxtPrenom
|
|
||||||
'
|
|
||||||
Me.TxtPrenom.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper
|
|
||||||
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)
|
|
||||||
Me.TxtPrenom.TabIndex = 1
|
|
||||||
Me.Tlt1.SetToolTip(Me.TxtPrenom, "6 caractères alphabétiques au maximum.")
|
|
||||||
'
|
|
||||||
'TxtNom
|
|
||||||
'
|
|
||||||
Me.TxtNom.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper
|
|
||||||
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)
|
|
||||||
Me.TxtNom.TabIndex = 0
|
|
||||||
Me.Tlt1.SetToolTip(Me.TxtNom, "8 caractères alphabétiques au maximum.")
|
|
||||||
'
|
|
||||||
'LblAge
|
|
||||||
'
|
|
||||||
Me.LblAge.Anchor = System.Windows.Forms.AnchorStyles.Top
|
|
||||||
Me.LblAge.AutoSize = True
|
|
||||||
Me.LblAge.Location = New System.Drawing.Point(38, 187)
|
|
||||||
Me.LblAge.Name = "LblAge"
|
|
||||||
Me.LblAge.Size = New System.Drawing.Size(102, 13)
|
|
||||||
Me.LblAge.TabIndex = 19
|
|
||||||
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(108, 161)
|
|
||||||
Me.LblVille.Name = "LblVille"
|
|
||||||
Me.LblVille.Size = New System.Drawing.Size(32, 13)
|
|
||||||
Me.LblVille.TabIndex = 18
|
|
||||||
Me.LblVille.Text = "Ville :"
|
|
||||||
Me.LblVille.TextAlign = System.Drawing.ContentAlignment.TopRight
|
|
||||||
'
|
|
||||||
'LblCP
|
|
||||||
'
|
|
||||||
Me.LblCP.Anchor = System.Windows.Forms.AnchorStyles.Top
|
|
||||||
Me.LblCP.AutoSize = True
|
|
||||||
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
|
|
||||||
Me.LblCP.Text = "Code Postal :"
|
|
||||||
Me.LblCP.TextAlign = System.Drawing.ContentAlignment.TopRight
|
|
||||||
'
|
|
||||||
'LblAdrss
|
|
||||||
'
|
|
||||||
Me.LblAdrss.Anchor = System.Windows.Forms.AnchorStyles.Top
|
|
||||||
Me.LblAdrss.AutoSize = True
|
|
||||||
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
|
|
||||||
Me.LblAdrss.Text = "Adresse :"
|
|
||||||
Me.LblAdrss.TextAlign = System.Drawing.ContentAlignment.TopRight
|
|
||||||
'
|
|
||||||
'LblPrenom
|
|
||||||
'
|
|
||||||
Me.LblPrenom.Anchor = System.Windows.Forms.AnchorStyles.Top
|
|
||||||
Me.LblPrenom.AutoSize = True
|
|
||||||
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
|
|
||||||
Me.LblPrenom.Text = "Prénom :"
|
|
||||||
Me.LblPrenom.TextAlign = System.Drawing.ContentAlignment.TopRight
|
|
||||||
'
|
|
||||||
'LblNom
|
|
||||||
'
|
|
||||||
Me.LblNom.Anchor = System.Windows.Forms.AnchorStyles.Top
|
|
||||||
Me.LblNom.AutoSize = True
|
|
||||||
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
|
|
||||||
Me.LblNom.Text = "Nom :"
|
|
||||||
Me.LblNom.TextAlign = System.Drawing.ContentAlignment.TopRight
|
|
||||||
'
|
|
||||||
'Lbl1
|
|
||||||
'
|
|
||||||
Me.Lbl1.AutoSize = True
|
|
||||||
Me.Lbl1.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
|
||||||
Me.Lbl1.Location = New System.Drawing.Point(89, 8)
|
|
||||||
Me.Lbl1.Name = "Lbl1"
|
|
||||||
Me.Lbl1.Size = New System.Drawing.Size(174, 13)
|
|
||||||
Me.Lbl1.TabIndex = 12
|
|
||||||
Me.Lbl1.Text = "Renseignez votre identité ici :"
|
|
||||||
'
|
|
||||||
'CmdNext
|
|
||||||
'
|
|
||||||
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 = 8
|
|
||||||
Me.CmdNext.Text = "&Suivant >"
|
|
||||||
Me.CmdNext.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CmdAnnul
|
|
||||||
'
|
|
||||||
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 = 9
|
|
||||||
Me.CmdAnnul.Text = "Annuler"
|
|
||||||
Me.CmdAnnul.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'PictureBox1
|
|
||||||
'
|
|
||||||
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
|
|
||||||
Me.PictureBox1.Location = New System.Drawing.Point(0, 272)
|
|
||||||
Me.PictureBox1.MaximumSize = New System.Drawing.Size(495, 2)
|
|
||||||
Me.PictureBox1.MinimumSize = New System.Drawing.Size(0, 2)
|
|
||||||
Me.PictureBox1.Name = "PictureBox1"
|
|
||||||
Me.PictureBox1.Size = New System.Drawing.Size(481, 2)
|
|
||||||
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
|
||||||
Me.PictureBox1.TabIndex = 19
|
|
||||||
Me.PictureBox1.TabStop = 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(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
|
|
||||||
Me.Tlt1.SetToolTip(Me.SBHAge, "L'age est comprit entre 25 et 55 ans.")
|
|
||||||
Me.SBHAge.Value = 480
|
|
||||||
'
|
|
||||||
'TxtMois
|
|
||||||
'
|
|
||||||
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
|
|
||||||
Me.TxtMois.Text = "1"
|
|
||||||
Me.Tlt1.SetToolTip(Me.TxtMois, "Mois de naissance en chiffre.")
|
|
||||||
'
|
|
||||||
'TxtAns
|
|
||||||
'
|
|
||||||
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
|
|
||||||
Me.TxtAns.Text = "0"
|
|
||||||
Me.Tlt1.SetToolTip(Me.TxtAns, "Année de naissance en chiffre.")
|
|
||||||
'
|
|
||||||
'LblAns
|
|
||||||
'
|
|
||||||
Me.LblAns.AutoSize = True
|
|
||||||
Me.LblAns.Location = New System.Drawing.Point(384, 200)
|
|
||||||
Me.LblAns.Name = "LblAns"
|
|
||||||
Me.LblAns.Size = New System.Drawing.Size(61, 13)
|
|
||||||
Me.LblAns.TabIndex = 20
|
|
||||||
Me.LblAns.Text = "Aujourd'hui"
|
|
||||||
'
|
|
||||||
'LblID
|
|
||||||
'
|
|
||||||
Me.LblID.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
|
||||||
Me.LblID.Location = New System.Drawing.Point(314, 8)
|
|
||||||
Me.LblID.Name = "LblID"
|
|
||||||
Me.LblID.Size = New System.Drawing.Size(156, 13)
|
|
||||||
Me.LblID.TabIndex = 13
|
|
||||||
Me.LblID.Text = "ID"
|
|
||||||
Me.LblID.TextAlign = System.Drawing.ContentAlignment.TopRight
|
|
||||||
Me.LblID.Visible = False
|
|
||||||
'
|
|
||||||
'LblINFmois
|
|
||||||
'
|
|
||||||
Me.LblINFmois.AutoSize = True
|
|
||||||
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
|
|
||||||
Me.LblINFmois.Text = "Mois :"
|
|
||||||
'
|
|
||||||
'LblINFAnn
|
|
||||||
'
|
|
||||||
Me.LblINFAnn.AutoSize = True
|
|
||||||
Me.LblINFAnn.Location = New System.Drawing.Point(254, 187)
|
|
||||||
Me.LblINFAnn.Name = "LblINFAnn"
|
|
||||||
Me.LblINFAnn.Size = New System.Drawing.Size(45, 13)
|
|
||||||
Me.LblINFAnn.TabIndex = 22
|
|
||||||
Me.LblINFAnn.Text = "Année :"
|
|
||||||
'
|
|
||||||
'Label1
|
|
||||||
'
|
|
||||||
Me.Label1.AutoSize = True
|
|
||||||
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(60, 13)
|
|
||||||
Me.Label1.TabIndex = 23
|
|
||||||
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, 327)
|
|
||||||
Me.ControlBox = False
|
|
||||||
Me.Controls.Add(Me.Label1)
|
|
||||||
Me.Controls.Add(Me.LblID)
|
|
||||||
Me.Controls.Add(Me.SBHAge)
|
|
||||||
Me.Controls.Add(Me.LblCaR)
|
|
||||||
Me.Controls.Add(Me.LblAns)
|
|
||||||
Me.Controls.Add(Me.LblINFAnn)
|
|
||||||
Me.Controls.Add(Me.TxtAns)
|
|
||||||
Me.Controls.Add(Me.LblINFmois)
|
|
||||||
Me.Controls.Add(Me.TxtMois)
|
|
||||||
Me.Controls.Add(Me.TxtVille)
|
|
||||||
Me.Controls.Add(Me.TxtCP)
|
|
||||||
Me.Controls.Add(Me.TxtAdrss)
|
|
||||||
Me.Controls.Add(Me.TxtPrenom)
|
|
||||||
Me.Controls.Add(Me.TxtNom)
|
|
||||||
Me.Controls.Add(Me.LblAge)
|
|
||||||
Me.Controls.Add(Me.LblVille)
|
|
||||||
Me.Controls.Add(Me.LblCP)
|
|
||||||
Me.Controls.Add(Me.LblAdrss)
|
|
||||||
Me.Controls.Add(Me.LblPrenom)
|
|
||||||
Me.Controls.Add(Me.LblNom)
|
|
||||||
Me.Controls.Add(Me.Lbl1)
|
|
||||||
Me.Controls.Add(Me.CmdNext)
|
|
||||||
Me.Controls.Add(Me.CmdAnnul)
|
|
||||||
Me.Controls.Add(Me.PictureBox1)
|
|
||||||
Me.Font = New System.Drawing.Font("Tahoma", 8.25!)
|
|
||||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
|
|
||||||
Me.MaximizeBox = False
|
|
||||||
Me.MaximumSize = New System.Drawing.Size(488, 355)
|
|
||||||
Me.MinimizeBox = False
|
|
||||||
Me.MinimumSize = New System.Drawing.Size(488, 355)
|
|
||||||
Me.Name = "FrmInput1"
|
|
||||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
|
||||||
Me.Tag = "Assistant inscription (2/4)"
|
|
||||||
Me.Text = "Assistant création de candidature (2/4)"
|
|
||||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
Me.ResumeLayout(False)
|
|
||||||
Me.PerformLayout()
|
|
||||||
|
|
||||||
End Sub
|
|
||||||
Friend WithEvents LblCaR As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents TxtVille As System.Windows.Forms.TextBox
|
|
||||||
Friend WithEvents TxtCP As System.Windows.Forms.TextBox
|
|
||||||
Friend WithEvents TxtAdrss As System.Windows.Forms.TextBox
|
|
||||||
Friend WithEvents TxtPrenom As System.Windows.Forms.TextBox
|
|
||||||
Friend WithEvents TxtNom As System.Windows.Forms.TextBox
|
|
||||||
Friend WithEvents LblAge As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents LblVille As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents LblCP As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents LblAdrss As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents LblPrenom As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents LblNom As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents Lbl1 As System.Windows.Forms.Label
|
|
||||||
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 TmrCaR As System.Windows.Forms.Timer
|
|
||||||
Friend WithEvents Tlt1 As System.Windows.Forms.ToolTip
|
|
||||||
Friend WithEvents SBHAge As System.Windows.Forms.HScrollBar
|
|
||||||
Friend WithEvents LblAns As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents LblID As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents TxtMois As System.Windows.Forms.TextBox
|
|
||||||
Friend WithEvents TxtAns As System.Windows.Forms.TextBox
|
|
||||||
Friend WithEvents LblINFmois As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents LblINFAnn As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
|
||||||
End Class
|
|
||||||
196
FrmInput1.resx
196
FrmInput1.resx
@@ -1,196 +0,0 @@
|
|||||||
<?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>
|
|
||||||
<metadata name="Tlt1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
|
||||||
<value>17, 17</value>
|
|
||||||
</metadata>
|
|
||||||
<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////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////Gy6goKCgoKCgoKCg
|
|
||||||
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
|
|
||||||
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="$this.Locked" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
|
||||||
<value>True</value>
|
|
||||||
</metadata>
|
|
||||||
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
|
||||||
<value>57</value>
|
|
||||||
</metadata>
|
|
||||||
</root>
|
|
||||||
257
FrmInput1.vb
257
FrmInput1.vb
@@ -1,257 +0,0 @@
|
|||||||
Public Class FrmInput1
|
|
||||||
Dim auj As Integer REM en mois. Today.Year*12 + Today.Month
|
|
||||||
Dim agea As Integer REM en ann<6E>es (enti<74>re), calcul<75> a partir de agem
|
|
||||||
Dim agemin, agemax As Integer REM Intervalle de l'age, calcul<75> 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<70>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 == <20>dition
|
|
||||||
Me.Tag = "Assistant <20>dition de candidature (2/4)"
|
|
||||||
Lbl1.Text = "Editez votre identit<69> 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'<27>dition.
|
|
||||||
End If
|
|
||||||
If Boule = False Then REM false == inscription
|
|
||||||
Me.Tag = "Assistant cr<63>ation de candidature (2/4)"
|
|
||||||
Lbl1.Text = "Renseignez votre identit<69> 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 <20>tat d'erreur ou non, de mani<6E>re g<>n<EFBFBD>ral.
|
|
||||||
Dim ChkNom, Chkprenom, ChkCP, ChkVille, ChkMois, chkAge, chkCP00 As Boolean REM retourne un <20>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<69> 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 = "<EFBFBD> La saisie du nom n'a pas <20>t<EFBFBD> effectu<74>e."
|
|
||||||
LblNom.ForeColor = Color.Red
|
|
||||||
End If
|
|
||||||
If TxtPrenom.Text = "" Then REM Le pr<70>nom est vide
|
|
||||||
Chkprenom = True
|
|
||||||
OK = False
|
|
||||||
LblPrenom.Tag = "<EFBFBD> La saisie du pr<70>nom n'a pas <20>t<EFBFBD> effectu<74>e."
|
|
||||||
LblPrenom.ForeColor = Color.Red
|
|
||||||
End If
|
|
||||||
If TxtCP.TextLength < 5 Then REM Le Code Postal ne fait pas 5 caract<63>res.
|
|
||||||
ChkCP = True
|
|
||||||
OK = False
|
|
||||||
LblCP.Tag = "<EFBFBD> La saisie du code postal est vide ou incompl<70>te."
|
|
||||||
LblCP.ForeColor = Color.Red
|
|
||||||
End If
|
|
||||||
If cp = 0 Then REM Le Code Postal commence par 00
|
|
||||||
chkCP00 = True
|
|
||||||
OK = False
|
|
||||||
TxtCP.Tag = "<EFBFBD> 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 = "<EFBFBD> La saisie de la ville n'a pas <20>t<EFBFBD> effectu<74>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 = "<EFBFBD> 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<70>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<70>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
|
|
||||||
FrmEdit.Close() REM ferme toutes les pages pr<70>c<EFBFBD>dentes
|
|
||||||
FrmNouv.Close()
|
|
||||||
Me.Close() REM ferme la page courante
|
|
||||||
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<70>c<EFBFBD>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<6E>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<63>er d'erreur et parceque la scrollbar ne permet pas de choisir des mois, mais des ann<6E>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<6D>che de mettre des mois sup<75>rieur a 12
|
|
||||||
If mois < 1 Then TxtMois.Text = 1 REM et inf<6E>rieur a 1
|
|
||||||
|
|
||||||
Call conv(mois, ans) REM convertit les valeurs entr<74>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<6E>es,mois en ann<6E>es. Elle prend un delta de mois, un mois ou un ann<6E>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 & " | " & 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
|
|
||||||
LblCaR.Text = "Vous disposez de " & LblCaR.Tag & " seconde."
|
|
||||||
End If
|
|
||||||
If LblCaR.Tag < 60 And LblCaR.Tag <> 1 Then
|
|
||||||
LblCaR.Text = "Vous disposez de " & LblCaR.Tag & " secondes."
|
|
||||||
End If
|
|
||||||
If LblCaR.Tag <= 10 Then
|
|
||||||
LblCaR.ForeColor = Color.Red
|
|
||||||
End If
|
|
||||||
If LblCaR.Tag <= 0 Then REM temps <20>coul<75>
|
|
||||||
TmrCaR.Stop() REM arret du timer
|
|
||||||
LblCaR.Text = "Le temps impartie est <20>coul<75>."
|
|
||||||
MsgBox("Le temps impartie est <20>coul<75>. L'inscription a <20>chou<6F>.", MsgBoxStyle.Exclamation, "Echec")
|
|
||||||
FrmEdit.Close() REM ferme les feuilles pr<70>c<EFBFBD>dement ferm<72>s
|
|
||||||
FrmNouv.Close() REM : Est-il necessaire de tester la feuille a fermer en fonction de l'<27>tat de boule ?
|
|
||||||
Me.Close() REM ferme la feuille pour la r<>initialiser
|
|
||||||
FrmAccueil.Show() REM retour a l'accueil
|
|
||||||
End If
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
|
|
||||||
End Class
|
|
||||||
585
FrmInput2.Designer.vb
generated
585
FrmInput2.Designer.vb
generated
@@ -1,585 +0,0 @@
|
|||||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
|
||||||
Partial Class FrmInput2
|
|
||||||
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)
|
|
||||||
If disposing AndAlso components IsNot Nothing Then
|
|
||||||
components.Dispose()
|
|
||||||
End If
|
|
||||||
MyBase.Dispose(disposing)
|
|
||||||
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(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.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.PnlFac.SuspendLayout()
|
|
||||||
Me.GBOral.SuspendLayout()
|
|
||||||
Me.GBEcrit.SuspendLayout()
|
|
||||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
||||||
Me.SuspendLayout()
|
|
||||||
'
|
|
||||||
'CboRegion
|
|
||||||
'
|
|
||||||
Me.CboRegion.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
|
||||||
Me.CboRegion.FormattingEnabled = True
|
|
||||||
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
|
|
||||||
Me.Tlt1.SetToolTip(Me.CboRegion, "Sélectionnez la région de passage de vos examens.")
|
|
||||||
'
|
|
||||||
'PnlFac
|
|
||||||
'
|
|
||||||
Me.PnlFac.Controls.Add(Me.LblFac2)
|
|
||||||
Me.PnlFac.Controls.Add(Me.CboFac)
|
|
||||||
Me.PnlFac.Controls.Add(Me.RBno)
|
|
||||||
Me.PnlFac.Controls.Add(Me.RBYes)
|
|
||||||
Me.PnlFac.Controls.Add(Me.LblFac1)
|
|
||||||
Me.PnlFac.Location = New System.Drawing.Point(1, 217)
|
|
||||||
Me.PnlFac.Name = "PnlFac"
|
|
||||||
Me.PnlFac.Size = New System.Drawing.Size(469, 50)
|
|
||||||
Me.PnlFac.TabIndex = 3
|
|
||||||
'
|
|
||||||
'LblFac2
|
|
||||||
'
|
|
||||||
Me.LblFac2.AutoSize = True
|
|
||||||
Me.LblFac2.Location = New System.Drawing.Point(20, 25)
|
|
||||||
Me.LblFac2.Name = "LblFac2"
|
|
||||||
Me.LblFac2.Size = New System.Drawing.Size(46, 13)
|
|
||||||
Me.LblFac2.TabIndex = 3
|
|
||||||
Me.LblFac2.Text = "Laquel ?"
|
|
||||||
'
|
|
||||||
'CboFac
|
|
||||||
'
|
|
||||||
Me.CboFac.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
|
||||||
Me.CboFac.FormattingEnabled = True
|
|
||||||
Me.CboFac.Location = New System.Drawing.Point(72, 22)
|
|
||||||
Me.CboFac.Name = "CboFac"
|
|
||||||
Me.CboFac.Size = New System.Drawing.Size(179, 21)
|
|
||||||
Me.CboFac.TabIndex = 2
|
|
||||||
'
|
|
||||||
'RBno
|
|
||||||
'
|
|
||||||
Me.RBno.AutoSize = True
|
|
||||||
Me.RBno.Location = New System.Drawing.Point(260, 3)
|
|
||||||
Me.RBno.Name = "RBno"
|
|
||||||
Me.RBno.Size = New System.Drawing.Size(44, 17)
|
|
||||||
Me.RBno.TabIndex = 0
|
|
||||||
Me.RBno.TabStop = True
|
|
||||||
Me.RBno.Text = "Non"
|
|
||||||
Me.RBno.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'RBYes
|
|
||||||
'
|
|
||||||
Me.RBYes.AutoSize = True
|
|
||||||
Me.RBYes.Location = New System.Drawing.Point(310, 3)
|
|
||||||
Me.RBYes.Name = "RBYes"
|
|
||||||
Me.RBYes.Size = New System.Drawing.Size(41, 17)
|
|
||||||
Me.RBYes.TabIndex = 1
|
|
||||||
Me.RBYes.TabStop = True
|
|
||||||
Me.RBYes.Text = "Oui"
|
|
||||||
Me.RBYes.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'LblFac1
|
|
||||||
'
|
|
||||||
Me.LblFac1.AutoSize = True
|
|
||||||
Me.LblFac1.Location = New System.Drawing.Point(9, 5)
|
|
||||||
Me.LblFac1.Name = "LblFac1"
|
|
||||||
Me.LblFac1.Size = New System.Drawing.Size(242, 13)
|
|
||||||
Me.LblFac1.TabIndex = 4
|
|
||||||
Me.LblFac1.Text = "Voulez-vous participer à un épreuve facultative ?"
|
|
||||||
'
|
|
||||||
'LblCaR
|
|
||||||
'
|
|
||||||
Me.LblCaR.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
|
||||||
Me.LblCaR.Location = New System.Drawing.Point(12, 293)
|
|
||||||
Me.LblCaR.Name = "LblCaR"
|
|
||||||
Me.LblCaR.Size = New System.Drawing.Size(273, 18)
|
|
||||||
Me.LblCaR.TabIndex = 7
|
|
||||||
Me.LblCaR.Text = "Vous disposez d'une minute et 15 secondes restantes."
|
|
||||||
Me.LblCaR.TextAlign = System.Drawing.ContentAlignment.TopRight
|
|
||||||
'
|
|
||||||
'LblRegion
|
|
||||||
'
|
|
||||||
Me.LblRegion.AutoSize = True
|
|
||||||
Me.LblRegion.Location = New System.Drawing.Point(9, 30)
|
|
||||||
Me.LblRegion.Name = "LblRegion"
|
|
||||||
Me.LblRegion.Size = New System.Drawing.Size(157, 13)
|
|
||||||
Me.LblRegion.TabIndex = 10
|
|
||||||
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.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)
|
|
||||||
Me.GBOral.Location = New System.Drawing.Point(245, 52)
|
|
||||||
Me.GBOral.Name = "GBOral"
|
|
||||||
Me.GBOral.Size = New System.Drawing.Size(225, 146)
|
|
||||||
Me.GBOral.TabIndex = 2
|
|
||||||
Me.GBOral.TabStop = False
|
|
||||||
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(87, 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(87, 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(87, 17)
|
|
||||||
Me.CheckBox16.TabIndex = 27
|
|
||||||
Me.CheckBox16.Text = "CheckBox16"
|
|
||||||
Me.CheckBox16.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox21
|
|
||||||
'
|
|
||||||
Me.CheckBox21.AutoSize = True
|
|
||||||
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(87, 17)
|
|
||||||
Me.CheckBox21.TabIndex = 13
|
|
||||||
Me.CheckBox21.Text = "CheckBox21"
|
|
||||||
Me.CheckBox21.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox20
|
|
||||||
'
|
|
||||||
Me.CheckBox20.AutoSize = True
|
|
||||||
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(87, 17)
|
|
||||||
Me.CheckBox20.TabIndex = 14
|
|
||||||
Me.CheckBox20.Text = "CheckBox20"
|
|
||||||
Me.CheckBox20.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox19
|
|
||||||
'
|
|
||||||
Me.CheckBox19.AutoSize = True
|
|
||||||
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(87, 17)
|
|
||||||
Me.CheckBox19.TabIndex = 15
|
|
||||||
Me.CheckBox19.Text = "CheckBox19"
|
|
||||||
Me.CheckBox19.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox15
|
|
||||||
'
|
|
||||||
Me.CheckBox15.AutoSize = True
|
|
||||||
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(87, 17)
|
|
||||||
Me.CheckBox15.TabIndex = 19
|
|
||||||
Me.CheckBox15.Text = "CheckBox15"
|
|
||||||
Me.CheckBox15.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox14
|
|
||||||
'
|
|
||||||
Me.CheckBox14.AutoSize = True
|
|
||||||
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(87, 17)
|
|
||||||
Me.CheckBox14.TabIndex = 20
|
|
||||||
Me.CheckBox14.Text = "CheckBox14"
|
|
||||||
Me.CheckBox14.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox13
|
|
||||||
'
|
|
||||||
Me.CheckBox13.AutoSize = True
|
|
||||||
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(87, 17)
|
|
||||||
Me.CheckBox13.TabIndex = 21
|
|
||||||
Me.CheckBox13.Text = "CheckBox13"
|
|
||||||
Me.CheckBox13.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'GBEcrit
|
|
||||||
'
|
|
||||||
Me.GBEcrit.Controls.Add(Me.CheckBox12)
|
|
||||||
Me.GBEcrit.Controls.Add(Me.CheckBox11)
|
|
||||||
Me.GBEcrit.Controls.Add(Me.CheckBox10)
|
|
||||||
Me.GBEcrit.Controls.Add(Me.CheckBox9)
|
|
||||||
Me.GBEcrit.Controls.Add(Me.CheckBox8)
|
|
||||||
Me.GBEcrit.Controls.Add(Me.CheckBox7)
|
|
||||||
Me.GBEcrit.Controls.Add(Me.CheckBox6)
|
|
||||||
Me.GBEcrit.Controls.Add(Me.CheckBox5)
|
|
||||||
Me.GBEcrit.Controls.Add(Me.CheckBox4)
|
|
||||||
Me.GBEcrit.Controls.Add(Me.CheckBox3)
|
|
||||||
Me.GBEcrit.Controls.Add(Me.CheckBox2)
|
|
||||||
Me.GBEcrit.Controls.Add(Me.CheckBox1)
|
|
||||||
Me.GBEcrit.Location = New System.Drawing.Point(10, 52)
|
|
||||||
Me.GBEcrit.Name = "GBEcrit"
|
|
||||||
Me.GBEcrit.Size = New System.Drawing.Size(225, 146)
|
|
||||||
Me.GBEcrit.TabIndex = 1
|
|
||||||
Me.GBEcrit.TabStop = False
|
|
||||||
Me.GBEcrit.Text = "Passages à l'écrit : "
|
|
||||||
Me.Tlt1.SetToolTip(Me.GBEcrit, "Choisissez 4 épreuves a l'écrit au maximum.")
|
|
||||||
'
|
|
||||||
'CheckBox12
|
|
||||||
'
|
|
||||||
Me.CheckBox12.AutoSize = True
|
|
||||||
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(87, 17)
|
|
||||||
Me.CheckBox12.TabIndex = 1
|
|
||||||
Me.CheckBox12.Text = "CheckBox12"
|
|
||||||
Me.CheckBox12.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox11
|
|
||||||
'
|
|
||||||
Me.CheckBox11.AutoSize = True
|
|
||||||
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(87, 17)
|
|
||||||
Me.CheckBox11.TabIndex = 2
|
|
||||||
Me.CheckBox11.Text = "CheckBox11"
|
|
||||||
Me.CheckBox11.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox10
|
|
||||||
'
|
|
||||||
Me.CheckBox10.AutoSize = True
|
|
||||||
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(87, 17)
|
|
||||||
Me.CheckBox10.TabIndex = 3
|
|
||||||
Me.CheckBox10.Text = "CheckBox10"
|
|
||||||
Me.CheckBox10.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox9
|
|
||||||
'
|
|
||||||
Me.CheckBox9.AutoSize = True
|
|
||||||
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(81, 17)
|
|
||||||
Me.CheckBox9.TabIndex = 4
|
|
||||||
Me.CheckBox9.Text = "CheckBox9"
|
|
||||||
Me.CheckBox9.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox8
|
|
||||||
'
|
|
||||||
Me.CheckBox8.AutoSize = True
|
|
||||||
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(81, 17)
|
|
||||||
Me.CheckBox8.TabIndex = 5
|
|
||||||
Me.CheckBox8.Text = "CheckBox8"
|
|
||||||
Me.CheckBox8.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox7
|
|
||||||
'
|
|
||||||
Me.CheckBox7.AutoSize = True
|
|
||||||
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(81, 17)
|
|
||||||
Me.CheckBox7.TabIndex = 6
|
|
||||||
Me.CheckBox7.Text = "CheckBox7"
|
|
||||||
Me.CheckBox7.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox6
|
|
||||||
'
|
|
||||||
Me.CheckBox6.AutoSize = True
|
|
||||||
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(81, 17)
|
|
||||||
Me.CheckBox6.TabIndex = 7
|
|
||||||
Me.CheckBox6.Text = "CheckBox6"
|
|
||||||
Me.CheckBox6.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox5
|
|
||||||
'
|
|
||||||
Me.CheckBox5.AutoSize = True
|
|
||||||
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(81, 17)
|
|
||||||
Me.CheckBox5.TabIndex = 8
|
|
||||||
Me.CheckBox5.Text = "CheckBox5"
|
|
||||||
Me.CheckBox5.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox4
|
|
||||||
'
|
|
||||||
Me.CheckBox4.AutoSize = True
|
|
||||||
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(81, 17)
|
|
||||||
Me.CheckBox4.TabIndex = 9
|
|
||||||
Me.CheckBox4.Text = "CheckBox4"
|
|
||||||
Me.CheckBox4.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox3
|
|
||||||
'
|
|
||||||
Me.CheckBox3.AutoSize = True
|
|
||||||
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(81, 17)
|
|
||||||
Me.CheckBox3.TabIndex = 10
|
|
||||||
Me.CheckBox3.Text = "CheckBox3"
|
|
||||||
Me.CheckBox3.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox2
|
|
||||||
'
|
|
||||||
Me.CheckBox2.AutoSize = True
|
|
||||||
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(81, 17)
|
|
||||||
Me.CheckBox2.TabIndex = 11
|
|
||||||
Me.CheckBox2.Text = "CheckBox2"
|
|
||||||
Me.CheckBox2.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CheckBox1
|
|
||||||
'
|
|
||||||
Me.CheckBox1.AutoSize = True
|
|
||||||
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(81, 17)
|
|
||||||
Me.CheckBox1.TabIndex = 12
|
|
||||||
Me.CheckBox1.Text = "CheckBox1"
|
|
||||||
Me.CheckBox1.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'Lbl1
|
|
||||||
'
|
|
||||||
Me.Lbl1.AutoSize = True
|
|
||||||
Me.Lbl1.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
|
||||||
Me.Lbl1.Location = New System.Drawing.Point(7, 9)
|
|
||||||
Me.Lbl1.Name = "Lbl1"
|
|
||||||
Me.Lbl1.Size = New System.Drawing.Size(298, 13)
|
|
||||||
Me.Lbl1.TabIndex = 9
|
|
||||||
Me.Lbl1.Text = "Choisissez les examens que vous souhaitez passer :"
|
|
||||||
'
|
|
||||||
'LblNP
|
|
||||||
'
|
|
||||||
Me.LblNP.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
|
||||||
Me.LblNP.Location = New System.Drawing.Point(314, 11)
|
|
||||||
Me.LblNP.Name = "LblNP"
|
|
||||||
Me.LblNP.Size = New System.Drawing.Size(156, 13)
|
|
||||||
Me.LblNP.TabIndex = 8
|
|
||||||
Me.LblNP.Text = "ID - Nom Prenom"
|
|
||||||
Me.LblNP.TextAlign = System.Drawing.ContentAlignment.TopRight
|
|
||||||
'
|
|
||||||
'CmdNext
|
|
||||||
'
|
|
||||||
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 = 4
|
|
||||||
Me.CmdNext.Text = "&Suivant >"
|
|
||||||
Me.CmdNext.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CmdAnnul
|
|
||||||
'
|
|
||||||
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 = 5
|
|
||||||
Me.CmdAnnul.Text = "Annuler"
|
|
||||||
Me.CmdAnnul.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'PictureBox1
|
|
||||||
'
|
|
||||||
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
|
|
||||||
Me.PictureBox1.Location = New System.Drawing.Point(1, 272)
|
|
||||||
Me.PictureBox1.MaximumSize = New System.Drawing.Size(495, 2)
|
|
||||||
Me.PictureBox1.MinimumSize = New System.Drawing.Size(0, 2)
|
|
||||||
Me.PictureBox1.Name = "PictureBox1"
|
|
||||||
Me.PictureBox1.Size = New System.Drawing.Size(481, 2)
|
|
||||||
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
|
||||||
Me.PictureBox1.TabIndex = 40
|
|
||||||
Me.PictureBox1.TabStop = False
|
|
||||||
'
|
|
||||||
'TmrCaR
|
|
||||||
'
|
|
||||||
Me.TmrCaR.Interval = 1000
|
|
||||||
'
|
|
||||||
'LblNbEcr
|
|
||||||
'
|
|
||||||
Me.LblNbEcr.Location = New System.Drawing.Point(10, 201)
|
|
||||||
Me.LblNbEcr.Name = "LblNbEcr"
|
|
||||||
Me.LblNbEcr.Size = New System.Drawing.Size(225, 13)
|
|
||||||
Me.LblNbEcr.TabIndex = 11
|
|
||||||
Me.LblNbEcr.TextAlign = System.Drawing.ContentAlignment.TopCenter
|
|
||||||
'
|
|
||||||
'LblNbOral
|
|
||||||
'
|
|
||||||
Me.LblNbOral.Location = New System.Drawing.Point(245, 201)
|
|
||||||
Me.LblNbOral.Name = "LblNbOral"
|
|
||||||
Me.LblNbOral.Size = New System.Drawing.Size(225, 13)
|
|
||||||
Me.LblNbOral.TabIndex = 12
|
|
||||||
Me.LblNbOral.TextAlign = System.Drawing.ContentAlignment.TopCenter
|
|
||||||
'
|
|
||||||
'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, 327)
|
|
||||||
Me.ControlBox = False
|
|
||||||
Me.Controls.Add(Me.LblNbOral)
|
|
||||||
Me.Controls.Add(Me.LblNbEcr)
|
|
||||||
Me.Controls.Add(Me.CboRegion)
|
|
||||||
Me.Controls.Add(Me.PnlFac)
|
|
||||||
Me.Controls.Add(Me.LblCaR)
|
|
||||||
Me.Controls.Add(Me.LblRegion)
|
|
||||||
Me.Controls.Add(Me.GBOral)
|
|
||||||
Me.Controls.Add(Me.GBEcrit)
|
|
||||||
Me.Controls.Add(Me.Lbl1)
|
|
||||||
Me.Controls.Add(Me.CmdNext)
|
|
||||||
Me.Controls.Add(Me.CmdAnnul)
|
|
||||||
Me.Controls.Add(Me.PictureBox1)
|
|
||||||
Me.Controls.Add(Me.LblNP)
|
|
||||||
Me.Font = New System.Drawing.Font("Tahoma", 8.25!)
|
|
||||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
|
|
||||||
Me.MaximizeBox = False
|
|
||||||
Me.MaximumSize = New System.Drawing.Size(488, 355)
|
|
||||||
Me.MinimizeBox = False
|
|
||||||
Me.MinimumSize = New System.Drawing.Size(488, 355)
|
|
||||||
Me.Name = "FrmInput2"
|
|
||||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
|
||||||
Me.Tag = "Assistant inscription (3/4)"
|
|
||||||
Me.Text = "Assistant création de candidature (3/4)"
|
|
||||||
Me.PnlFac.ResumeLayout(False)
|
|
||||||
Me.PnlFac.PerformLayout()
|
|
||||||
Me.GBOral.ResumeLayout(False)
|
|
||||||
Me.GBOral.PerformLayout()
|
|
||||||
Me.GBEcrit.ResumeLayout(False)
|
|
||||||
Me.GBEcrit.PerformLayout()
|
|
||||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
Me.ResumeLayout(False)
|
|
||||||
Me.PerformLayout()
|
|
||||||
|
|
||||||
End Sub
|
|
||||||
Friend WithEvents CboRegion As System.Windows.Forms.ComboBox
|
|
||||||
Friend WithEvents PnlFac As System.Windows.Forms.Panel
|
|
||||||
Friend WithEvents RBno As System.Windows.Forms.RadioButton
|
|
||||||
Friend WithEvents RBYes As System.Windows.Forms.RadioButton
|
|
||||||
Friend WithEvents LblFac1 As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents LblCaR As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents LblRegion As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents GBOral As System.Windows.Forms.GroupBox
|
|
||||||
Friend WithEvents GBEcrit As System.Windows.Forms.GroupBox
|
|
||||||
Friend WithEvents CheckBox12 As System.Windows.Forms.CheckBox
|
|
||||||
Friend WithEvents CheckBox11 As System.Windows.Forms.CheckBox
|
|
||||||
Friend WithEvents CheckBox10 As System.Windows.Forms.CheckBox
|
|
||||||
Friend WithEvents CheckBox9 As System.Windows.Forms.CheckBox
|
|
||||||
Friend WithEvents CheckBox8 As System.Windows.Forms.CheckBox
|
|
||||||
Friend WithEvents CheckBox7 As System.Windows.Forms.CheckBox
|
|
||||||
Friend WithEvents CheckBox6 As System.Windows.Forms.CheckBox
|
|
||||||
Friend WithEvents CheckBox5 As System.Windows.Forms.CheckBox
|
|
||||||
Friend WithEvents CheckBox4 As System.Windows.Forms.CheckBox
|
|
||||||
Friend WithEvents CheckBox3 As System.Windows.Forms.CheckBox
|
|
||||||
Friend WithEvents CheckBox2 As System.Windows.Forms.CheckBox
|
|
||||||
Friend WithEvents CheckBox1 As System.Windows.Forms.CheckBox
|
|
||||||
Friend WithEvents Lbl1 As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents LblNP As System.Windows.Forms.Label
|
|
||||||
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 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
|
|
||||||
End Class
|
|
||||||
193
FrmInput2.resx
193
FrmInput2.resx
@@ -1,193 +0,0 @@
|
|||||||
<?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>
|
|
||||||
<metadata name="Tlt1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
|
||||||
<value>108, 17</value>
|
|
||||||
</metadata>
|
|
||||||
<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////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////LgCgoKCgoKCgoKCg
|
|
||||||
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
|
|
||||||
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKAuAA==
|
|
||||||
</value>
|
|
||||||
</data>
|
|
||||||
<metadata name="TmrCaR.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>
|
|
||||||
</root>
|
|
||||||
283
FrmInput2.vb
283
FrmInput2.vb
@@ -1,283 +0,0 @@
|
|||||||
Public Class FrmInput2
|
|
||||||
REM variables public a la feuille (classe)
|
|
||||||
Dim treg() As String = {"Auvergne", "Bordelais", "Bretagne", "Morvan", "Nord", "Normandie", "Paris", "Poitou"}
|
|
||||||
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 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'<27>crit
|
|
||||||
CB.Text = tme(i)
|
|
||||||
i += 1
|
|
||||||
Next
|
|
||||||
|
|
||||||
If Boule = True Then REM edition
|
|
||||||
Me.Tag = "Assistant <20>dition de candidature (3/4)"
|
|
||||||
|
|
||||||
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
|
|
||||||
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
|
|
||||||
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.SelectedItem = tme(IndexFac)
|
|
||||||
End If
|
|
||||||
|
|
||||||
End If
|
|
||||||
If Boule = False Then REM inscription
|
|
||||||
Me.Tag = "Assistant cr<63>ation de candidature (3/4)"
|
|
||||||
LblNP.Text = FrmInput1.TxtNom.Text & " " & FrmInput1.TxtPrenom.Text REM Reprend le nom et le pr<70>nom depuis la feuille input1.
|
|
||||||
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
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
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<65>tres...
|
|
||||||
FrmNouv.Close()
|
|
||||||
FrmInput1.Close()
|
|
||||||
Me.Close()
|
|
||||||
FrmAccueil.Show() REM retour a l'accueil
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
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 & " | " & Horaire & " | Temps restant : 1:" & Format(LblCaR.Tag - 60, "00")
|
|
||||||
End If
|
|
||||||
If LblCaR.Tag < 60 And LblCaR.Tag > 0 Then
|
|
||||||
Me.Text = Me.Tag & " | " & Horaire & " | Temps restant : " & LblCaR.Tag
|
|
||||||
End If
|
|
||||||
If LblCaR.Tag = 0 Then
|
|
||||||
Me.Text = Me.Tag & " | " & Horaire
|
|
||||||
End If
|
|
||||||
If LblCaR.Tag <= 1 Then
|
|
||||||
LblCaR.Text = "Vous disposez de " & LblCaR.Tag & " seconde restante."
|
|
||||||
End If
|
|
||||||
If LblCaR.Tag > 61 Then
|
|
||||||
LblCaR.Text = "Vous disposez d'une minute et " & LblCaR.Tag - 60 & " secondes restantes."
|
|
||||||
End If
|
|
||||||
If LblCaR.Tag = 61 Then
|
|
||||||
LblCaR.Text = "Vous disposez d'une minute et " & LblCaR.Tag - 60 & " seconde restante."
|
|
||||||
End If
|
|
||||||
If LblCaR.Tag <= 60 And LblCaR.Tag <> 1 Then
|
|
||||||
LblCaR.Text = "Vous disposez de " & LblCaR.Tag & " secondes restantes."
|
|
||||||
End If
|
|
||||||
If LblCaR.Tag <= 10 Then
|
|
||||||
LblCaR.ForeColor = Color.Red
|
|
||||||
End If
|
|
||||||
If LblCaR.Tag <= 0 Then
|
|
||||||
TmrCaR.Stop()
|
|
||||||
LblCaR.Text = "Le temps impartie est <20>coul<75>e."
|
|
||||||
MsgBox("Le temps impartie est <20>coul<75>. L'inscription a <20>chou<6F>.", MsgBoxStyle.Exclamation, "Echec")
|
|
||||||
FrmEdit.Close()
|
|
||||||
FrmInput1.Close()
|
|
||||||
FrmNouv.Close()
|
|
||||||
Me.Close()
|
|
||||||
FrmAccueil.Show()
|
|
||||||
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
|
|
||||||
Dim i As Integer = 0
|
|
||||||
|
|
||||||
REM Convertit l'index du combobox en l'<27>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 <20>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 <20>tes sur le point de supprimer une candidature. Voulez-vous continuer ?", MsgBoxStyle.YesNo + MsgBoxStyle.Question, "Suppression d'un candidat")
|
|
||||||
If quit = 6 Then
|
|
||||||
MsgBox("Le Candidat a bien <20>t<EFBFBD> supprim<69>.", MsgBoxStyle.Information, "Information")
|
|
||||||
FrmEdit.Close()
|
|
||||||
FrmNouv.Close()
|
|
||||||
FrmInput1.Close()
|
|
||||||
Me.Close()
|
|
||||||
FrmAccueil.Show()
|
|
||||||
End If
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
'Private Sub CmdPre_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
|
|
||||||
' REM retour au pr<70>c<EFBFBD>dent
|
|
||||||
' Me.Hide()
|
|
||||||
' FrmInput1.Show()
|
|
||||||
'End Sub
|
|
||||||
|
|
||||||
Private Sub RB_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RBno.CheckedChanged
|
|
||||||
If RBno.Checked Then
|
|
||||||
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
|
|
||||||
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<75>t que dans la fonction DeclencheurdeFacultatif car il est recalcul<75> apr<70>s avoir choisit la possibilit<69> des examens, et non a chaque clique des cases. De plus, ca pose un probl<62>me de reset.
|
|
||||||
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
|
|
||||||
GBOral.Enabled = False
|
|
||||||
End If
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Private Sub SecureEcritMAX4(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged, CheckBox2.CheckedChanged, CheckBox3.CheckedChanged, CheckBox4.CheckedChanged, CheckBox5.CheckedChanged, CheckBox6.CheckedChanged, CheckBox7.CheckedChanged, CheckBox8.CheckedChanged, CheckBox9.CheckedChanged, CheckBox10.CheckedChanged, CheckBox11.CheckedChanged, CheckBox12.CheckedChanged
|
|
||||||
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, "Trop de choix")
|
|
||||||
sender.checkstate = CheckState.Unchecked
|
|
||||||
End If
|
|
||||||
Else
|
|
||||||
ctre -= 1
|
|
||||||
End If
|
|
||||||
|
|
||||||
DeclencheurDeFacultatif() REM Appelle la fonction qui d<>clenche l'affichage du choix de l'exam facultatif
|
|
||||||
|
|
||||||
REM Regule l'affichage du nombre d'examen choisit.
|
|
||||||
If ctre = 0 Then
|
|
||||||
LblNbEcr.Text = ""
|
|
||||||
ElseIf ctre = 1 Then
|
|
||||||
LblNbEcr.Text = ctre & " examen <20>crit choisit sur 4."
|
|
||||||
Else
|
|
||||||
LblNbEcr.Text = ctre & " examens <20>crits choisit sur 4."
|
|
||||||
End If
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
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, "Trop de choix")
|
|
||||||
sender.checkstate = CheckState.Unchecked
|
|
||||||
End If
|
|
||||||
Else
|
|
||||||
ctro -= 1
|
|
||||||
End If
|
|
||||||
|
|
||||||
DeclencheurDeFacultatif()
|
|
||||||
If ctro = 0 Then
|
|
||||||
LblNbOral.Text = ""
|
|
||||||
ElseIf ctro = 1 Then
|
|
||||||
LblNbOral.Text = ctro & " examen oral choisit sur 3."
|
|
||||||
Else
|
|
||||||
LblNbOral.Text = ctro & " examens oraux choisit sur 3."
|
|
||||||
End If
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Private Sub ChageAllemand(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox12.CheckedChanged, CheckBox21.CheckedChanged
|
|
||||||
CheckBox21.Enabled = Not CheckBox12.Checked REM Active/D<>sactive la ChB de l'oral en fonction de l'<27>tat de la ChB de l'<27>crit.
|
|
||||||
CheckBox12.Enabled = Not CheckBox21.Checked REM Idem mais en fonction de l'oral
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Private Sub ChangeAnglais(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox11.CheckedChanged, CheckBox20.CheckedChanged
|
|
||||||
CheckBox20.Enabled = Not CheckBox11.Checked REM Active/D<>sactive la ChB de l'oral en fonction de l'<27>tat de la ChB de l'<27>crit.
|
|
||||||
CheckBox11.Enabled = Not CheckBox20.Checked REM Idem mais en fonction de l'oral
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Private Sub ChangeAstronomie(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox10.CheckedChanged, CheckBox19.CheckedChanged
|
|
||||||
CheckBox19.Enabled = Not CheckBox10.Checked REM Active/D<>sactive la ChB de l'oral en fonction de l'<27>tat de la ChB de l'<27>crit.
|
|
||||||
CheckBox10.Enabled = Not CheckBox19.Checked REM Idem mais en fonction de l'oral
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
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'<27>tat de la ChB de l'<27>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 CheckBox8.CheckedChanged, CheckBox14.CheckedChanged
|
|
||||||
CheckBox14.Enabled = Not CheckBox8.Checked REM Active/D<>sactive la ChB de l'oral en fonction de l'<27>tat de la ChB de l'<27>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 CheckBox7.CheckedChanged, CheckBox13.CheckedChanged
|
|
||||||
CheckBox13.Enabled = Not CheckBox7.Checked REM Active/D<>sactive la ChB de l'oral en fonction de l'<27>tat de la ChB de l'<27>crit.
|
|
||||||
CheckBox7.Enabled = Not CheckBox13.Checked REM Idem mais en fonction de l'oral
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Private Sub DeclencheurDeFacultatif()
|
|
||||||
If ctre + ctro = 7 Then REM Affiche les facultatifs apr<70>s avoir coch<63> tout les examens obligatoire
|
|
||||||
PnlFac.Visible = True
|
|
||||||
Else REM Cache tout.
|
|
||||||
PnlFac.Visible = False
|
|
||||||
End If
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
|
|
||||||
End Class
|
|
||||||
215
FrmInput3.Designer.vb
generated
215
FrmInput3.Designer.vb
generated
@@ -1,215 +0,0 @@
|
|||||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
|
||||||
Partial Class FrmInput3
|
|
||||||
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)
|
|
||||||
If disposing AndAlso components IsNot Nothing Then
|
|
||||||
components.Dispose()
|
|
||||||
End If
|
|
||||||
MyBase.Dispose(disposing)
|
|
||||||
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(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()
|
|
||||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
||||||
Me.SuspendLayout()
|
|
||||||
'
|
|
||||||
'Lbl2
|
|
||||||
'
|
|
||||||
Me.Lbl2.AutoSize = True
|
|
||||||
Me.Lbl2.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
|
||||||
Me.Lbl2.Location = New System.Drawing.Point(246, 65)
|
|
||||||
Me.Lbl2.Name = "Lbl2"
|
|
||||||
Me.Lbl2.Size = New System.Drawing.Size(57, 13)
|
|
||||||
Me.Lbl2.TabIndex = 11
|
|
||||||
Me.Lbl2.Text = "Examens :"
|
|
||||||
'
|
|
||||||
'Lbl1
|
|
||||||
'
|
|
||||||
Me.Lbl1.AutoSize = True
|
|
||||||
Me.Lbl1.Location = New System.Drawing.Point(27, 65)
|
|
||||||
Me.Lbl1.Name = "Lbl1"
|
|
||||||
Me.Lbl1.Size = New System.Drawing.Size(57, 13)
|
|
||||||
Me.Lbl1.TabIndex = 5
|
|
||||||
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(41, 160)
|
|
||||||
Me.LblAge.Name = "LblAge"
|
|
||||||
Me.LblAge.Size = New System.Drawing.Size(142, 14)
|
|
||||||
Me.LblAge.TabIndex = 9
|
|
||||||
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(41, 140)
|
|
||||||
Me.LblCPV.Name = "LblCPV"
|
|
||||||
Me.LblCPV.Size = New System.Drawing.Size(100, 14)
|
|
||||||
Me.LblCPV.TabIndex = 8
|
|
||||||
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(41, 120)
|
|
||||||
Me.LblAdrss.Name = "LblAdrss"
|
|
||||||
Me.LblAdrss.Size = New System.Drawing.Size(50, 14)
|
|
||||||
Me.LblAdrss.TabIndex = 7
|
|
||||||
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(41, 100)
|
|
||||||
Me.LblNP.Name = "LblNP"
|
|
||||||
Me.LblNP.Size = New System.Drawing.Size(82, 14)
|
|
||||||
Me.LblNP.TabIndex = 6
|
|
||||||
Me.LblNP.Text = "Nom, Prénom"
|
|
||||||
'
|
|
||||||
'LblTitre
|
|
||||||
'
|
|
||||||
Me.LblTitre.AutoSize = True
|
|
||||||
Me.LblTitre.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold)
|
|
||||||
Me.LblTitre.Location = New System.Drawing.Point(10, 11)
|
|
||||||
Me.LblTitre.Name = "LblTitre"
|
|
||||||
Me.LblTitre.Size = New System.Drawing.Size(153, 13)
|
|
||||||
Me.LblTitre.TabIndex = 4
|
|
||||||
Me.LblTitre.Text = "Vérifiez vos informations :"
|
|
||||||
'
|
|
||||||
'CmdNext
|
|
||||||
'
|
|
||||||
Me.CmdNext.Location = New System.Drawing.Point(289, 288)
|
|
||||||
Me.CmdNext.Name = "CmdNext"
|
|
||||||
Me.CmdNext.Size = New System.Drawing.Size(89, 23)
|
|
||||||
Me.CmdNext.TabIndex = 0
|
|
||||||
Me.CmdNext.Text = "Enregi&strer"
|
|
||||||
Me.CmdNext.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CmdAnnul
|
|
||||||
'
|
|
||||||
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 = 1
|
|
||||||
Me.CmdAnnul.Text = "Annuler"
|
|
||||||
Me.CmdAnnul.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'PictureBox1
|
|
||||||
'
|
|
||||||
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
|
|
||||||
Me.PictureBox1.Location = New System.Drawing.Point(0, 272)
|
|
||||||
Me.PictureBox1.MaximumSize = New System.Drawing.Size(495, 2)
|
|
||||||
Me.PictureBox1.MinimumSize = New System.Drawing.Size(0, 2)
|
|
||||||
Me.PictureBox1.Name = "PictureBox1"
|
|
||||||
Me.PictureBox1.Size = New System.Drawing.Size(481, 2)
|
|
||||||
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
|
||||||
Me.PictureBox1.TabIndex = 39
|
|
||||||
Me.PictureBox1.TabStop = False
|
|
||||||
'
|
|
||||||
'LBexam
|
|
||||||
'
|
|
||||||
Me.LBexam.FormattingEnabled = True
|
|
||||||
Me.LBexam.Location = New System.Drawing.Point(263, 81)
|
|
||||||
Me.LBexam.Name = "LBexam"
|
|
||||||
Me.LBexam.Size = New System.Drawing.Size(207, 173)
|
|
||||||
Me.LBexam.TabIndex = 12
|
|
||||||
'
|
|
||||||
'CmdDelet
|
|
||||||
'
|
|
||||||
Me.CmdDelet.Location = New System.Drawing.Point(12, 288)
|
|
||||||
Me.CmdDelet.Name = "CmdDelet"
|
|
||||||
Me.CmdDelet.Size = New System.Drawing.Size(121, 23)
|
|
||||||
Me.CmdDelet.TabIndex = 3
|
|
||||||
Me.CmdDelet.Text = "Supprimer le candidat"
|
|
||||||
Me.CmdDelet.UseVisualStyleBackColor = True
|
|
||||||
Me.CmdDelet.Visible = False
|
|
||||||
'
|
|
||||||
'LblID
|
|
||||||
'
|
|
||||||
Me.LblID.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
|
||||||
Me.LblID.Location = New System.Drawing.Point(314, 11)
|
|
||||||
Me.LblID.Name = "LblID"
|
|
||||||
Me.LblID.Size = New System.Drawing.Size(156, 13)
|
|
||||||
Me.LblID.TabIndex = 10
|
|
||||||
Me.LblID.Text = "ID"
|
|
||||||
Me.LblID.TextAlign = System.Drawing.ContentAlignment.TopRight
|
|
||||||
Me.LblID.Visible = False
|
|
||||||
'
|
|
||||||
'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, 327)
|
|
||||||
Me.ControlBox = False
|
|
||||||
Me.Controls.Add(Me.LblID)
|
|
||||||
Me.Controls.Add(Me.CmdDelet)
|
|
||||||
Me.Controls.Add(Me.LBexam)
|
|
||||||
Me.Controls.Add(Me.Lbl2)
|
|
||||||
Me.Controls.Add(Me.Lbl1)
|
|
||||||
Me.Controls.Add(Me.LblAge)
|
|
||||||
Me.Controls.Add(Me.LblCPV)
|
|
||||||
Me.Controls.Add(Me.LblAdrss)
|
|
||||||
Me.Controls.Add(Me.LblNP)
|
|
||||||
Me.Controls.Add(Me.LblTitre)
|
|
||||||
Me.Controls.Add(Me.CmdNext)
|
|
||||||
Me.Controls.Add(Me.CmdAnnul)
|
|
||||||
Me.Controls.Add(Me.PictureBox1)
|
|
||||||
Me.Font = New System.Drawing.Font("Tahoma", 8.25!)
|
|
||||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
|
|
||||||
Me.MaximizeBox = False
|
|
||||||
Me.MaximumSize = New System.Drawing.Size(488, 355)
|
|
||||||
Me.MinimizeBox = False
|
|
||||||
Me.MinimumSize = New System.Drawing.Size(488, 355)
|
|
||||||
Me.Name = "FrmInput3"
|
|
||||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
|
||||||
Me.Tag = "Assistant inscription (4/4)"
|
|
||||||
Me.Text = "Assistant création de candidature (4/4)"
|
|
||||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
Me.ResumeLayout(False)
|
|
||||||
Me.PerformLayout()
|
|
||||||
|
|
||||||
End Sub
|
|
||||||
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 LblTitre As System.Windows.Forms.Label
|
|
||||||
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 LBexam As System.Windows.Forms.ListBox
|
|
||||||
Friend WithEvents CmdDelet As System.Windows.Forms.Button
|
|
||||||
Friend WithEvents LblID As System.Windows.Forms.Label
|
|
||||||
End Class
|
|
||||||
187
FrmInput3.resx
187
FrmInput3.resx
@@ -1,187 +0,0 @@
|
|||||||
<?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////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////////////////////
|
|
||||||
////////////////////////////////////////////////////////////////ylOgoKCgoKCgoKCg
|
|
||||||
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
|
|
||||||
oKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKDKUw==
|
|
||||||
</value>
|
|
||||||
</data>
|
|
||||||
<metadata name="$this.Locked" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
|
||||||
<value>True</value>
|
|
||||||
</metadata>
|
|
||||||
</root>
|
|
||||||
102
FrmInput3.vb
102
FrmInput3.vb
@@ -1,102 +0,0 @@
|
|||||||
Public Class FrmInput3
|
|
||||||
|
|
||||||
REM INITIALISE
|
|
||||||
Private Sub FrmInput3_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
|
|
||||||
If Boule = False Then
|
|
||||||
Me.Tag = "Assistant cr<63>ation de candidature (4/4)"
|
|
||||||
End If
|
|
||||||
If Boule = True Then
|
|
||||||
Me.Tag = "Assistant <20>dition de candidature (4/4)"
|
|
||||||
Call DetectModif()
|
|
||||||
CmdNext.Text = "&Mettre <20> jour"
|
|
||||||
CmdDelet.Visible = True
|
|
||||||
LblID.Visible = True
|
|
||||||
LblID.Text = "Id : " & Format(Selectedclef, "00") REM met d'ID en cas d'<27>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
|
|
||||||
LblAdrss.Text = FrmInput1.TxtAdrss.Text
|
|
||||||
LblCPV.Text = FrmInput1.TxtCP.Text & ", " & FrmInput1.TxtVille.Text
|
|
||||||
LblAge.Text = FrmInput1.TxtMois.Text & "/" & FrmInput1.TxtAns.Text & " (" & FrmInput1.LblAns.Text & ")"
|
|
||||||
|
|
||||||
REM Reprend et met en forme tous les choix des <20>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
|
|
||||||
LBexam.Items.Add(" " & CB.Text)
|
|
||||||
End If
|
|
||||||
Next
|
|
||||||
LBexam.Items.Add(" ")
|
|
||||||
LBexam.Items.Add("Oraux :")
|
|
||||||
For Each CB In FrmInput2.GBOral.Controls
|
|
||||||
If CB.Checked Then
|
|
||||||
LBexam.Items.Add(" " & CB.Text)
|
|
||||||
End If
|
|
||||||
Next
|
|
||||||
LBexam.Items.Add(" ")
|
|
||||||
If FrmInput2.RBYes.Checked Then
|
|
||||||
LBexam.Items.Add("Examen facultatif :")
|
|
||||||
LBexam.Items.Add(" " & FrmInput2.CboFac.SelectedItem)
|
|
||||||
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 <20>t<EFBFBD> effectu<74>e avec succ<63>s." & vbCrLf & "Votre num<75>ro de candidature est : " & ClefMAX - 1 & vbCrLf & "Gardez le pr<70>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 <20>t<EFBFBD> mise <20> jours avec succ<63>s.", MsgBoxStyle.Information, "Mise <20> 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<70>c<EFBFBD>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<> " & Format(Selectedclef, "00") & " ?", MsgBoxStyle.Question & MsgBoxStyle.YesNo, "Confirmation de la supression")
|
|
||||||
If state = vbYes Then
|
|
||||||
Call SupprBdD()
|
|
||||||
Call CmdAnnul_Click(sender, e)
|
|
||||||
End If
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
End Class
|
|
||||||
186
FrmNouv.Designer.vb
generated
186
FrmNouv.Designer.vb
generated
@@ -1,186 +0,0 @@
|
|||||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
|
||||||
Partial Class FrmNouv
|
|
||||||
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)
|
|
||||||
If disposing AndAlso components IsNot Nothing Then
|
|
||||||
components.Dispose()
|
|
||||||
End If
|
|
||||||
MyBase.Dispose(disposing)
|
|
||||||
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(FrmNouv))
|
|
||||||
Me.LblNext = New System.Windows.Forms.Label
|
|
||||||
Me.LblWarn = New System.Windows.Forms.Label
|
|
||||||
Me.Lbl1 = New System.Windows.Forms.Label
|
|
||||||
Me.LblTitre = New System.Windows.Forms.Label
|
|
||||||
Me.PictureBox1 = New System.Windows.Forms.PictureBox
|
|
||||||
Me.CmdNext = New System.Windows.Forms.Button
|
|
||||||
Me.CmdAnnul = New System.Windows.Forms.Button
|
|
||||||
Me.PictureBox2 = New System.Windows.Forms.PictureBox
|
|
||||||
Me.PictureBox3 = New System.Windows.Forms.PictureBox
|
|
||||||
Me.PictureBox4 = 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()
|
|
||||||
CType(Me.PictureBox4, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
||||||
Me.SuspendLayout()
|
|
||||||
'
|
|
||||||
'LblNext
|
|
||||||
'
|
|
||||||
Me.LblNext.Location = New System.Drawing.Point(12, 293)
|
|
||||||
Me.LblNext.Name = "LblNext"
|
|
||||||
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
|
|
||||||
'
|
|
||||||
'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, 149)
|
|
||||||
Me.LblWarn.Margin = New System.Windows.Forms.Padding(5, 5, 5, 10)
|
|
||||||
Me.LblWarn.Name = "LblWarn"
|
|
||||||
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."
|
|
||||||
'
|
|
||||||
'Lbl1
|
|
||||||
'
|
|
||||||
Me.Lbl1.AutoSize = True
|
|
||||||
Me.Lbl1.BackColor = System.Drawing.Color.White
|
|
||||||
Me.Lbl1.Location = New System.Drawing.Point(176, 67)
|
|
||||||
Me.Lbl1.Name = "Lbl1"
|
|
||||||
Me.Lbl1.Size = New System.Drawing.Size(275, 39)
|
|
||||||
Me.Lbl1.TabIndex = 16
|
|
||||||
Me.Lbl1.Text = "Cet Assistant vous permet :" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "• D'enregistrer une personne candidate," & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "• D" & _
|
|
||||||
"e définir quels examens ce candidat devra passer."
|
|
||||||
'
|
|
||||||
'LblTitre
|
|
||||||
'
|
|
||||||
Me.LblTitre.AutoEllipsis = True
|
|
||||||
Me.LblTitre.BackColor = System.Drawing.Color.White
|
|
||||||
Me.LblTitre.Font = New System.Drawing.Font("Segoe UI", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
|
||||||
Me.LblTitre.Location = New System.Drawing.Point(172, 10)
|
|
||||||
Me.LblTitre.Name = "LblTitre"
|
|
||||||
Me.LblTitre.Size = New System.Drawing.Size(298, 57)
|
|
||||||
Me.LblTitre.TabIndex = 14
|
|
||||||
Me.LblTitre.Text = "Bienvenue dans l'Assissant création de candidature"
|
|
||||||
'
|
|
||||||
'PictureBox1
|
|
||||||
'
|
|
||||||
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
|
|
||||||
Me.PictureBox1.Location = New System.Drawing.Point(0, 272)
|
|
||||||
Me.PictureBox1.MaximumSize = New System.Drawing.Size(495, 2)
|
|
||||||
Me.PictureBox1.MinimumSize = New System.Drawing.Size(0, 2)
|
|
||||||
Me.PictureBox1.Name = "PictureBox1"
|
|
||||||
Me.PictureBox1.Size = New System.Drawing.Size(481, 2)
|
|
||||||
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
|
||||||
Me.PictureBox1.TabIndex = 12
|
|
||||||
Me.PictureBox1.TabStop = False
|
|
||||||
'
|
|
||||||
'CmdNext
|
|
||||||
'
|
|
||||||
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
|
|
||||||
Me.CmdNext.Text = "&Suivant >"
|
|
||||||
Me.CmdNext.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'CmdAnnul
|
|
||||||
'
|
|
||||||
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
|
|
||||||
Me.CmdAnnul.Text = "Annuler"
|
|
||||||
Me.CmdAnnul.UseVisualStyleBackColor = True
|
|
||||||
'
|
|
||||||
'PictureBox2
|
|
||||||
'
|
|
||||||
Me.PictureBox2.Image = CType(resources.GetObject("PictureBox2.Image"), System.Drawing.Image)
|
|
||||||
Me.PictureBox2.Location = New System.Drawing.Point(159, 1)
|
|
||||||
Me.PictureBox2.Name = "PictureBox2"
|
|
||||||
Me.PictureBox2.Size = New System.Drawing.Size(322, 271)
|
|
||||||
Me.PictureBox2.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
|
||||||
Me.PictureBox2.TabIndex = 13
|
|
||||||
Me.PictureBox2.TabStop = False
|
|
||||||
'
|
|
||||||
'PictureBox3
|
|
||||||
'
|
|
||||||
Me.PictureBox3.Image = CType(resources.GetObject("PictureBox3.Image"), System.Drawing.Image)
|
|
||||||
Me.PictureBox3.Location = New System.Drawing.Point(0, 0)
|
|
||||||
Me.PictureBox3.Name = "PictureBox3"
|
|
||||||
Me.PictureBox3.Size = New System.Drawing.Size(159, 272)
|
|
||||||
Me.PictureBox3.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
|
||||||
Me.PictureBox3.TabIndex = 20
|
|
||||||
Me.PictureBox3.TabStop = False
|
|
||||||
'
|
|
||||||
'PictureBox4
|
|
||||||
'
|
|
||||||
Me.PictureBox4.Image = CType(resources.GetObject("PictureBox4.Image"), System.Drawing.Image)
|
|
||||||
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
|
|
||||||
Me.PictureBox4.TabIndex = 21
|
|
||||||
Me.PictureBox4.TabStop = False
|
|
||||||
'
|
|
||||||
'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, 327)
|
|
||||||
Me.ControlBox = False
|
|
||||||
Me.Controls.Add(Me.PictureBox4)
|
|
||||||
Me.Controls.Add(Me.PictureBox3)
|
|
||||||
Me.Controls.Add(Me.LblNext)
|
|
||||||
Me.Controls.Add(Me.LblWarn)
|
|
||||||
Me.Controls.Add(Me.Lbl1)
|
|
||||||
Me.Controls.Add(Me.LblTitre)
|
|
||||||
Me.Controls.Add(Me.PictureBox1)
|
|
||||||
Me.Controls.Add(Me.CmdNext)
|
|
||||||
Me.Controls.Add(Me.CmdAnnul)
|
|
||||||
Me.Controls.Add(Me.PictureBox2)
|
|
||||||
Me.Font = New System.Drawing.Font("Tahoma", 8.25!)
|
|
||||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
|
|
||||||
Me.MaximizeBox = False
|
|
||||||
Me.MaximumSize = New System.Drawing.Size(488, 355)
|
|
||||||
Me.MinimizeBox = False
|
|
||||||
Me.MinimumSize = New System.Drawing.Size(488, 355)
|
|
||||||
Me.Name = "FrmNouv"
|
|
||||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
|
||||||
Me.Tag = "Assistant création de candidature (1/4)"
|
|
||||||
Me.Text = "Assistant création de candidature (1/4)"
|
|
||||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
CType(Me.PictureBox4, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
Me.ResumeLayout(False)
|
|
||||||
Me.PerformLayout()
|
|
||||||
|
|
||||||
End Sub
|
|
||||||
Friend WithEvents LblNext As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents LblWarn As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents Lbl1 As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents LblTitre As System.Windows.Forms.Label
|
|
||||||
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
|
|
||||||
Friend WithEvents CmdNext As System.Windows.Forms.Button
|
|
||||||
Friend WithEvents CmdAnnul As System.Windows.Forms.Button
|
|
||||||
Friend WithEvents PictureBox2 As System.Windows.Forms.PictureBox
|
|
||||||
Friend WithEvents PictureBox3 As System.Windows.Forms.PictureBox
|
|
||||||
Friend WithEvents PictureBox4 As System.Windows.Forms.PictureBox
|
|
||||||
End Class
|
|
||||||
1295
FrmNouv.resx
1295
FrmNouv.resx
File diff suppressed because it is too large
Load Diff
16
FrmNouv.vb
16
FrmNouv.vb
@@ -1,16 +0,0 @@
|
|||||||
Public Class FrmNouv
|
|
||||||
|
|
||||||
Private Sub FrmIsc1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
|
||||||
REM rien...
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Private Sub CmdAnnul_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdAnnul.Click
|
|
||||||
Me.Close() REM ferme la feuille, on en a plus besoin
|
|
||||||
FrmAccueil.Show() REM montre nouvelle feuille
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Private Sub CmdNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdNext.Click
|
|
||||||
Me.Hide()
|
|
||||||
FrmInput1.Show()
|
|
||||||
End Sub
|
|
||||||
End Class
|
|
||||||
180
FrmStart.Designer.vb
generated
180
FrmStart.Designer.vb
generated
@@ -1,180 +0,0 @@
|
|||||||
<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
1538
FrmStart.resx
File diff suppressed because it is too large
Load Diff
45
FrmStart.vb
45
FrmStart.vb
@@ -1,45 +0,0 @@
|
|||||||
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<69> 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<6E>, 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 <20>t<EFBFBD>s modif<69>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
|
|
||||||
BIN
Image 1.jpg
BIN
Image 1.jpg
Binary file not shown.
|
Before Width: | Height: | Size: 30 KiB |
@@ -1,85 +0,0 @@
|
|||||||
|
|
||||||
##### BLOC NOTE #####
|
|
||||||
|
|
||||||
On reste en 7.0.x.x tant que l'on n'a pas de RC a sortir.
|
|
||||||
La RC1 sera une version 7.1.x.x
|
|
||||||
La RC2 sera une version 7.2.x.x
|
|
||||||
|
|
||||||
Dans l'ensemble, le programme apparais maintenant comme stable.
|
|
||||||
|
|
||||||
>>> Question a poser :
|
|
||||||
|
|
||||||
Est-il pr<70>f<EFBFBD>rable de parcourir le fichier pour r<>cup<75>rer les nom et les pr<70>nom des candidats, ou de penser une structure qui s'en occuperais dans le programme ?
|
|
||||||
|
|
||||||
>>> A faire pour la Release Candidate :
|
|
||||||
|
|
||||||
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
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
>>> Difficult<6C>es & Avancement :
|
|
||||||
|
|
||||||
Globalement :
|
|
||||||
<09> Renommer les nom de fonction pour correspondre aux Handles
|
|
||||||
<09> [R<>solu] IMPORTANT : ACTIVER LES TIMERS pour l'<27>dition d'une candidature !!!
|
|
||||||
|
|
||||||
|
|
||||||
<09> Pr<50>voir un syst<73>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<73>me de load de feuilles, car cette fonction est destinn<6E> a les pr<70>parer (Probl<62>me : Timers).
|
|
||||||
Le Soft-reset et le load d'une feuille peuvent simplement appeler une fonction d'initialisation.
|
|
||||||
<09> [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 :
|
|
||||||
<09> Design satisfaisant.
|
|
||||||
<09> [R<>solu] Quelques fonctions sont manquantes.
|
|
||||||
<09> [R<>solu] Am<41>liorer la structure de sauvegarde : Faire appel a des indexs pour stoquer Ecrit et Oral plutot que les nom de variables ?
|
|
||||||
|
|
||||||
FrmEdit :
|
|
||||||
<09> Repenser la programmation du CmdNext, pas clair.
|
|
||||||
<09> Lors du test de la selection de l'ID, ajouter un "=" a "Or Selectedclef < 1" pour emp<6D>cher de choisir la premi<6D>re clef.
|
|
||||||
Remarque : M<>me comme cela, <20>a marche.
|
|
||||||
<09> [R<>solu] Bogue si on entre rien.
|
|
||||||
|
|
||||||
FrmNouv :
|
|
||||||
|
|
||||||
FrmBilan :
|
|
||||||
<09> Beaucoup de chose <20> faire.
|
|
||||||
<09> Utiliser l'indice du tableau pour chercher dans le tableau d'ecrit, puit d'oral, puis le facultatif (seulement)
|
|
||||||
|
|
||||||
FrmAff :
|
|
||||||
<09> Beaucoup de chose <20> faire.
|
|
||||||
|
|
||||||
FrmInput1 :
|
|
||||||
<09> Programmer un soft-reset.
|
|
||||||
|
|
||||||
<09> [R<>solu] Il existe une erreur lors de la s<>lection d'un age <20> 25 ans par la scrollbar : Elle est refus<75>e par le v<>rificateur.
|
|
||||||
|
|
||||||
[R<>solu]
|
|
||||||
Probl<62>me : L'<27>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<6E>res : Par la scrollbar en age, OU par la saisie du mois et de l'ann<6E>e de naissance.
|
|
||||||
<09> [R<>solu] L'<27>ge doit <20>tre maintenant obtenue par le calcul.
|
|
||||||
<09> [R<>solu] trouver un .tag pour erreur cp00.
|
|
||||||
|
|
||||||
FrmInput2 :
|
|
||||||
<09> Programmer un soft-reset.
|
|
||||||
|
|
||||||
<09> [R<>solu] Les <20>crits et les oraux doivent <20>tres index<65>s.
|
|
||||||
|
|
||||||
FrmInput3 :
|
|
||||||
<09> Faire des testes de robustesse (Edition, Suppression).
|
|
||||||
|
|
||||||
[R<>solu]
|
|
||||||
<09> Il existe des dysfonctionnements dans la proc<6F>dure de sauvegarde : Un <20>l<EFBFBD>ment supprim<69> est d<>finitivement choisit pour modification.
|
|
||||||
|
|
||||||
[R<>solu]
|
|
||||||
Probl<62>me : Comment mettre a jour les <20>l<EFBFBD>ment de la fonction alors que la feuille est simplement cach<63>e (.hide)
|
|
||||||
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<72>e.
|
|
||||||
BIN
LigneH.bmp
BIN
LigneH.bmp
Binary file not shown.
|
Before Width: | Height: | Size: 3.4 KiB |
BIN
Logo16-16.ico
BIN
Logo16-16.ico
Binary file not shown.
|
Before Width: | Height: | Size: 25 KiB |
BIN
Logo64.ico
BIN
Logo64.ico
Binary file not shown.
|
Before Width: | Height: | Size: 41 KiB |
179
Module1.vb
179
Module1.vb
@@ -1,179 +0,0 @@
|
|||||||
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<70>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<EFBFBD>ais", "G<EFBFBD>ographie", "G<EFBFBD>ologie", "Math<EFBFBD>matique", "Philosophie"}
|
|
||||||
Public nais As Integer REM en mois. ANS*12 + MOIS
|
|
||||||
|
|
||||||
Public cddts As PERS REM sert de "Tampon" entre les donn<6E>es entr<74>es dans les feuilles et le fichier.
|
|
||||||
Public Tindex() As Index REM Sert pour le bilan des supprim<69>s, et pour g<>n<EFBFBD>rer la liste des candidats valides (sans consulter le fichier).
|
|
||||||
|
|
||||||
Public Boule As Boolean REM inscription ou <20>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<75>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<63> 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<6E> par l'utilisateur
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
Public Sub InscBdD()
|
|
||||||
If PosMAX - 1 >= UBound(Tindex) Then
|
|
||||||
ReDim Preserve Tindex(PosMAX + 2)
|
|
||||||
End If
|
|
||||||
|
|
||||||
REM Entr<74>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<74>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
|
|
||||||
|
|
||||||
REM Entr<74>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<74>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<74>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<74>e depuis la feuille 1
|
|
||||||
cddts.Nom = ""
|
|
||||||
cddts.Prenom = ""
|
|
||||||
cddts.Adresse = ""
|
|
||||||
cddts.CP = 0
|
|
||||||
cddts.Ville = ""
|
|
||||||
cddts.Age = 0
|
|
||||||
|
|
||||||
REM Entr<74>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<69> a <20>voluer
|
|
||||||
Dim i As Integer
|
|
||||||
For i = 0 To PosMAX - 1 REM UBound(Tindex) -1, car le tableau est d<>j<EFBFBD> allou<6F>, 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
|
|
||||||
18
My Project/Application.Designer.vb
generated
18
My Project/Application.Designer.vb
generated
@@ -1,10 +1,10 @@
|
|||||||
'------------------------------------------------------------------------------
|
'------------------------------------------------------------------------------
|
||||||
' <auto-generated>
|
' <auto-generated>
|
||||||
' Ce code a été généré par un outil.
|
' This code was generated by a tool.
|
||||||
' Version du runtime :4.0.30319.237
|
' Runtime Version:2.0.50727.4927
|
||||||
'
|
'
|
||||||
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
|
' Changes to this file may cause incorrect behavior and will be lost if
|
||||||
' le code est régénéré.
|
' the code is regenerated.
|
||||||
' </auto-generated>
|
' </auto-generated>
|
||||||
'------------------------------------------------------------------------------
|
'------------------------------------------------------------------------------
|
||||||
|
|
||||||
@@ -14,10 +14,10 @@ Option Explicit On
|
|||||||
|
|
||||||
Namespace My
|
Namespace My
|
||||||
|
|
||||||
'REMARQUE : ce fichier étant généré automatiquement, ne le modifiez pas directement. Pour apporter des modifications,
|
'NOTE: This file is auto-generated; do not modify it directly. To make changes,
|
||||||
' ou si vous rencontrez des erreurs de build dans ce fichier, accédez au Concepteur de projets
|
' or if you encounter build errors in this file, go to the Project Designer
|
||||||
' (allez dans les propriétés du projet ou double-cliquez sur le noeud My project dans
|
' (go to Project Properties or double-click the My Project node in
|
||||||
' l'Explorateur de solutions), puis apportez vos modifications sous l'onglet Application.
|
' Solution Explorer), and make changes on the Application tab.
|
||||||
'
|
'
|
||||||
Partial Friend Class MyApplication
|
Partial Friend Class MyApplication
|
||||||
|
|
||||||
@@ -32,7 +32,7 @@ Namespace My
|
|||||||
|
|
||||||
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
||||||
Protected Overrides Sub OnCreateMainForm()
|
Protected Overrides Sub OnCreateMainForm()
|
||||||
Me.MainForm = Global.Projet_VS_100_Priet_Sabourin.FrmAccueil
|
Me.MainForm = Global.WindowsApplication1.Form1
|
||||||
End Sub
|
End Sub
|
||||||
End Class
|
End Class
|
||||||
End Namespace
|
End Namespace
|
||||||
|
|||||||
@@ -1,10 +1,11 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
|
<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
|
||||||
<MySubMain>true</MySubMain>
|
<MySubMain>true</MySubMain>
|
||||||
<MainForm>FrmAccueil</MainForm>
|
<MainForm>Form1</MainForm>
|
||||||
<SingleInstance>false</SingleInstance>
|
<SingleInstance>false</SingleInstance>
|
||||||
<ShutdownMode>0</ShutdownMode>
|
<ShutdownMode>0</ShutdownMode>
|
||||||
<EnableVisualStyles>true</EnableVisualStyles>
|
<EnableVisualStyles>true</EnableVisualStyles>
|
||||||
<AuthenticationMode>0</AuthenticationMode>
|
<AuthenticationMode>0</AuthenticationMode>
|
||||||
|
<ApplicationType>0</ApplicationType>
|
||||||
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
|
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
|
||||||
</MyApplicationData>
|
</MyApplicationData>
|
||||||
@@ -1,6 +1,4 @@
|
|||||||
Imports System.Resources
|
Imports System
|
||||||
|
|
||||||
Imports System
|
|
||||||
Imports System.Reflection
|
Imports System.Reflection
|
||||||
Imports System.Runtime.InteropServices
|
Imports System.Runtime.InteropServices
|
||||||
|
|
||||||
@@ -10,17 +8,17 @@ Imports System.Runtime.InteropServices
|
|||||||
|
|
||||||
' Vérifiez les valeurs des attributs de l'assembly
|
' Vérifiez les valeurs des attributs de l'assembly
|
||||||
|
|
||||||
<Assembly: AssemblyTitle("Candidat 7 Pro")>
|
<Assembly: AssemblyTitle("WindowsApplication1")>
|
||||||
<Assembly: AssemblyDescription("Elève de l'Ecole normale supérieure et inspécteur d'académie, Charles Dupuy est la personnalité politique du début du XXème Siècle avant activement participé à la réforme de l'enseignement. Sa culture de l'art et de la philosophie témoigne d'une éducation complète, et aujourd'hui encore son savoir nous a inspiré la création de Candide Pro 7.")>
|
<Assembly: AssemblyDescription("")>
|
||||||
<Assembly: AssemblyCompany("Priet & Sabourin Corporation")>
|
<Assembly: AssemblyCompany("Microsoft")>
|
||||||
<Assembly: AssemblyProduct("Candidat 7 Pro")>
|
<Assembly: AssemblyProduct("WindowsApplication1")>
|
||||||
<Assembly: AssemblyCopyright("Copyright © 2010")>
|
<Assembly: AssemblyCopyright("Copyright © Microsoft 2010")>
|
||||||
<Assembly: AssemblyTrademark("Priet & Sabourin Corporation")>
|
<Assembly: AssemblyTrademark("")>
|
||||||
|
|
||||||
<Assembly: ComVisible(False)>
|
<Assembly: ComVisible(False)>
|
||||||
|
|
||||||
'Le GUID suivant est pour l'ID de la typelib si ce projet est exposé à COM
|
'Le GUID suivant est pour l'ID de la typelib si ce projet est exposé à COM
|
||||||
<Assembly: Guid("0e7d582d-ff8c-4478-88f2-c42f5f04a6e5")>
|
<Assembly: Guid("ff3e374c-1e0c-496c-92b2-109213f724e8")>
|
||||||
|
|
||||||
' Les informations de version pour un assembly se composent des quatre valeurs suivantes :
|
' Les informations de version pour un assembly se composent des quatre valeurs suivantes :
|
||||||
'
|
'
|
||||||
@@ -33,7 +31,5 @@ Imports System.Runtime.InteropServices
|
|||||||
' en utilisant '*', comme indiqué ci-dessous :
|
' en utilisant '*', comme indiqué ci-dessous :
|
||||||
' <Assembly: AssemblyVersion("1.0.*")>
|
' <Assembly: AssemblyVersion("1.0.*")>
|
||||||
|
|
||||||
<Assembly: AssemblyVersion("7.0.8.22")>
|
<Assembly: AssemblyVersion("1.0.0.0")>
|
||||||
<Assembly: AssemblyFileVersion("7.0.8.22")>
|
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
||||||
|
|
||||||
<Assembly: NeutralResourcesLanguageAttribute("fr")>
|
|
||||||
|
|||||||
@@ -1,10 +0,0 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
|
||||||
<!--
|
|
||||||
This file is automatically generated by Visual Studio .Net. It is
|
|
||||||
used to store generic object data source configuration information.
|
|
||||||
Renaming the file extension or editing the content of this file may
|
|
||||||
cause the file to be unrecognizable by the program.
|
|
||||||
-->
|
|
||||||
<GenericObjectDataSource DisplayName="FrmInput1" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
|
||||||
<TypeInfo>Projet_VS_100_Priet_Sabourin.FrmInput1, Projet-VS_100_Priet-Sabourin, Version=7.0.2.56, Culture=neutral, PublicKeyToken=null</TypeInfo>
|
|
||||||
</GenericObjectDataSource>
|
|
||||||
43
My Project/Resources.Designer.vb
generated
43
My Project/Resources.Designer.vb
generated
@@ -1,28 +1,27 @@
|
|||||||
'------------------------------------------------------------------------------
|
'------------------------------------------------------------------------------
|
||||||
' <auto-generated>
|
' <auto-generated>
|
||||||
' Ce code a été généré par un outil.
|
' This code was generated by a tool.
|
||||||
' Version du runtime :4.0.30319.237
|
' Runtime Version:2.0.50727.4927
|
||||||
'
|
'
|
||||||
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
|
' Changes to this file may cause incorrect behavior and will be lost if
|
||||||
' le code est régénéré.
|
' the code is regenerated.
|
||||||
' </auto-generated>
|
' </auto-generated>
|
||||||
'------------------------------------------------------------------------------
|
'------------------------------------------------------------------------------
|
||||||
|
|
||||||
Option Strict On
|
Option Strict On
|
||||||
Option Explicit On
|
Option Explicit On
|
||||||
|
|
||||||
Imports System
|
|
||||||
|
|
||||||
Namespace My.Resources
|
Namespace My.Resources
|
||||||
|
|
||||||
'Cette classe a été générée automatiquement par la classe StronglyTypedResourceBuilder
|
'This class was auto-generated by the StronglyTypedResourceBuilder
|
||||||
'à l'aide d'un outil, tel que ResGen ou Visual Studio.
|
'class via a tool like ResGen or Visual Studio.
|
||||||
'Pour ajouter ou supprimer un membre, modifiez votre fichier .ResX, puis réexécutez ResGen
|
'To add or remove a member, edit your .ResX file then rerun ResGen
|
||||||
'avec l'option /str ou régénérez votre projet VS.
|
'with the /str option, or rebuild your VS project.
|
||||||
'''<summary>
|
'<summary>
|
||||||
''' Une classe de ressource fortement typée destinée, entre autres, à la consultation des chaînes localisées.
|
' A strongly-typed resource class, for looking up localized strings, etc.
|
||||||
'''</summary>
|
'</summary>
|
||||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _
|
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "2.0.0.0"), _
|
||||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||||
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
|
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
|
||||||
@@ -32,30 +31,30 @@ Namespace My.Resources
|
|||||||
|
|
||||||
Private resourceCulture As Global.System.Globalization.CultureInfo
|
Private resourceCulture As Global.System.Globalization.CultureInfo
|
||||||
|
|
||||||
'''<summary>
|
'<summary>
|
||||||
''' Retourne l'instance ResourceManager mise en cache utilisée par cette classe.
|
' Returns the cached ResourceManager instance used by this class.
|
||||||
'''</summary>
|
'</summary>
|
||||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||||
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
|
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
|
||||||
Get
|
Get
|
||||||
If Object.ReferenceEquals(resourceMan, Nothing) Then
|
If Object.ReferenceEquals(resourceMan, Nothing) Then
|
||||||
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("Projet_VS_100_Priet_Sabourin.Resources", GetType(Resources).Assembly)
|
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("WindowsApplication1.Resources", GetType(Resources).Assembly)
|
||||||
resourceMan = temp
|
resourceMan = temp
|
||||||
End If
|
End If
|
||||||
Return resourceMan
|
Return resourceMan
|
||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
'''<summary>
|
'<summary>
|
||||||
''' Remplace la propriété CurrentUICulture du thread actuel pour toutes
|
' Overrides the current thread's CurrentUICulture property for all
|
||||||
''' les recherches de ressources à l'aide de cette classe de ressource fortement typée.
|
' resource lookups using this strongly typed resource class.
|
||||||
'''</summary>
|
'</summary>
|
||||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||||
Friend Property Culture() As Global.System.Globalization.CultureInfo
|
Friend Property Culture() As Global.System.Globalization.CultureInfo
|
||||||
Get
|
Get
|
||||||
Return resourceCulture
|
Return resourceCulture
|
||||||
End Get
|
End Get
|
||||||
Set
|
Set(ByVal value As Global.System.Globalization.CultureInfo)
|
||||||
resourceCulture = value
|
resourceCulture = value
|
||||||
End Set
|
End Set
|
||||||
End Property
|
End Property
|
||||||
|
|||||||
18
My Project/Settings.Designer.vb
generated
18
My Project/Settings.Designer.vb
generated
@@ -1,10 +1,10 @@
|
|||||||
'------------------------------------------------------------------------------
|
'------------------------------------------------------------------------------
|
||||||
' <auto-generated>
|
' <auto-generated>
|
||||||
' Ce code a été généré par un outil.
|
' This code was generated by a tool.
|
||||||
' Version du runtime :4.0.30319.237
|
' Runtime Version:2.0.50727.4927
|
||||||
'
|
'
|
||||||
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
|
' Changes to this file may cause incorrect behavior and will be lost if
|
||||||
' le code est régénéré.
|
' the code is regenerated.
|
||||||
' </auto-generated>
|
' </auto-generated>
|
||||||
'------------------------------------------------------------------------------
|
'------------------------------------------------------------------------------
|
||||||
|
|
||||||
@@ -15,14 +15,14 @@ Option Explicit On
|
|||||||
Namespace My
|
Namespace My
|
||||||
|
|
||||||
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "10.0.0.0"), _
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "8.0.0.0"), _
|
||||||
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||||
Partial Friend NotInheritable Class MySettings
|
Partial Friend NotInheritable Class MySettings
|
||||||
Inherits Global.System.Configuration.ApplicationSettingsBase
|
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"
|
#Region "My.Settings Auto-Save Functionality"
|
||||||
#If _MyType = "WindowsForms" Then
|
#If _MyType = "WindowsForms" Then
|
||||||
Private Shared addedHandler As Boolean
|
Private Shared addedHandler As Boolean
|
||||||
|
|
||||||
@@ -64,9 +64,9 @@ Namespace My
|
|||||||
Friend Module MySettingsProperty
|
Friend Module MySettingsProperty
|
||||||
|
|
||||||
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
|
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
|
||||||
Friend ReadOnly Property Settings() As Global.Projet_VS_100_Priet_Sabourin.My.MySettings
|
Friend ReadOnly Property Settings() As Global.WindowsApplication1.My.MySettings
|
||||||
Get
|
Get
|
||||||
Return Global.Projet_VS_100_Priet_Sabourin.My.MySettings.Default
|
Return Global.WindowsApplication1.My.MySettings.Default
|
||||||
End Get
|
End Get
|
||||||
End Property
|
End Property
|
||||||
End Module
|
End Module
|
||||||
|
|||||||
@@ -1,253 +0,0 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
|
||||||
<Project DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003" ToolsVersion="4.0">
|
|
||||||
<PropertyGroup>
|
|
||||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
|
||||||
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
|
||||||
<ProductVersion>8.0.50727</ProductVersion>
|
|
||||||
<SchemaVersion>2.0</SchemaVersion>
|
|
||||||
<ProjectGuid>{6DD14E68-4EC2-4669-9E9D-34305CA574FF}</ProjectGuid>
|
|
||||||
<OutputType>WinExe</OutputType>
|
|
||||||
<StartupObject>Projet_VS_100_Priet_Sabourin.My.MyApplication</StartupObject>
|
|
||||||
<RootNamespace>Projet_VS_100_Priet_Sabourin</RootNamespace>
|
|
||||||
<AssemblyName>Projet-VS_100_Priet-Sabourin</AssemblyName>
|
|
||||||
<MyType>WindowsForms</MyType>
|
|
||||||
<ApplicationIcon>Logo64.ico</ApplicationIcon>
|
|
||||||
<TargetFrameworkVersion>v2.0</TargetFrameworkVersion>
|
|
||||||
<FileUpgradeFlags>
|
|
||||||
</FileUpgradeFlags>
|
|
||||||
<UpgradeBackupLocation>
|
|
||||||
</UpgradeBackupLocation>
|
|
||||||
<OldToolsVersion>2.0</OldToolsVersion>
|
|
||||||
<PublishUrl>publish\</PublishUrl>
|
|
||||||
<Install>true</Install>
|
|
||||||
<InstallFrom>Disk</InstallFrom>
|
|
||||||
<UpdateEnabled>false</UpdateEnabled>
|
|
||||||
<UpdateMode>Foreground</UpdateMode>
|
|
||||||
<UpdateInterval>7</UpdateInterval>
|
|
||||||
<UpdateIntervalUnits>Days</UpdateIntervalUnits>
|
|
||||||
<UpdatePeriodically>false</UpdatePeriodically>
|
|
||||||
<UpdateRequired>false</UpdateRequired>
|
|
||||||
<MapFileExtensions>true</MapFileExtensions>
|
|
||||||
<ApplicationRevision>0</ApplicationRevision>
|
|
||||||
<ApplicationVersion>1.0.0.%2a</ApplicationVersion>
|
|
||||||
<IsWebBootstrapper>false</IsWebBootstrapper>
|
|
||||||
<UseApplicationTrust>false</UseApplicationTrust>
|
|
||||||
<BootstrapperEnabled>true</BootstrapperEnabled>
|
|
||||||
</PropertyGroup>
|
|
||||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
|
||||||
<DebugSymbols>true</DebugSymbols>
|
|
||||||
<DebugType>full</DebugType>
|
|
||||||
<DefineDebug>true</DefineDebug>
|
|
||||||
<DefineTrace>true</DefineTrace>
|
|
||||||
<OutputPath>bin\Debug\</OutputPath>
|
|
||||||
<DocumentationFile>Projet-VS_100_Priet-Sabourin.xml</DocumentationFile>
|
|
||||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355</NoWarn>
|
|
||||||
<CodeAnalysisRuleSet>AllRules.ruleset</CodeAnalysisRuleSet>
|
|
||||||
</PropertyGroup>
|
|
||||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
|
||||||
<DebugType>pdbonly</DebugType>
|
|
||||||
<DefineDebug>false</DefineDebug>
|
|
||||||
<DefineTrace>true</DefineTrace>
|
|
||||||
<Optimize>true</Optimize>
|
|
||||||
<OutputPath>bin\Release\</OutputPath>
|
|
||||||
<DocumentationFile>Projet-VS_100_Priet-Sabourin.xml</DocumentationFile>
|
|
||||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355</NoWarn>
|
|
||||||
<CodeAnalysisRuleSet>AllRules.ruleset</CodeAnalysisRuleSet>
|
|
||||||
</PropertyGroup>
|
|
||||||
<ItemGroup>
|
|
||||||
<Reference Include="System" />
|
|
||||||
<Reference Include="System.Data" />
|
|
||||||
<Reference Include="System.Deployment" />
|
|
||||||
<Reference Include="System.Drawing" />
|
|
||||||
<Reference Include="System.Windows.Forms" />
|
|
||||||
<Reference Include="System.Xml" />
|
|
||||||
</ItemGroup>
|
|
||||||
<ItemGroup>
|
|
||||||
<Import Include="Microsoft.VisualBasic" />
|
|
||||||
<Import Include="System" />
|
|
||||||
<Import Include="System.Collections" />
|
|
||||||
<Import Include="System.Collections.Generic" />
|
|
||||||
<Import Include="System.Data" />
|
|
||||||
<Import Include="System.Drawing" />
|
|
||||||
<Import Include="System.Diagnostics" />
|
|
||||||
<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>
|
|
||||||
<Compile Include="FrmAccueil.Designer.vb">
|
|
||||||
<DependentUpon>FrmAccueil.vb</DependentUpon>
|
|
||||||
<SubType>Form</SubType>
|
|
||||||
</Compile>
|
|
||||||
<Compile Include="FrmAff.Designer.vb">
|
|
||||||
<DependentUpon>FrmAff.vb</DependentUpon>
|
|
||||||
</Compile>
|
|
||||||
<Compile Include="FrmAff.vb">
|
|
||||||
<SubType>Form</SubType>
|
|
||||||
</Compile>
|
|
||||||
<Compile Include="FrmBilanSelect.Designer.vb">
|
|
||||||
<DependentUpon>FrmBilanSelect.vb</DependentUpon>
|
|
||||||
</Compile>
|
|
||||||
<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">
|
|
||||||
<DependentUpon>FrmEdit.vb</DependentUpon>
|
|
||||||
</Compile>
|
|
||||||
<Compile Include="FrmEdit.vb">
|
|
||||||
<SubType>Form</SubType>
|
|
||||||
</Compile>
|
|
||||||
<Compile Include="FrmInput1.Designer.vb">
|
|
||||||
<DependentUpon>FrmInput1.vb</DependentUpon>
|
|
||||||
</Compile>
|
|
||||||
<Compile Include="FrmInput1.vb">
|
|
||||||
<SubType>Form</SubType>
|
|
||||||
</Compile>
|
|
||||||
<Compile Include="FrmInput2.Designer.vb">
|
|
||||||
<DependentUpon>FrmInput2.vb</DependentUpon>
|
|
||||||
</Compile>
|
|
||||||
<Compile Include="FrmInput2.vb">
|
|
||||||
<SubType>Form</SubType>
|
|
||||||
</Compile>
|
|
||||||
<Compile Include="FrmInput3.Designer.vb">
|
|
||||||
<DependentUpon>FrmInput3.vb</DependentUpon>
|
|
||||||
</Compile>
|
|
||||||
<Compile Include="FrmInput3.vb">
|
|
||||||
<SubType>Form</SubType>
|
|
||||||
</Compile>
|
|
||||||
<Compile Include="FrmNouv.Designer.vb">
|
|
||||||
<DependentUpon>FrmNouv.vb</DependentUpon>
|
|
||||||
</Compile>
|
|
||||||
<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>
|
|
||||||
<DependentUpon>Application.myapp</DependentUpon>
|
|
||||||
</Compile>
|
|
||||||
<Compile Include="My Project\Resources.Designer.vb">
|
|
||||||
<AutoGen>True</AutoGen>
|
|
||||||
<DesignTime>True</DesignTime>
|
|
||||||
<DependentUpon>Resources.resx</DependentUpon>
|
|
||||||
</Compile>
|
|
||||||
<Compile Include="My Project\Settings.Designer.vb">
|
|
||||||
<AutoGen>True</AutoGen>
|
|
||||||
<DependentUpon>Settings.settings</DependentUpon>
|
|
||||||
<DesignTimeSharedInput>True</DesignTimeSharedInput>
|
|
||||||
</Compile>
|
|
||||||
</ItemGroup>
|
|
||||||
<ItemGroup>
|
|
||||||
<EmbeddedResource Include="FrmAccueil.resx">
|
|
||||||
<SubType>Designer</SubType>
|
|
||||||
<DependentUpon>FrmAccueil.vb</DependentUpon>
|
|
||||||
</EmbeddedResource>
|
|
||||||
<EmbeddedResource Include="FrmAff.resx">
|
|
||||||
<SubType>Designer</SubType>
|
|
||||||
<DependentUpon>FrmAff.vb</DependentUpon>
|
|
||||||
</EmbeddedResource>
|
|
||||||
<EmbeddedResource Include="FrmBilanID.resx">
|
|
||||||
<SubType>Designer</SubType>
|
|
||||||
<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>
|
|
||||||
<DependentUpon>FrmEdit.vb</DependentUpon>
|
|
||||||
</EmbeddedResource>
|
|
||||||
<EmbeddedResource Include="FrmInput1.resx">
|
|
||||||
<SubType>Designer</SubType>
|
|
||||||
<DependentUpon>FrmInput1.vb</DependentUpon>
|
|
||||||
</EmbeddedResource>
|
|
||||||
<EmbeddedResource Include="FrmInput2.resx">
|
|
||||||
<SubType>Designer</SubType>
|
|
||||||
<DependentUpon>FrmInput2.vb</DependentUpon>
|
|
||||||
</EmbeddedResource>
|
|
||||||
<EmbeddedResource Include="FrmInput3.resx">
|
|
||||||
<SubType>Designer</SubType>
|
|
||||||
<DependentUpon>FrmInput3.vb</DependentUpon>
|
|
||||||
</EmbeddedResource>
|
|
||||||
<EmbeddedResource Include="FrmNouv.resx">
|
|
||||||
<SubType>Designer</SubType>
|
|
||||||
<DependentUpon>FrmNouv.vb</DependentUpon>
|
|
||||||
</EmbeddedResource>
|
|
||||||
<EmbeddedResource Include="My Project\Resources.resx">
|
|
||||||
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
|
|
||||||
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
|
|
||||||
<CustomToolNamespace>My.Resources</CustomToolNamespace>
|
|
||||||
<SubType>Designer</SubType>
|
|
||||||
</EmbeddedResource>
|
|
||||||
</ItemGroup>
|
|
||||||
<ItemGroup>
|
|
||||||
<None Include="My Project\Application.myapp">
|
|
||||||
<Generator>MyApplicationCodeGenerator</Generator>
|
|
||||||
<LastGenOutput>Application.Designer.vb</LastGenOutput>
|
|
||||||
</None>
|
|
||||||
<None Include="My Project\DataSources\FrmInput1.datasource" />
|
|
||||||
<None Include="My Project\Settings.settings">
|
|
||||||
<Generator>SettingsSingleFileGenerator</Generator>
|
|
||||||
<CustomToolNamespace>My</CustomToolNamespace>
|
|
||||||
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
|
|
||||||
</None>
|
|
||||||
</ItemGroup>
|
|
||||||
<ItemGroup>
|
|
||||||
<Content Include="LISEZ MOI.txt" />
|
|
||||||
<Content Include="Logo64.ico" />
|
|
||||||
</ItemGroup>
|
|
||||||
<ItemGroup>
|
|
||||||
<BootstrapperPackage Include="Microsoft.Net.Client.3.5">
|
|
||||||
<Visible>False</Visible>
|
|
||||||
<ProductName>.NET Framework 3.5 SP1 Client Profile</ProductName>
|
|
||||||
<Install>false</Install>
|
|
||||||
</BootstrapperPackage>
|
|
||||||
<BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
|
|
||||||
<Visible>False</Visible>
|
|
||||||
<ProductName>.NET Framework 3.5 SP1</ProductName>
|
|
||||||
<Install>true</Install>
|
|
||||||
</BootstrapperPackage>
|
|
||||||
<BootstrapperPackage Include="Microsoft.Windows.Installer.3.1">
|
|
||||||
<Visible>False</Visible>
|
|
||||||
<ProductName>Windows Installer 3.1</ProductName>
|
|
||||||
<Install>true</Install>
|
|
||||||
</BootstrapperPackage>
|
|
||||||
</ItemGroup>
|
|
||||||
<Import Project="$(MSBuildBinPath)\Microsoft.VisualBasic.targets" />
|
|
||||||
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
|
|
||||||
Other similar extension points exist, see Microsoft.Common.targets.
|
|
||||||
<Target Name="BeforeBuild">
|
|
||||||
</Target>
|
|
||||||
<Target Name="AfterBuild">
|
|
||||||
</Target>
|
|
||||||
-->
|
|
||||||
</Project>
|
|
||||||
@@ -1,13 +0,0 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
|
||||||
<Project ToolsVersion="4.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
|
||||||
<PropertyGroup>
|
|
||||||
<PublishUrlHistory />
|
|
||||||
<InstallUrlHistory />
|
|
||||||
<SupportUrlHistory />
|
|
||||||
<UpdateUrlHistory />
|
|
||||||
<BootstrapperUrlHistory />
|
|
||||||
<ErrorReportUrlHistory />
|
|
||||||
<FallbackCulture>fr-FR</FallbackCulture>
|
|
||||||
<VerifyUploadedFiles>false</VerifyUploadedFiles>
|
|
||||||
</PropertyGroup>
|
|
||||||
</Project>
|
|
||||||
Binary file not shown.
Binary file not shown.
|
Before Width: | Height: | Size: 25 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 128 KiB |
Binary file not shown.
Reference in New Issue
Block a user