par un # puis un chiffre
et m'entre le nom entre les deux " dans une autre variables, si non il passe a la ligne suivante.
dim lestring as string lestring = "# Billy 2222"
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionet m'entre le nom entre les deux
Protected Class dataclient Friend id As Integer Friend name As String End Class Private listdataclient As New List(Of dataclient) Private Sub CheckRTI(ByVal RTI As RichTextBox) Dim element() As String Dim res As Integer For Each item In RTI.Lines element = item.Split(" "c) If element(0) = ("#") Then If Integer.TryParse(element(1), res) Then Dim data As New dataclient data.id = Convert.ToInt32(element(1)) data.name = element(2) listdataclient.Add(data) End If End If Next End Sub
hostname: Nom du serveur version : 1.0.0.34/7 3471 secure udp/ip : XX.XXX.XXX.XXX:27040 map : de_dust2 at: 0 x, 0 y, 0 z players : 2 (16 max) # userid name uniqueid connected ping loss state # 2 "Freempi" STEAM_0:0:537XXXX 00:13 420 0 active # 3 "Rapace" STEAM_0:0:151XXXXX 00:10 55 0 active
Dim Id1 As Integer Dim Nom1 As String Dim Id2 As Integer Dim Nom2 As String Id1 = 2 Nom1 = "Freempi" Id2 = 3 Nom2 = "Rapace"