Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - Eliminare estensione da file text in FileListBox
Forum - Visual Basic 6 - Eliminare estensione da file text in FileListBox

Avatar
zan (Normal User)
Newbie


Messaggi: 8
Iscritto: 01/06/2009

Segnala al moderatore
Postato alle 11:04
Venerdì, 05/06/2009
Buongiorno
In un programma ho una FileListBox nella quale
viene caricata da disco e mostrata una lista di FileTesto.
Tutti i file vengono mostrati con la loro estensione nella list
per esempio Pippo.txt, Prova.txt, ecc.

Uso questa routine per visionarli:
Codice sorgente - presumibilmente VB.NET

  1. Private Sub File1_Click()
  2. LoadFile (File1.Path & "\" & File1.FileName)
  3. End Sub


sarebbe possibile, modificando i parametri di questa routine,
mostrali nella FileList SENZA estensione?
Quindi Pippo, Prova ecc.
L'estensione non dovrebbe essere eliminata anche sul disco, ma solo
mostrarli cosi nella FileListBox.
grazie
zan


PM Quote
Avatar
the_angel (Normal User)
Expert


Messaggi: 471
Iscritto: 02/04/2009

Segnala al moderatore
Postato alle 12:07
Venerdì, 05/06/2009
Testo quotato

Postato originariamente da zan:

Buongiorno
In un programma ho una FileListBox nella quale
viene caricata da disco e mostrata una lista di FileTesto.
Tutti i file vengono mostrati con la loro estensione nella list
per esempio Pippo.txt, Prova.txt, ecc.

Uso questa routine per visionarli:
Codice sorgente - presumibilmente VB.NET

  1. Private Sub File1_Click()
  2. LoadFile (File1.Path & "\" & File1.FileName)
  3. End Sub


sarebbe possibile, modificando i parametri di questa routine,
mostrali nella FileList SENZA estensione?
Quindi Pippo, Prova ecc.
L'estensione non dovrebbe essere eliminata anche sul disco, ma solo
mostrarli cosi nella FileListBox.
grazie
zan




se file1.filename ti restituisce una stringa,
creati una funzioncina se conta i caratteri fino al punto,
e poi con la funzione mid (mi pare che si usi questa in vb)
puoi prendere solo la prima parte della stringa,
cioè fino al punto...

oppure più semplice, alla funzione mid, come parametro della lunghezza del testo,
gli dai len(file1.filename)-4

la funzione len dovrebbe restituire la lunghezza della stringa...
non sono sicurissimo perchè non uso vb da anni,
ma credo che la strada sia percorribile!
ciau!

Ultima modifica effettuata da the_angel il 05/06/2009 alle 12:09
PM Quote
Avatar
GrG (Member)
Guru^2


Messaggi: 3430
Iscritto: 21/08/2007

Segnala al moderatore
Postato alle 14:43
Venerdì, 05/06/2009
allora... non so se esiste una proprietà specifica del filelistbox anche se credo di si...
comunque in caso non ci sia basta che usi un listbox e con un ciclo ci metti tutti gli elementi del filelistbox levandogli l'estenzione. Usa la funzione left()...

le estenzioni non sono sempre fisse, cioè possono essere .html o .js però in questo caso visto che dici che sono .txt l'estenzione è fissa a 3 cratteri (4 contando il punto)

PM Quote