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/
|
||||
obj/
|
||||
/bin
|
||||
/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">
|
||||
<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////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////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>
|
||||
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>
|
||||
' Ce code a été généré par un outil.
|
||||
' Version du runtime :4.0.30319.237
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:2.0.50727.4927
|
||||
'
|
||||
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
|
||||
' le code est régénéré.
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
@@ -14,10 +14,10 @@ Option Explicit On
|
||||
|
||||
Namespace My
|
||||
|
||||
'REMARQUE : ce fichier étant généré automatiquement, ne le modifiez pas directement. Pour apporter des modifications,
|
||||
' ou si vous rencontrez des erreurs de build dans ce fichier, accédez au Concepteur de projets
|
||||
' (allez dans les propriétés du projet ou double-cliquez sur le noeud My project dans
|
||||
' l'Explorateur de solutions), puis apportez vos modifications sous l'onglet Application.
|
||||
'NOTE: This file is auto-generated; do not modify it directly. To make changes,
|
||||
' or if you encounter build errors in this file, go to the Project Designer
|
||||
' (go to Project Properties or double-click the My Project node in
|
||||
' Solution Explorer), and make changes on the Application tab.
|
||||
'
|
||||
Partial Friend Class MyApplication
|
||||
|
||||
@@ -32,7 +32,7 @@ Namespace My
|
||||
|
||||
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
||||
Protected Overrides Sub OnCreateMainForm()
|
||||
Me.MainForm = Global.Projet_VS_100_Priet_Sabourin.FrmAccueil
|
||||
Me.MainForm = Global.WindowsApplication1.Form1
|
||||
End Sub
|
||||
End Class
|
||||
End Namespace
|
||||
|
||||
@@ -1,10 +1,11 @@
|
||||
<?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">
|
||||
<MySubMain>true</MySubMain>
|
||||
<MainForm>FrmAccueil</MainForm>
|
||||
<MainForm>Form1</MainForm>
|
||||
<SingleInstance>false</SingleInstance>
|
||||
<ShutdownMode>0</ShutdownMode>
|
||||
<EnableVisualStyles>true</EnableVisualStyles>
|
||||
<AuthenticationMode>0</AuthenticationMode>
|
||||
<ApplicationType>0</ApplicationType>
|
||||
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
|
||||
</MyApplicationData>
|
||||
</MyApplicationData>
|
||||
|
||||
@@ -1,6 +1,4 @@
|
||||
Imports System.Resources
|
||||
|
||||
Imports System
|
||||
Imports System
|
||||
Imports System.Reflection
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
@@ -10,17 +8,17 @@ Imports System.Runtime.InteropServices
|
||||
|
||||
' Vérifiez les valeurs des attributs de l'assembly
|
||||
|
||||
<Assembly: AssemblyTitle("Candidat 7 Pro")>
|
||||
<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: AssemblyCompany("Priet & Sabourin Corporation")>
|
||||
<Assembly: AssemblyProduct("Candidat 7 Pro")>
|
||||
<Assembly: AssemblyCopyright("Copyright © 2010")>
|
||||
<Assembly: AssemblyTrademark("Priet & Sabourin Corporation")>
|
||||
<Assembly: AssemblyTitle("WindowsApplication1")>
|
||||
<Assembly: AssemblyDescription("")>
|
||||
<Assembly: AssemblyCompany("Microsoft")>
|
||||
<Assembly: AssemblyProduct("WindowsApplication1")>
|
||||
<Assembly: AssemblyCopyright("Copyright © Microsoft 2010")>
|
||||
<Assembly: AssemblyTrademark("")>
|
||||
|
||||
<Assembly: ComVisible(False)>
|
||||
<Assembly: ComVisible(False)>
|
||||
|
||||
'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 :
|
||||
'
|
||||
@@ -33,7 +31,5 @@ Imports System.Runtime.InteropServices
|
||||
' en utilisant '*', comme indiqué ci-dessous :
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("7.0.8.22")>
|
||||
<Assembly: AssemblyFileVersion("7.0.8.22")>
|
||||
|
||||
<Assembly: NeutralResourcesLanguageAttribute("fr")>
|
||||
<Assembly: AssemblyVersion("1.0.0.0")>
|
||||
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
||||
|
||||
@@ -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>
|
||||
' Ce code a été généré par un outil.
|
||||
' Version du runtime :4.0.30319.237
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:2.0.50727.4927
|
||||
'
|
||||
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
|
||||
' le code est régénéré.
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
Imports System
|
||||
|
||||
Namespace My.Resources
|
||||
|
||||
'Cette classe a été générée automatiquement par la classe StronglyTypedResourceBuilder
|
||||
'à l'aide d'un outil, tel que ResGen ou Visual Studio.
|
||||
'Pour ajouter ou supprimer un membre, modifiez votre fichier .ResX, puis réexécutez ResGen
|
||||
'avec l'option /str ou régénérez votre projet VS.
|
||||
'''<summary>
|
||||
''' Une classe de ressource fortement typée destinée, entre autres, à la consultation des chaînes localisées.
|
||||
'''</summary>
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _
|
||||
'This class was auto-generated by the StronglyTypedResourceBuilder
|
||||
'class via a tool like ResGen or Visual Studio.
|
||||
'To add or remove a member, edit your .ResX file then rerun ResGen
|
||||
'with the /str option, or rebuild your VS project.
|
||||
'<summary>
|
||||
' A strongly-typed resource class, for looking up localized strings, etc.
|
||||
'</summary>
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "2.0.0.0"), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
|
||||
@@ -32,30 +31,30 @@ Namespace My.Resources
|
||||
|
||||
Private resourceCulture As Global.System.Globalization.CultureInfo
|
||||
|
||||
'''<summary>
|
||||
''' Retourne l'instance ResourceManager mise en cache utilisée par cette classe.
|
||||
'''</summary>
|
||||
'<summary>
|
||||
' Returns the cached ResourceManager instance used by this class.
|
||||
'</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
|
||||
Get
|
||||
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
|
||||
End If
|
||||
Return resourceMan
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Remplace la propriété CurrentUICulture du thread actuel pour toutes
|
||||
''' les recherches de ressources à l'aide de cette classe de ressource fortement typée.
|
||||
'''</summary>
|
||||
'<summary>
|
||||
' Overrides the current thread's CurrentUICulture property for all
|
||||
' resource lookups using this strongly typed resource class.
|
||||
'</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend Property Culture() As Global.System.Globalization.CultureInfo
|
||||
Get
|
||||
Return resourceCulture
|
||||
End Get
|
||||
Set
|
||||
Set(ByVal value As Global.System.Globalization.CultureInfo)
|
||||
resourceCulture = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
52
My Project/Settings.Designer.vb
generated
52
My Project/Settings.Designer.vb
generated
@@ -1,10 +1,10 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' Ce code a été généré par un outil.
|
||||
' Version du runtime :4.0.30319.237
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:2.0.50727.4927
|
||||
'
|
||||
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
|
||||
' le code est régénéré.
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
@@ -13,27 +13,27 @@ Option Explicit On
|
||||
|
||||
|
||||
Namespace My
|
||||
|
||||
|
||||
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "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)> _
|
||||
Partial Friend NotInheritable Class MySettings
|
||||
Inherits Global.System.Configuration.ApplicationSettingsBase
|
||||
|
||||
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
|
||||
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings), MySettings)
|
||||
|
||||
#Region "Fonctionnalité Enregistrement automatique My.Settings"
|
||||
#Region "My.Settings Auto-Save Functionality"
|
||||
#If _MyType = "WindowsForms" Then
|
||||
Private Shared addedHandler As Boolean
|
||||
Private Shared addedHandler As Boolean
|
||||
|
||||
Private Shared addedHandlerLockObject As New Object
|
||||
Private Shared addedHandlerLockObject As New Object
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
|
||||
If My.Application.SaveMySettingsOnExit Then
|
||||
My.Settings.Save()
|
||||
End If
|
||||
End Sub
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
|
||||
If My.Application.SaveMySettingsOnExit Then
|
||||
My.Settings.Save()
|
||||
End If
|
||||
End Sub
|
||||
#End If
|
||||
#End Region
|
||||
|
||||
@@ -41,14 +41,14 @@ Namespace My
|
||||
Get
|
||||
|
||||
#If _MyType = "WindowsForms" Then
|
||||
If Not addedHandler Then
|
||||
SyncLock addedHandlerLockObject
|
||||
If Not addedHandler Then
|
||||
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
|
||||
addedHandler = True
|
||||
End If
|
||||
End SyncLock
|
||||
End If
|
||||
If Not addedHandler Then
|
||||
SyncLock addedHandlerLockObject
|
||||
If Not addedHandler Then
|
||||
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
|
||||
addedHandler = True
|
||||
End If
|
||||
End SyncLock
|
||||
End If
|
||||
#End If
|
||||
Return defaultInstance
|
||||
End Get
|
||||
@@ -64,9 +64,9 @@ Namespace My
|
||||
Friend Module MySettingsProperty
|
||||
|
||||
<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
|
||||
Return Global.Projet_VS_100_Priet_Sabourin.My.MySettings.Default
|
||||
Return Global.WindowsApplication1.My.MySettings.Default
|
||||
End Get
|
||||
End Property
|
||||
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