Bonjour à tous,

J'ai une erreur je n'arrive pas à appelé ma fonction, voici ma classe :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Public Class ClsFolderBrowserDialog
	Inherits Archives	
 
	Public Sub FolderBrowserDialogFunc() 
 
			Dim FDB As New FolderBrowserDialog()
 
			If FDB.ShowDialog() = System.Windows.Forms.DialogResult.OK Then
 
				listbox1.Items.Clear()
				Dim files As String() = Directory.GetFiles(FDB.SelectedPath)
				Dim dirs As String() = Directory.GetDirectories(FDB.SelectedPath)
 
				For Each file As String In files
					listbox1.Items.Add(Path.GetFileName(file))
				Next
				For Each dir As String In dirs
					listbox1.Items.Add(Path.GetFileName(dir))
				Next
			End If
	End Sub
	End Class
J'appelle ma fonction autre part :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Call Archives.ClsFolderBrowserDialog.FolderBrowserDialogFunc 'Appel de la fonction
Quelqu’un peut il m'aider ?
Merci.