Remake of my MP3 Player using Windows Media Player

[akhileshbc]

Here's an example for avoiding the label in your code:

Option Explicit
 
Private Sub Command1_Click()
    Dim myMsgResult As VbMsgBoxResult
    
    Do
        myMsgResult = MsgBox("Do you want to continue reading my post ?", vbQuestion + vbYesNo, "Do you wanna risk yourself ?")
        If myMsgResult = vbYes Then
            'do some blah..blah here...
        Else
            Exit Do     '~~~ This will exit the loop
        End If
    Loop
End Sub

Also, try indenting your code next time, which makes it easy for reading.
Good luck