by 360fliper (3 Submissions)
Category: Sound/MP3
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sun 3rd February 2002
Date Added: Mon 8th February 2021
Rating: (1 Votes)
A very easy CD Player for beginners.
lblTrackNum.Caption = mmcCD.Track
End Sub
Private Sub Form_Unload(Cancel As Integer)
mmcCD.Command = "Close"
End Sub
Private Sub Form_Load()
'Open the CD
mmcCD.Command = "Open"
End Sub