Chr$ finder

0/5 (10 avis)

Vue 5 297 fois - Téléchargée 245 fois

Description

Ce petit (très petit) soft sert à trouver les numéros de code de charactères que vous ne connaissez pas... Il suffit de rentrer le charactère dans une TextBox, de cliquer sur le Bouton 'Go' et le numéro est trouvé...

Source / Exemple :


Private Sub Command1_Click()
    Dim i As Integer
    For i = 1 To 255
        Label1 = "Chr$(" & i & ") = " & Chr$(i)
        If Chr$(i) = Text1 Then
            MsgBox Label1, vbInformation, "Charactère Trouvé"
            Exit Sub
        End If
    Next i
    MsgBox "Aucune Correspondance trouvée pour '" & Text1 & "'.", vbInformation, "Charactère Introuvable"
End Sub

Conclusion :


Je vous avait prévenu... C'est vraiment un tout petit soft...

Codes Sources

A voir également

Ajouter un commentaire Commentaires
psykocrash Messages postés 240 Date d'inscription vendredi 14 juin 2002 Statut Membre Dernière intervention 17 mars 2009
7 sept. 2002 à 13:53
si t'a peur ke l'user mette + d'un caractère t'a ka faire soit une autre boucle pour chaque caractère soit Left(Text1.Text, 1)
Voila (juste pour l'info, si tu connais pas Asc(), vo mieu te ke Left(String, 1) prend le 1er caractère de String a partir de la gauche, et Right(String, 5) prend les 5 1ers caractères de String ms cette fois a partir de la droite)
@+
psykocrash Messages postés 240 Date d'inscription vendredi 14 juin 2002 Statut Membre Dernière intervention 17 mars 2009
7 sept. 2002 à 13:47
si t'a peur ke l'user mett
madcow41 Messages postés 54 Date d'inscription vendredi 12 avril 2002 Statut Membre Dernière intervention 11 mars 2008
7 sept. 2002 à 08:20
Je ne pense pas en effet qu'il y ait des caractères introuvables... Mais bon, j'essaye de gérer tt les cas possibles dans mes applications donc il est normal que cette commande apparaisse. En fait elle est utile si le Text1 n'a pas la propriété MaxLengh=1 Si ce n'est pas comme ça l'utilisateur peut rentrer 2 caractères par mégarde... Donc une chaine de caractères introuvables...
M'enfin bon, voilà
madcow41 Messages postés 54 Date d'inscription vendredi 12 avril 2002 Statut Membre Dernière intervention 11 mars 2008
7 sept. 2002 à 08:19
Je ne pense pas en effet qu'il y ait des caractères introuvables... Mais bon, j'essaye de gérer tt les cas possibles dans mes applications donc il est normal que cette commande apparaisse. En fait elle est utile si le Text1 n'a pas la propriété MaxLengh=1 Si ce n'est pas comme ça l'utilisateur peut rentrer 2 caractères par mégarde... Donc une chaine de caractères introuvables...
M'enfin bon, voilà
erreurs404 Messages postés 117 Date d'inscription lundi 23 octobre 2000 Statut Membre Dernière intervention 12 août 2009
2 sept. 2002 à 10:35
BobBigBoss > introuvables ??? tu veux pas plutôt dire non imprimables ?
Afficher les 10 commentaires

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.