Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : VB.Net Si valeur Absente dans un Tableau [ Divers / Général ] (JeffC1977)

mardi 6 novembre 2007 à 20:48:07 | VB.Net Si valeur Absente dans un Tableau

JeffC1977

Salut à tous

Je ne sais pas comment coder cela...

Si valeur du textbox est absente dans le tableau alors...

J'ai codé cela mais ça fonctionne que pour une ligne dans le Tableau...

Merci de votre aide


For

i = 0 To UBound(Tableau)
   LigneSplit = Tableau(i).Split(Separateur)
   If txtEfface.Text <> Tableau(i).Split(Separateur)(0) Then
      MessageBox.Show("Point absent", "Cogo iPaq",....
   End If

mercredi 7 novembre 2007 à 08:18:04 | Re : VB.Net Si valeur Absente dans un Tableau

Baguauda



Si j'ai bien comprit ton problème
Dans ton code tu recherche la première ligne qui n'est pas dans ton tableau, alors que tu dois contrôler l'ensemble du tableau.
Je ne suis pas certain de la synthaxe vb mais ca devrais donner :

Dim found as boolean = false

For i = 0 To UBound(Tableau)

   LigneSplit = Tableau(i).Split(Separateur)
   If txtEfface.Text == Tableau(i).Split(Separateur)(0) Then
      found := true
   End If
End For

if(!found)
Then
    MessageBox.Show("Point absent", "Cogo iPaq",....

mercredi 7 novembre 2007 à 09:58:42 | Re : VB.Net Si valeur Absente dans un Tableau

Stephane33

Membre Club Administrateur CodeS-SourceS
Réponse acceptée !

For

i = 0 To UBound(Tableau) >>>>>>>>>> Sous entend que les données sont déja chargée dans ton tableau
   LigneSplit = Tableau(i).Split(Separateur)  >>>>>>> A quoi sert cette ligne

   If txtEfface.Text <> Tableau(i).Split(Separateur)(0) Then
      MessageBox.Show("Point absent", "Cogo iPaq",....
   End If


et sinon
avec des données déjà chargées cela aussi devrait fonctionner

Dim flag as boolean = false

For i = 0 to Tableau.lenght - 1
  If
txtEfface.Text = Tableau(i).Split(Separateur)(0)  then
     flag = true
     exit for
  endif
Next i

If Not Flag then msgbox("Point Absent",Cogo iPaq",.......

				
				
Le savoir n'est que le filtre de l'experience

mercredi 7 novembre 2007 à 13:20:10 | Re : VB.Net Si valeur Absente dans un Tableau

JeffC1977

Salut ....
Meric de votre aide  mais ca fonctionne pas vraiment...
Je réexplique en d'autre mots.

Voici mon fichier texte
11313 151,6005 -1820,9249 0,0000 50
11312 192,5143 -1841,3303 0,0000 50
17119 300,7254 136,5244 0 35

Donc mon Tableau contient cette même information
Chaque ligne = Point CoordY CoordX Altitude Code
Donc je me concentre sur le premier caractère de chaque ligne
Soit : 11313, 11312 et 17119

Si l'utilisateur veut effacer le point 17119 mais par erreur il inscrit dans le textbox le chiffre 18119
Je veux avoir un messagebox me disant que le point est absent dans le fichier.

Avec ce code.. il est certain qu'il passera pas la condition même si l'utilisatuer entrent le bon point.

Exemple l'utilisateur entre le nombre 18119
Absent deveint à True

Si l'utilisateur inscrit 17119 et bien Absent sera = à True car les deux premieres lignes du tableau ne contiennt pas la valeur 17119

Comprenez-vous ????

Merci de votre aide
Bye

For j = 0 To Tableau.Length - 1
   
If txtEfface.Text <> Tableau(j).Split(Separateur)(0) Then
      Absent = True
      ExitFor
   EndIf
Next j





mercredi 7 novembre 2007 à 13:37:08 | Re : VB.Net Si valeur Absente dans un Tableau

Baguauda


C'est pour cela que Stephane33 à ajouter l'instruction Exit For pour mettre fin à la boucle si l'élément est trouvé.



mercredi 7 novembre 2007 à 14:32:24 | Re : VB.Net Si valeur Absente dans un Tableau

Stephane33

Membre Club Administrateur CodeS-SourceS

Vi comme dit Baguauda, le flag par défaut est négatif
dans la boucle for, si on trouve la valeur, alors le flag passe à true et on sort de la boucle pour gagner du temps.
Après la boucle soit flag est à false ("If not flag" équivaut à  If Flag =False) alors message spécifiant l'absence du point soit il est à true et pas de message
Le savoir n'est que le filtre de l'experience

mercredi 7 novembre 2007 à 17:03:37 | Re : VB.Net Si valeur Absente dans un Tableau

JeffC1977

Effectivement... mon dernier message fut inutile...

J'avais fini par comprendre...

Désolé je n'ai pas pu répondre avant...

Merci de votre aide...

très aprécié



Cette discussion est classé dans : net, vb, valeur, tableau, absente


Répondre à ce message

Sujets en rapport avec ce message

sql server ce et vb.net [ par didierll ] Bonjour, je suis débutant en développement Pocket Pc. Je développe en VB.net. Je voudrais savoir comment créer une base de données sql server ce, comm Aide VB.Net Sql Serveur CE [ par bamyes ] Bonjour, je suis débutant en développement Pocket Pc. Je développe en VB.net. Je voudrais savoir comment créer une base de données sql server ce, comm Evolution CS [ par magic_Nono ] BonjourCe messsage est à destination de tous ceux désirant faire évoluer encore plus CS,serait-il possible d'établir une distinction dans les langage [VB.net]Application avec SQL serverCE [ par thomasBasic ] Salut, Je développe une application PocketPC avec visualStudio.net, donc cette application tourne avec SQL server CE et ce que je voudrais c'est trans Réseau et émulateur VB Net [ par lemire ] BonjourJe suis en cours de développement d'une petite application PDA pour un client. J'utilise l'atelier de développement VB.Net avec un projet de ty Base de sonnée SQLCe avec VB.NET [ par antoineraymond ] Bonjour. J'aimerais avoir un exemple d'utilisation de SQLCe avec VB.NET. Comment créer la base de donné, comment l'utilisé et comment l'installer. Si vb.net Lancer un executable sur ppc [ par garocheb ] Bonjour, Je suis un nouveau en vb.net et je n'arrive pas a trouver comment on peux lancer un executable se trouvant dans "\my documents\12.exe" Aidez GetForegroundWindow [ par MadM@tt ] Bonjour je voulais sa voir si l'api GetForegroundWindow est présente sur windows mobile 2003 ou 2005, car avec visual basic .net 2005 et l'émulateur s VB.Net GroupBox [ par JeffC1977 ] Salut...J'ai une petite question bête à poser....Je suis en VB. NetJ'aimerais mettre un Frame (VB6), donc un GroupBox mais je ne l'ai pas dans ma boît .NET Lire un fichier Texte et le mettre dans un Tableau [ par JeffC1977 ] Salut...Je cherche sur le site des codes en .Net compact Framework pour lire un fichier. Mais ce que je trouve n'est pas en .Net. Je trouve du code ma


Nos sponsors

Sondage...

CalendriCode

Janvier 2009
LMMJVSD
   1234
567891011
12131415161718
19202122232425
262728293031 

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,265 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.