salaxie
Messages postés5Date d'inscriptionsamedi 30 janvier 2010StatutMembreDernière intervention13 avril 2010
-
13 avril 2010 à 23:21
Calade
Messages postés1207Date d'inscriptiondimanche 20 avril 2003StatutMembreDernière intervention 4 juin 2016
-
14 avril 2010 à 09:01
comment declarer une variable qui ne perde pa son contenu
dans le cas de la variable numero que a chaque inscription d un nouvel étudient le numero soit superieur de 1 de l ancienne valeur
le code :
Structure Etudiant
<VBFixedString(20)> Public strNom As String
<VBFixedString(20)> Public strPrenom As String
End Structure
Public numero As Integer = 1
Private Sub Label4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label4.Click
Me.Label4.Text = numero
End Sub 'et vous n aurez jamais a le faire
Private Sub AjouterButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AjouterButton.Click
Dim intnumero As Integer
Dim udtEtudiant As Etudiant
intnumero = numero
If intnumero > 0 AndAlso intnumero < 100 Then
udtEtudiant.strNom = Me.TextBox1.Text
udtEtudiant.strPrenom = Me.TextBox2.Text
FileOpen(1, "Etudiant.data", OpenMode.Random, OpenAccess.ReadWrite, OpenShare.Shared, Len(udtEtudiant))
FilePut(1, udtEtudiant, intnumero)
Else
MessageBox.Show("le nembre des etudiants est suffisant")
End If
Me.Close()
End Sub
Calade
Messages postés1207Date d'inscriptiondimanche 20 avril 2003StatutMembreDernière intervention 4 juin 201610 14 avril 2010 à 09:01
Bonjour,
En VB6, on utilisait plutôt "Static". Mais regarde aussi - dans la structure de ta table la définition de ce numéro (NuméroAuto en Access). J'ai l'impression que dans ton cas, ce serait plus judicieux.