espace

Question

salut 

j'ai un probleme 

lorsque en execute l'application il affiche le 2ieme  or dans une fichier text affiche le 1ere avec lors espace de 2 ieme ligne mais lors excution n'affiche pas lors espace , 

svb aide moi  

1)    ! REG.EXE VERSION 3.0


ligne   1      :      HKEY_LOCAL_MACHINE\SOFTWARE\Symantec\Norton AntiVirus
 ligne   2           version         REG_SZ       12.8.0.4

2)      ! REG.EXE VERSION 3.0


HKEY_LOCAL_MACHINE\SOFTWARE\Symantec\Norton AntiVirus
    versionREG_SZ12.8.0.4

Utilisateur anonyme · Answer

Salut,

J'y comprends rien. Explique mieux ton prblème.

__________
Kenji
( 
Nouveau forum VBA/Office

webanis · Answer

salut

merci pour votre reponse 

d'abord j'un fichier text  qui trouve en c:

lors continu de ces fichier est :

 ! REG.EXE VERSION 3.0
     HKEY_LOCAL_MACHINE\SOFTWARE\Symantec\Norton AntiVirus
      version         REG_SZ       12.8.0.4

Puis j'ai vais ouvrire le fichier par 

Open "C:\fichier.txt" For Input As #1

   Do Until EOF(1)
   Line Input #1, Texte

je met dans une varaible Texte 

puis  je met dans une texte1.text pour afficher , 
, Text1.Text = Texte: 
et puis je prend le line n° 5

i = i + 1   If i 5 Then Text1.Text Texte:  
   mais dans se cas , je  il affiche comment suive dans une label 
version REG|SZ |12.8.0.4

notre probleme est comment afficher le ligne 5 " version         REG_SZ       12.8.0.4 "     dans le fichier texte   avec lors espace
ou le 3 champs de se ligne par contre j'utlise le fonction mid et aussi split , right 
et aussi j'utilise une finction  Recherche
**************************si la fonction recherche ****
Public Function Recherche(Texte As String, Expression_debut As String, Expression_fin As String) As String
Dim Variable, Valeur
Valeur = Split(Text2.Text, Expression_debut)
Variable = Split(Valeur(1), Expression_fin)
Recherche = Variable(0)
End Function

pour afficher le label4 
Label4 = Recherche(Text2.Text, "     ", "    ")
et enfin merci pour votre interessant 

**************************************************
    enfin merci pour votre interissant

Utilisateur anonyme · Answer

Je pense que tu n'as pas "        " dans ton fichier texte mais des tabulations.
Donc, soit tu fais tes testes avec les tabulations (vbTab), soit tu remplace ces tabulations par des espaces.







__________
Kenji

( 


Nouveau forum VBA/Office

Espace

3 réponses

Votre réponse

Discussions similaires