Inseriamo prima di tutto il controllo “common dialog”, andiamo in project–>components–>selezioniamo “Microsoft Common Dialog Control 6.0” e aggiungiamolo!dopodichè piazziamo il seguente codice nel command che ci interessa.

CommonDialog1.Filter = “Text files|*.txt” ‘ aggiunto per far vedere la possibiltà di filtrare per esempio solo file con estensione .txt
CommonDialog1.ShowOpen
NomeDelTesto = CommonDialog1.FileName
Open NomeDelTesto For Input As #1
Text1.Text = Input(LOF(1), #1)
Close #1
Form1.Caption = NomeDelTesto
Text1.SelStart = Len(Text1.Text)

If you enjoyed this post, make sure you subscribe to my RSS feed!
Share

Comments

  1. 1
    dario // March 28th, 2010 at 14:54

    ho un vecchio file vpb che non riesco ad aprire

  2. 2
    cirio // March 28th, 2010 at 15:24

    @dario: Che errore ti da? Hai installato sulla macchina visual basic sp6?

Lascia un commento

You must be logged in to post a comment.