Manualandia
a- a+

DirListBox, DriveListBox, FileListBox

Vediamo adesso i controlli avanzati di Visual Basic, cioè quelli che permettono qualsiasi operazione. Questi controlli presenti nella versione Professional o Enterprise di Visual Basic 6, permettono di accedere a molte delle interfacce standard di Windows tramite le quali si possono aprire file, visualizzare immagini ed eseguire molte altre operazioni. 

DirListBox

Questo controllo consente di visualizzare nell'applicazione il contenuto ed il percorso di file contenuti in cartelle (directory) in base alla loro struttura gerarchica. Anche questo controllo ha molte proprietà (tra le principali ricordiamo: path, list, listCount, listIndex) per le quali vi invitiamo a condurre esperimenti, e che possono essere impostate da codice, mediante la sintassi generale oggetto.nomeproprietà , dove oggetto è il nome del controllo.

Ecco un esempio di codice che mostra il contenuto di una directory:

 

Sub ShowPath( )

            LblDrive.Caption = "Il percorso corrente è " + dirList.Path

End Sub

Private Sub DirList_Change( )

            ShowPath

End Sub

Private Sub drvDrive_Change( )

            DrvDrive = drvDrive.List(drvDrive.ListIndex)

            DirList.Path = drvDrive.Drive

            ShowPath

End Sub

Private Sub Form_Load( )

            ShowPath

End Sub

 

In questo codice, la procedura ShowPath( ) visualizza, trasferendone il valore alla proprietà Caption del controllo Etichetta, il percorso attivo.

 

DriveListBox

Il controllo Drive List Box (Casella di Riepilogo) permette all'utente, in fase di esecuzione del programma, di selezionare un disco. (viene utilizzato per esempio per visualizzare tutte le unità disco del sistema). Le proprietà possono essere impostate dalla finestra di dialogo apposita oppure da codice mediante l'istruzione generica: oggetto.nomeproprietà , dove oggetto è il nome del controllo.

Viene riportato un esempio di codice per l'implementazione di questo controllo:

 

Sub ShowDrive( )

            LblDrive.Caption = "Il disco corrente è " + drvDrive.Drive

End Sub

Private Sub drvDrive_Change( )

            ShowDrive

End Sub

Private Sub Form_Load( )

ShowDrive

End Sub

 

FileListBox

Permette di visualizzare, in fase di esecuzione, l'elenco dei file di un determinato percorso di memorizzazione. Le proprietà possono essere impostate sia dalla apposita finestra, sia da codice, mediante la sintassi generica: oggetto.nomeproprietà , dove oggetto è il nome assegnato al controllo.

Esempio di codice:

 

Sub ShowPath(BackSlash As String)

            LblDrive.Caption = "Il file corrente è " + dirList.List(dirList.ListIndex) + BackSlash + filList.Filename

End Sub

Private Sub dirList_Change( )

            FilList.Filename = dirList.Path

            ShowPath " "

End Sub

Private Sub drvDrive_Change( )

DrvDrive.Drive = drvDrive.List(drvDrive.ListIndex)

DirList.Path = drvDrive.Drive

ShowPath " "

End Sub

Private Sub filList_Click( )

            ShowPath ""

End Sub

Private Sub Form_Load( )

            ShowPath " "

End Sub

 

 



Ti potrebbe interessare anche

commenta la notizia

C'è 1 commento
Sara
Hai dubbi su questo articolo?