Problème fonction recherche..

Et brebonjour ^^ Me revoilà avec un autre probleme...

Je ne comprend rien à ce code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29

Public Function afficher_element(ByVal valeur As String) Dim i As Integer Dim pourcent As Integer Dim bOk As Boolean = False If (valeur < 5000) Then Me.DonneesBindingSource.Position = valeur - 25 Else Me.DonneesBindingSource.Position = 4056 + (valeur - 18280) - 30 End If   For i = 0 To Me.DonneesBindingSource.Count Step 1 pourcent = (i / (Me.DonneesBindingSource.Count)) * 100 If (i = 0) Then My.Forms.Recherche.ProgressBar1.Increment(-100) Else My.Forms.Recherche.ProgressBar1.Increment(pourcent) End If My.Forms.Recherche.ProgressBar1.Increment(pourcent) If (valeur = Me.Num_cdtLabel1.Text) Then bOk = True My.Forms.Recherche.ProgressBar1.Increment(100) i = Me.DonneesBindingSource.Count Else Me.DonneesBindingSource.MoveNext()   End If Next Return bOk End Function

---

C'est dans mon fichier form1.vb
Mon programme, je le rapelle, est une aide à la saisie de fiche candidats, qui est ensuite enregistré dans une base de donnée. Le but du jeu étant de pouvoir rechecher des candidat en fonction de leurs compétences.

Lorsque j'éffectue une recherche, et que je souhaite cliquer sur une ligne de la datagrid, je ne peux cliquer que sur le numéro de la fiche candidat, qui est tout à gauche du tableau qui s'affiche.

Je souhaiterais cliquer partout sur la ligne afain de charger sa fiche.
Mais au niveau du débogage, il s'arrete à un endroit du bout de code que j'ai mis:

Code:

---

If (valeur < 5000) Then

---

Que faire? et surtout Comment faire?

Tu compares un String avec un Integer c'est surement pour ça que ça va pas

Soit tu utilises .equals pour comparer 2 chaines
Soit tu changes le parametre de ta fonction pour mettre valeur as Integer
Soit tu castes ton string en integer

Sinon je te conseil d'utiliser la gestion d'erreur avec :

Code:

---

1 2 3 4 5 6

try 'ici le code qui peut déclancher des erreurs Catch ex As Exception msgbox(ex.message) End Try

---

Histoire d'avoir un semblant de piste pour corriger :)

Si je changes le parametre de ta fonction pour mettre valeur as Integer, il bloque à un autre endroit du meme bout de code.

Et je ne sais pas comment caster le string en integer :oops: si tu pouvais m'expliquer?

(et oui, je débute -_-')

Code:

---

1 2 3 4 5 6 7 8 9

Dim maString As String = "98797" Dim monInt As Integer Try monInt = CInt(maString) Catch ex As Exception MsgBox("Erreur : " & ex.Message) End Try MsgBox(monInt)

---

Si tu mets des lettres à la palce de 98797 ça génére une erreur qui est traitée par le catch :)
Y a peut être d'autre méthode plus propre mais j'ai que celle là sous la main pour l'instant

J'ai tenté d'introduire ton code, et lors du déboguage, il a bloqué à cet endroit du code :

Code:

---

pourcent = (i / (Me.DonneesBindingSource.Count)) * 100

---

avec le message d'erreur :

Citation:

---

L'opération arithmétique a provoqué un dépassement de capacité.

---

Et je comprend pas trop pourquoi..

EDIT:
Ok, je rectifie.. En cliquant sur la case du nom après avoir fait la recherche: par exemple je recherche par le prénom David, il m'affiche tous les david de la bdd, et lorsque je souhaite cliquer sur le nom de la personne (en cliquant sur la ligne de la personne contenant son numéro de ligne bdd, prénom, nom, ecole, etc...) il me dit:

Citation:

---

"La conversion de la chaine "ici le nom de la personne sur la quelle j'ai cliqué" en type "integer' n'est pas valide".

---

Comment résoudre ce probleme?

Donc c'est toujours au même endroit que ça va pas ?

Si oui es tu sur que c'est le numéro de candidat qui est renvoyé à la fonction et non pas autre chose ? Ou un string uniquement composé de chiffres ?

Oui il semble que c'est le numéro du candidat qui est renvoyé...

Moi j'aimerais pouvoir cliquer sur toute la ligne et que la fiche du candidat se charge quand meme...

C'est possible?

Je pense par exemple à rajouter du code da facon à si je clique sur le nom, il m'affiche tout aussi bien la fiche du candidat sélectionné.

Mais je sais pas faire..

vi c'est possible, aprés je connais pas ton code mais je l'ai déjà fait via une ListView

Sais-tu comment afficher la fiche candidat en cliquant sur le nom ou autre case de la datagrid?

Un exemple de code?

(Merci pour ton aidé déjà précieuse)

Je connais pas les DataGrid sous Vb dotNet, mais tu trouveras peut être ton bonheur ici : http://faqvbnet.developpez.com/?page=form_dgrid

En utilisant : Comment sélectionner toute la ligne lors d'un click dans une cellule ? ( ça c'est plus par soucis esthétique :))
Et par la suite si tu as une colonne avec l'identifiant du candidat tu recupére la ligne du click et tu check le numero de la colonne correspondant au num du candidat

Neanmoins perso j'utilise des List View qui sont, si tu es uniquement en texte, plus pratique à mon gout

Ok, j'ai trouvé le bout de code dont tu me parles pour sélectionner tout une ligne.

Mais après je ne sais pas comment récupérer la ligne du click et comment checker le numéro de la fiche du candidat -_-

Ah wé.. Je viens de comprendre un truc, Datagrid, et DatagridView, c'est pas la meme chose..

Ce que j'ai, c'est une DataGridView

Y a deux trois trucs utiles sur : http://plasserre.developpez.com/v3-16.htm
Aprés suffit de fouiller un peu sur google ou sur la faq de developpez et on trouve un peu de tout ^^

Si tu as des soucis hésties pas à me PM, j'en profite par la même occasion pour découvrir des truc en VB qui pourront ptet me servir :)

Comme je débute en vb, je cherche un peu partout comme tu dis ^^
Et je connais déjà ce site qui est très bien.

Je te Pm si j'ai un probleme. Merci de ton aide.

Si quelqu'un d'autre sait comment régler mon pbm.. =)

Bon, j'ai pas trouvé, je sais toujours pas comment cliquer sur toute une ligne d'une DataGridView... :roll: