Pb avec Asc en Visual Basic

Fermé

charly - 15 juil. 2009 à 16:25
tech_57 - 15 juil. 2009 à 22:04

salut
je rencontre un pb lors de l'execution de ma macro avec la fonction asc de VB
cette partie de mon programme vise a echanger un caractere se situant dans une chaine par son suivant dans l'alphabet .
dans le code :
CONTENU : NOM DE LA CHAINE DE CARATERE
POSITION : POSITION DU CARACTERE QUE L'ON VEUT CHANGER

Dim lettre As String
Dim lettreBIS As String
Dim code As Integer

lettre = Mid(contenu, position, 1)
code = Asc(lettre)
lettreBIS = Chr(code + 1)
Mid(contenu, position) = lettreBIS

je n'arrive pas a trouver ou est l'erreur et pkoi il ne prend pas la fonction asc
svp si quelqu'un peut m'aider a resoudre ce beug!!!!

merci d'avance

A voir également:

Pb avec Asc en Visual Basic
Visual basic download - Télécharger - Langages
Microsoft 365 basic - Guide
Microsoft visual c++ runtime - Guide
Visual petanque - Télécharger - Sport
Visual paradigm - Télécharger - Gestion de données

1 réponse

Réponse 1 / 1

tech_57
15 juil. 2009 à 22:04

Bonsoir,

J'ai testé ton code et ça fonctionne. Verifie dans ton prog que contenu et position ont bien les bonnes valeurs au moment du traitement.

Sub test()
Dim lettre As String
Dim lettreBIS As String
Dim code As Integer

Dim contenu As String
Dim position As Integer
contenu = "ABCDEFGHIJ"
position = 3 'modifier la lettre C en D

lettre = Mid(contenu, position, 1)
code = Asc(lettre)
lettreBIS = Chr(code + 1)
Mid(contenu, position) = lettreBIS

MsgBox contenu '-> ABDDEFGHIJ ok
End Sub

Discussions similaires

Site de confiance ou non ?

CPU tourne à 100% avec Visual Basic Command Line Compiler

Microsoft Visual C++ ? C'est quoi ?

Faut-il conserver toutes les versions de Visual C++ ?

Discussions similaires

Newsletters