yo hago la barra de la siguiente manera:

coloco un PictureBox y dentro de el coloco 3 botones con los botones en falso en un Timer con intervalo de 100
escribo los siguientes codigos

Private Sub Timer1_Timer()
Cd1.Left = Cd1.Left + 120
Cd2.Left = Cd2.Left + 120
Cd3.Left = Cd3.Left + 120
If Cd1.Left = 2400 Then
    Cd1.Left = 0
    Cd2.Left = 120
    Cd3.Left = 240
End If
End Sub

cd1,cd2,c3, son los botones

como hacer un que al pulzar un boton formate el disco de la unidad a

como hacer que al pulzar un boton copie una carpeta y la pege en el mismo sitio pero con otro nombre