retouner à la ligne pour poursuivre avec le codeRésolu

Question

Bonjour, 
je travaille avec les classes en VB6.0 ,dans mon code je veux retourner à la ligne parce qu'il n'y a plus d'espace sur la ligne sans toutefois mettre fin à l'instruction.et la j'ai déjà tout essayé avec les retour chariots mai jusqu'ici je n'ai pas une solution à cela.voici le code en question

Public Function modifagent()                                                                        
cnx.Execute ("update agent set codeagent='" & codeagent_ & "',  nomagent ='" & nomagent_ & "', " vbcr
"prenomagent ='" & prenomagent_ & "' ,  telagent ='" & telagent_ & "',  sexagent ='" & sexagent_ & "'," vbcr
"  datenaissanceagent ='" & datenaissanceagent_ & "',  lieunaissanceagent ='" & lieunaissanceagent_ & "', " vbcr
" situationmatrimoniale ='" & situationmatrimoniale_ & "',  regionorigineagent ='" & regionorigineagent_ & "', " vbcr
" arrondissementagent ='" & arrondissementagent_ & "',  villageagent ='" & villageagent_ & "'," vbcr
"ethnieagent ='" & ethnieagent_ & "',  religionagent ='" & religionagent_ & "',  antecedentjudiciaire ='" & antecedentjudiciaire_ & "'," vbcr
"  nompere ='" & nompere_ & "',  nommere ='" & nommere_ & "',  emailagent ='" & emailagent_ & "',  domicileagent ='" & domicileagent_ & "'," vbcr
"  professionagent ='" & professionagent_ & "',  niveauetudeagent ='" & niveauetudeagent_ & "',  dernieremployeuragent ='" & dernieremployeuragent_ & "'," vbcr
"  telemployeur ='" & telemployeur_ & "',  derniersalaireagent ='" & derniersalaireagent_ & "',  dernierposteoccupe ='" & dernierposteoccupe_ & "',vbcr
"  motifdepartagent ='" & motifdepartagent_ & "',  nomparrain ='" & nomparrain_ & "',  prenomparain ='" & prenomparain_ & "', vbcr
" cniparrain ='" & cniparrain_ & "',  telparrain ='" & telparrain_ & "',  salairenegocieagent ='" & salairenegocieagent_ & "', vbcr
" datedebuttravail ='" & datedebuttavail_ & "',  nomrecruteur ='" & nomrecruteur_ & "',  observationrecruteur ='" & observationrecruteur_ & "', vbcr
" typeagentid ='" & Typeagentid_ & "',  quartierid ='" & quartierid_ & "',  banqueid ='" & banqueid_ & "' where agentid ='" & agentid_ & "'")

End Function

svp j'ai besoin d'aide.merci


EDIT : Ajout des balises de code

ucfoutu · Answer

Bonjour,
Que sont ces vbcr, à la fin de chaque ligne ?
On passe d'une ligne à l'autre dans l'éditeur, en utilisant le signe "_"
Exemples pour le même résultat :

toto = "bala" & _
"vvvv" & vbCrLf & _
"zzzz"
 MsgBox toto

MsgBox "bala" & _
"vvvv" & vbCrLf & _
"zzzz"

toto = "bala" & _
"vvvv" & vbCrLf
toto = toto & "zzzz"
MsgBox toto


EDIT : Ajout des balises de code (jordane)

________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviend

anie1 · Answer

merci déjà ucfoutu mais je ne suis pas satisfaite ,j'ai essayé mais sa ne marche pas.Et aussi je suis confuse dois-je utiliser "_" ou vbCrLf comme j'ai reçu dans le code ci-desssus?

ucfoutu · Answer

Bon...
Je libère donc moi-même ce sujet, puisque anie semble avoir autant de difficultés à cliquer sur te tag RESOLU que pour "intégrer" des choses simples ...

J'ajoute juste ceci, à l'intention de anie1 :
Lorsque le nombre de champs à modifier d'un article  est à ce point grand, on peut se poser beaucoup de questions !
 
________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviend

Retouner à la ligne pour poursuivre avec le code

3 réponses

Votre réponse