Forum Graph100

Forum Graph100

Vous n'êtes pas identifié.

Annonce

Bonjour et bienvenue sur le nouveau Forum Graph100 !
L'intégralité des données a été transférée sur un forum PunBB et tout les comptes sont fonctionnels avec le même nom d'utilisateur et mot de passe.
Un wiki est aussi disponible avec le même compte ! N'oubliez pas de remettre votre avatar, bon surf !
Pour plus d'informations, consultez ce post.

#1 06 Jun 2002 09:41:19

Azor
Le Coté Obscur De La G100
Lieu: glop glop!
Date d'inscription: 04 May 2002
Messages: 5479
Site web

Help pour Visual Basic 6 !

Voila je voudrais savoir comment on fait pour modifier un text lettre par lettre .

Répondez moi please !


Anciennement X-thunder28
Cats shall rule teh world!

Hors ligne

 

#2 06 Jun 2002 10:02:58

RonanKer
Membre Communauté Graph100
Lieu: France (44-49)
Date d'inscription: 26 Feb 2002
Messages: 379
Site web

Re: Help pour Visual Basic 6 !

si c'est un fichier texte alors tu peux l'ouvrir en mode binaire et le modifier en valeurs ASCII directement en choisissant l'octet que tu veux modifier dans le fichier... (normalement ya des exemples dans l'aide de VB...)


**********************
[URL=http://ronan.kerdudou.free.fr]site perso http://ronan.kerdudou.free.fr[/URL]
http://www.all.lyrics.for.free.fr
[URL=http://www.motostar44.fr]motos nantes : http://www.motostar44.fr[/URL]

Hors ligne

 

#3 06 Jun 2002 15:50:20

KTr
Haut fonctionnaire graph100.com
Lieu: Saint Etienne
Date d'inscription: 19 Mar 2002
Messages: 1909
Site web

Re: Help pour Visual Basic 6 !

Sinon tu dois avoir une fonction 'MID', cherche !


(¯`·.¸¸.·´¯`·.¸¸.-> www.ktr.fr.fm  ktr@fr.fm <-.¸¸.·´¯`·.¸¸.·´¯)

Hors ligne

 

#4 07 Jun 2002 03:11:33

Azor
Le Coté Obscur De La G100
Lieu: glop glop!
Date d'inscription: 04 May 2002
Messages: 5479
Site web

Re: Help pour Visual Basic 6 !

le prob c que j po d'aid mais j un bouk ki explik.

Merci !


Anciennement X-thunder28
Cats shall rule teh world!

Hors ligne

 

#5 11 Jun 2002 15:35:14

Guest
Invité

Re: Help pour Visual Basic 6 !

Ce code remplace tous les "e" d'une chaine par "E"

Code:

dim i as integer
dim machaine as string

machaine="abcdefg"
for i=1 to len(machaine)
if mid(machaine,i,1) = "e" then mid(machaine,i,1) = "E"
next

 

#6 17 Jun 2002 08:56:48

Azor
Le Coté Obscur De La G100
Lieu: glop glop!
Date d'inscription: 04 May 2002
Messages: 5479
Site web

Re: Help pour Visual Basic 6 !

Merci,merci !

Mais g un otre problm : comment fait on pour écrire des octets dans des fichiers ?

Jdis ça parce que apparament le caracter des code '0' indique la fin du fichier,et ça m' embete :cry:

répondez svp !


Anciennement X-thunder28
Cats shall rule teh world!

Hors ligne

 

#7 18 Jun 2002 11:57:01

Guest
Invité

Re: Help pour Visual Basic 6 !

Non non, c'est juste que la fin des textboxs est un caractère 0, mais on peut ouvrir un EXE, dedans y'a plein de chr(0)...

Pour écrire :

Code:

Open "c:test.txt" for binary as #1
dim texte as string
texte="Voilà ce que je veux écrire"
put #1 , , texte
close #1

Encore mieux :
WWW.VBFRANCE.COM

 

Pied de page des forums

Propulsé par PunBB
© Copyright 2002–2005 Rickard Andersson
Traduction par punbb.fr