Traitement ligne par ligne

Commenter

Contenu du snippet

Pour démêler des donnée, pratique pour le réseau. Il traite les données ligne par ligne :))

Source / Exemple : 


Public Sub Traitement(vsString As String)
Dim sCommand As String
Do While InStr(1, vsString, vbCrLf)
    sCommand = Mid(vsString, 1, InStr(1, vsString, vbCrLf) - 1)
    Select Case sCommand
Case "[Message]"
msgbox "Salutation"
End Select
vsString = Mid(vsString, InStr(1, vsString, vbCrLf) + 2, Len(vsString))
Loop
End Sub

'Va démêler les donnés Exemple : ProcessData "[Message] salutation" & vbcrlf
'Donnée trouver sais que c'est un message et s'est que le message est Salutation

Conclusion :


Rien

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (cs_max12)