Soyez le premier à donner votre avis sur cette source.
Snippet vu 7 459 fois - Téléchargée 36 fois
Dim strTexte strTexte = MSFlexGrid1.Text If KeyAscii = 8 Then 'Touche d'effacement If Len(strTexte) > 0 Then MSFlexGrid1.Text = Left(strTexte, Len(strTexte) - 1) ElseIf KeyAscii <> 13 Then MSFlexGrid1.Text = strTexte & Chr(KeyAscii) End If
2 sept. 2004 à 15:19
Mais
- ce n'est pas un programme que tu mets là, juste quelques lignes de code;
- de plus, tu n'expliques pas où doivent être mises ces lignes (ce n'est pas n'importe où qu'il faut taper cela) ;
- tu évoques la possibilité d'utiliser un textbox, mais en aucune manière tu expliques la manière de le faire (surtout pour le positionner);
- et enfin, cette source existe déjà sur le site et, hélas pour toi, de manière plus complète. Ce serait quand même de vérifier qu'on ne met pas un Xème exemplaire d'une source avant de poster (mais cela vaut pour d'autres également).
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.