Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionPrivate Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load For Each a In My.Computer.FileSystem.GetFiles("c:") TestToolStripMenuItem.DropDownItems.Add(Mid(a, InStrRev(a, "") + 1)). Next() End Sub