Una possibile soluzione per questo codice?

di Aury68 il
4 risposte
Pochi posts
Iscritto da
ago, 2022
Messaggi
5
Salve, sto usando questo codice per avere un elenco di file su una combobox da una directory.
Dim MioFile As String
ChDrive("C")
ChDir("\Visual Studio Progetti\ListaServer\")
MioFile = Dir("*.txt")
Do Until MioFile = ""
ComboBox1.Items.Add(MioFile)
MioFile = Dir()
Loop
c'è un comando che riporti solo il nome dei file senza estensione (.txt) nella combobox?

Grazie in anticipo.

4 Risposte

  • Super Famoso
    Iscritto da
    nov, 2011
    Messaggi
    21917
    Puoi usare la funzione Left per prendere solo la prima parte di MioFile esclusi gli ultimi 4 caratteri.

    Non mi soffermi sul fatto che questo è vecchio codice vba/vb6 e che in vbnet si scrive in maniera completamente diversa.

    P.S. quando posti codice nel forum usa i tag code, vedi regolamento
  • Pochi posts
    Iscritto da
    ago, 2022
    Messaggi
    5
    Ti ringrazio, ma non sono riuscito ad inserire la funzione left nel codice.
  • Super Famoso
    Iscritto da
    nov, 2011
    Messaggi
    21917
    Come hai fatto? Sai come funziona la Left? E la Len?
Devi accedere o registrarti per scrivere nel forum
4 risposte