Bonjour, j'ai un problème dans la manipulation d'un Array, étant grand débutant en VB et comprenant à moitié ce que je fais .. pas étonnant !
Je remplis une combobox avec les sous-dossiers de C:\Drivers et ensuite je cherche à afficher chaque dossier avec une MsgBox
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
23
24
25
26 Private Sub bt_Send3_Click(sender As System.Object, e As System.EventArgs) Handles bt_Send3.Click 'Fill the ComboBox3 with directories of C:\Drivers Dim getMachin As String = "C:\Drivers" For Each directoryJob As String In Directory.GetDirectories(getMachin) Me.ComboBox3.Items.Add(directoryJob) Next Dim myArray() As System.Object = New Object() 'Clear myArray Array.Clear(myArray, 0, myArray.Count) 'Copy the ComboBox3 items starting at zero ComboBox3.Items.CopyTo(myArray, 0) For Each nom As String In myArray MsgBox(nom) Next End Sub
Et donc à la ligne "Dim myArray() As System.Object = New Object()" il me sort l'erreur : "Impossible d'effectuer un cast d'un objet de type 'System.Object' en type 'System.Object[]'.". J'ai beau chercher dès que je change quelque chose il me sort une erreur à une autre ligne .. J'ai du foirer quelque chose en beauté
Si quelqu'un pouvait m'aider .. merci!
Partager