bonjour,
Je cherche une fonction qui renvoie les données d'une array séparé par des virgules dans une seul ligne dans vb.net 2008 qui va être contenue dans une Variable de type String
Code:arvalue="1,james,bernard,28,Male";
Merci pour votre aide !
Version imprimable
bonjour,
Je cherche une fonction qui renvoie les données d'une array séparé par des virgules dans une seul ligne dans vb.net 2008 qui va être contenue dans une Variable de type String
Code:arvalue="1,james,bernard,28,Male";
Merci pour votre aide !
Dim arvalue() As String = "1,james,bernard,28,Male".Split(","c)
ou
Dim maChaine as string = "1,james,bernard,28,Male"
Dim arvalue() As String = maChaine.Split(","c)
et évite de poster tes message partout!
--> http://www.developpez.net/forums/d88...et/vb-net-poo/
Merci Vincent
Moi je cherche L’équivalent de cette fonction la
http://php.net/manual/fr/function.implode.php
en VB .net
Bonjour,
Est-ce que c'est ce que tu cherches : String.Join?
Voila La solution que je partage avec Vous Merci
un Procédure de mise a jour d'une table en lui passont des paramétré t-elle que le nom de table les champs a modifier les valeurs et la condition :)Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21 Public Sub DB_Update(ByVal table As String, ByVal cham() As String, ByVal val() As String, ByVal condition As String) If DB_Count(table, condition) > 0 Then Try Dim tab() As String ds.Clear() If cham.Length = val.Length Then For i As Integer = 0 To cham.Length ReDim Preserve tab(i) tab(i) = cham(i) & "=" & val(i) Next cmd = New OleDbCommand("UPDATE " & table & " SET " & Join(tab, ",") & " " & condition & "", con) cmd.ExecuteNonQuery() MsgBox("Mise A Jour Réussie !!", MsgBoxStyle.Information) End If Catch ex As Exception MsgBox("Erreur dans la requête de Modification !!! ") End Try Else MsgBox("Enregistrement Non Trouvé !", MsgBoxStyle.Exclamation) End If End Sub