insérer un caractère dans une chaine

Salut, je ne sais pas comment insérer un caractère dans une chaine et je ne trouve pas. Il n'y a que des remplacements de caractères existants, ce genre de trucs.... Ce serait ça :

Label1.caption = "183439"
J'aimerais insérer ":" dedans pour obtenir :
Label1.caption = "18:34:39"

Genre mettre ":" en position "2" et "5" (je pars d'une position "0")... dan cette chaîne donc... Il n'y aurait que des chiffres donc, pas de lettre à l'origine...

Si quelqu'un sait comment faire ça serait tip top !

Merci...

Bonjour,

Utilise les fonctions left, right et mid.

Syntaxe

Mid(string, start[, length])

La syntaxe de la fonction Mid comprend les éléments suivants :

élément	Description
string	Expression de chaîne à partir de laquelle les caractères sont retournés. Si l'argument string contient Null, la valeur Null est retournée.
start	Position du caractère dans l'argument string à partir duquel commence la partie à extraire. Si l'argument start est supérieur au nombre de caractères contenus dans l'argument string, la fonction Mid retourne une chaîne de longueur nulle.
length	Nombre de caractères à retourner. Si cet argument est omis ou si le nombre de caractères dans le texte (y compris le caractère à l'argument start) est inférieur à ceux compris dans l'argument length, tous les caractères entre la position de l'argument start et la fin de la chaîne sont retournés.

Syntaxe

Left(string, length)

La syntaxe de la fonction Left comprend les arguments nommés suivants :

Élément	Description
string	Expression de chaîne dont les caractères situés les plus à gauche sont renvoyés. Si l'argument string contient une valeur de type Null, Null est renvoyé.
length	Donnée de type Variant (Long). Expression numérique indiquant le nombre de caractères à renvoyer. Si vous indiquez la valeur 0, une chaîne de longueur nulle ("") est renvoyée. Si vous indiquez une valeur supérieure ou égale au nombre de caractères contenus dans l'argument string, la totalité de la chaîne est renvoyée.

Syntaxe

Right(string, length)

La syntaxe de la fonction Right comprend les arguments nommés suivants :

Élément	Description
string	Expression de chaîne dont les caractères les plus à droite sont renvoyés. Si l'argument string contient une valeur de type Null, Null est renvoyé.
length	Donnée de type Variant (Long). Expression numérique indiquant le nombre de caractères à renvoyer. Si la valeur est 0, une chaîne de longueur nulle est renvoyée. Si cette valeur est supérieure ou égale au nombre de caractères contenus dans l'argument string, la totalité de la chaîne est renvoyée.

Bon courage...

S.L.B.

---

-- Le règlement tu liras -- Des recherches tu feras -- Le style SMS tu banniras --
-- De la validation pertinente tu feras -- Du respect tu auras -- <

Bonjour,
Pourquoi serait-ce si complique de faire sous VB.Net ce que VB6 fait à l'aise ainsi :

toto = "183439"
MsgBox Format(toto, "##:##:##")

Vive VB6, alors ... et a fuera VB.Net (que je ne connais pas...)

String.Format existe aussi en .NET en de nombreuses surcharges, donc un peu de recherche pour trouver son bonheur

Il me semble qu'avec la fonction Insert() tu dois pouvoir le faire :)
Exemple ici pour ajouter des tirets :
Dim MyStr as String = "JoLuluDan"
MyStr.Insert(2,"-")
MyStr.Insert(6,"-")
Après opération, la chaine vaut "Jo-Lulu-Dan"

Par contre je ne sais pas si on part de 0 ou de 1, à toi de vérifier :)

Cyril

euh... merci pour vos réponses mais je viens de m'apercevoir que je me suis gourré de catégorie là... c du vb6, pas du .net ou vb2005, quoi qu'il en soit, le coup de :

label1 = format(label1, ("##:##:##"))

fonctionne pil poil, sauf que si y'a un zéro en première position il est supp'.
Alors j'ai fait genre

if Len(label1) = 7 then label1 = "0" & label1

Ca marche...

mais si j'ai "000001" ça me fait "::1"

...

Ben vi, j'ai zieuté un peu partout. Merci pour la re-réponse jmfmarques !