- Visual Basic / VB.NET : Recuperer le delay du double click de la souris - CodeS SourceS
- Visual Basic / VB.NET : Recuperer le label et le numero de serie d'un disque dur - CodeS SourceS
- Visual Basic / VB.NET : Récupérer l'adresse ip et le nom local de votre pc avec le con
- Visual Basic / VB.NET : Récupérer la valeur rgb d'un point et zoom - CodeS SourceS
- Visual Basic / VB.NET : Recuperer le mot de passe d'une db access - CodeS SourceS
VB.Net Récupérer dan sun variable String le mot composé [Résolu]
Signaler
cs_MagDix
cs_MagDix
- Messages postés
- 532
- Date d'inscription
- lundi 5 juin 2006
- Statut
- Membre
- Dernière intervention
- 6 octobre 2012
cs_MagDix
- Messages postés
- 532
- Date d'inscription
- lundi 5 juin 2006
- Statut
- Membre
- Dernière intervention
- 6 octobre 2012
A voir également:
- VB.Net Récupérer dan sun variable String le mot composé
- Visual Basic / VB.NET : Récuperer les variables serveur - CodeS SourceS - Guide
- Visual Basic / VB.NET : Récupérer les variables d'environnement de n'importe quel proc - Guide
- Oracle et VB.NET: Récupérer les champs d'un réquête SELECT dans une variable ✓ - Forum - VB.NET
- Vb.net convert byte array to string ✓ - Forum - VB.NET
- Visual Basic / VB.NET : Recuperer le delay du double click de la souris - CodeS SourceS - Guide
3 réponses
Charles Racaud
- Messages postés
- 3172
- Date d'inscription
- dimanche 15 février 2004
- Statut
- Membre
- Dernière intervention
- 9 avril 2017
Salut,
Avec une simple regex :
_____________
Kenji
Avec une simple regex :
Dim TonMotCompose As String = System.Text.RegularExpressions.Regex.Match(TaVariable, "[^ ]+-[^ ]+").Value
_____________
Kenji
bitangm
- Messages postés
- 13
- Date d'inscription
- jeudi 20 août 2009
- Statut
- Membre
- Dernière intervention
- 24 août 2010
Salut, un exemple complet :
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox(RechercheMotCompose(TextBox1.Text))
End Sub
Public Function RechercheMotCompose(ByVal LeTexte As String) As String
For Each s As String In LeTexte.Split(" ")
If InStr(s, "-", CompareMethod.Text) Then
Return s
End If
Next
Return ""
End Function
End Class
===================================================
BITANG Marcel Yves
bitangm@yahoo.fr
+242 405 50 61
+242 650 46 47
+242 700 02 23
+237 75 17 16 81
+237 75 68 58 22
+237 96 04 18 51
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox(RechercheMotCompose(TextBox1.Text))
End Sub
Public Function RechercheMotCompose(ByVal LeTexte As String) As String
For Each s As String In LeTexte.Split(" ")
If InStr(s, "-", CompareMethod.Text) Then
Return s
End If
Next
Return ""
End Function
End Class
===================================================
BITANG Marcel Yves
bitangm@yahoo.fr
+242 405 50 61
+242 650 46 47
+242 700 02 23
+237 75 17 16 81
+237 75 68 58 22
+237 96 04 18 51