like add to each button that opens default webborswer but also adds to media player
Private Sub Command19_Click()
Dim a As String
a = “https://www.youtube.com/v/B9FzVhw8_bY&list”
Call Shell(“explorer.exe ” & a)
End Sub
those all work perfect for each button