Gérer un texte dans un textbox

Résolu/Fermé

MD - 16 janv. 2018 à 22:58
Whismeril Messages postés 19028 Date d'inscription mardi 11 mars 2003 Statut Non membre Dernière intervention 24 avril 2024 - 18 janv. 2018 à 07:26

Bonjour à tous,

Je bloque sur un petit problème dans mon programme VB 2010 express.

Je reçois un texte venant du port RS232 que je place dans un textbox.
La longueur du texte peut être variable.
J'ai placé un XX en début de texte et un ZZ à la fin par facilité.
J'aimerais juste prendre le texte qui se trouve entre le XX et le ZZ et le placer dans un autre textbox ou dans dans un listbox pour le traiter.
Exemple de texte reçu sur le port RS232 : XXBonjour à tousZZ

Si quelqu'un peut m'aider ce serait super.

merci

A voir également:

Gérer un texte dans un textbox
Mettre un texte en majuscule - Guide
Comment retranscrire un entretien audio en texte - Guide
Gerer les profils netflix - Guide
Si cellule contient texte alors ✓ - Forum Excel
Excel cellule couleur si condition texte - Guide

5 réponses

Réponse 1 / 5

Whismeril Messages postés 19028 Date d'inscription mardi 11 mars 2003 Statut Non membre Dernière intervention 24 avril 2024 931
17 janv. 2018 à 07:30

Bonjour
tu peux utiliser une regex

http://regexstorm.net/tester?p=%28%3f%3c%3dXX%29.%2b%28%3f%3dZZ%29&i=XXBonjour+%c3%a0+tousZZ+

Tu peux aussi "effacer" le texte:

dim monTexte as string = maSource.Replace("XX","").Replace("ZZ","")

Réponse 2 / 5

Kalissi Messages postés 218 Date d'inscription jeudi 2 mai 2013 Statut Membre Dernière intervention 15 juillet 2019 20
17 janv. 2018 à 20:26

Bonjour,

Autre solution :

Dim monTexte As String = maSource.Substring(2, maSource.Length - 4)

Réponse 3 / 5

MD
17 janv. 2018 à 20:42

Bonjour,

Merci pour vos réponses, je vais tester vos solutions et vous tiens au courant

Réponse 4 / 5

MD
17 janv. 2018 à 21:18

J'ai commencé par essayer le REGEX.
La formule est bonne mais je ne trouve pas comment placer dans un textbox le résultat.

Whismeril Messages postés 19028 Date d'inscription mardi 11 mars 2003 Statut Non membre Dernière intervention 24 avril 2024 931
17 janv. 2018 à 21:44

			Dim texteOrigine As String = " XXBonjour à tousZZ "
			Dim texteFinal As String

			Dim match As Match = Regex.Match(texteOrigine, "(?<=XX).+(?=ZZ)")

			If match.Success Then
				texteFinal = match.Value
			End If

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 5 / 5

MD
18 janv. 2018 à 01:22

Un grand merci, ça fonctionne.
Je peux continuer mon programme.
Je place dans un listbox ce qui vient de mon port com et le texte corrigé dans un autre listbox.
C'est super sympa de m'avoir donné un coup de main.

Whismeril Messages postés 19028 Date d'inscription mardi 11 mars 2003 Statut Non membre Dernière intervention 24 avril 2024 931
18 janv. 2018 à 07:26

De rien, marque le sujet résolu si cela te convient, avec la roue crantée en haut à droite de la discussion

Discussions similaires

Trouver le mot réellement écrit en lettres capitales PIX

Formule Excel : "SI" une cellule contient un mot, alors ?

copie de texte

Dépixeliser / déflouter un texte ?

retrouver un texte caché dans une image jpg

Discussions similaires

Newsletters