Déterminer combien de fois écrire un espaceRésolu

Question

Bon j'aimerais de l'aide s.v.p
Je m'explique, j'aimerais que quand on clique sur le bouton que ça soustrait the text.lenght et le .maxlenght du textbox Dpadup et que apres ça écris (x) espaces.
Ex:
Dim nb as integer
123 = Val(DpadUp.Text.Length) - Val(DpadUp.MaxLength)
Et apres il faut que ça ecris le nombre de fois a écrire espace dans par le 123
Si vous comprenez pas désolé
Merci d'avance les amis

cs_Galain · Accepted Answer

Salut
je ne sais si cela correspond à ton problème mais teste cela
 
Dim nbespace as snteger , chn as String
nbespace = Val(DpadUp.Text.Length) - Val(DpadUp.MaxLength)
chn = New String(" ",nbespace)
DpadUp.Text = DpadUp.Text & chn

Explication
ligne 1 : déclaration des variables
ligne 2 : calcul nombre d'espaces possible
ligne 3 : création d'une chaine de n espaces
ligne 4 : on ajoute la chaine de n espace au texte de la Textbox

La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.

GRENIER Alain

Razordj · Answer

oups je me suis trompé c'est pas Dim nb as integer  mais Dim 123 as integer

cs_Galain · Answer

Erreur de frappe : Integer et non snteger
Dim nbespace as Integer , chn as String 

La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.

GRENIER Alain

Razordj · Answer

Merci pour cette réponse rapide je vais essayer :)

Razordj · Answer

ça me répond: 
'count' ne doit pas être négatif.
Nom du paramètre : count

Razordj · Answer

Désolé pour le dernier message... ça me renvoyais un nombre négatif car le maxlenght est plus gros que le lenght actuel :P
Et un Gros Merci du fond du coeur

cs_Galain · Answer

change la seconde ligne : c'est la longueur max de la Textbox - la longueur réelle de la TextBox et non l'inverse
De plus on teste si nombre d'espaces est supérieur à 0

Dim nbespace as Integer , chn as String
nbespace = Val(DpadUp.MaxLength) - Val(DpadUp.Text.Length) 
If nbespace > 0 then
   chn = New String(" ",nbespace) 
   DpadUp.Text = DpadUp.Text & chn 
End if


 
La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.

GRENIER Alain

Razordj · Answer

de toute façon ça marche :) et j'ai pas compris ton dernier poste

Razordj · Answer

Une dernière question quand un mot dans une textbox est séparé en deux et on veux effacer les espaces après le mot sans effacer l'espace entre les deux... comment je fais ? J'utilise le .text.replace

cs_Galain · Answer

Utilise TrimEnd 

Dim chn as String
chn = "Jean Pierre     "
chn = chn.TrimEnd(" ")

Il y a aussi Trim et TrimStart
Trim supprime les espaces avant et après
TrimStart les supprime avant
TrimEnd les supprime après

concernant le post précédent cela permet d'avoir toujours un nombre positif. De plus si la Textbox est pleine on ne peut pas y rajouter d'espaces donc nbespace = 0. Dans ce cas un If permet de ne pas faire l'ajout des espaces  

La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.

GRENIER Alain

Razordj · Answer

Le trimend marche pas...

Razordj · Answer

Finalement ça marche magiquement j'avais oublié de mettre DpadUp.Text = chn

Razordj · Answer

waaaaah magie.C'est parfait :)
Merci beacoup Galain

Déterminer combien de fois écrire un espace

13 réponses

Votre réponse

Discussions similaires