by Mike U. (5 Submissions)
Category: Games
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sat 24th February 2001
Date Added: Mon 8th February 2021
Rating: (1 Votes)
When a button that says "Click here if you want a drink holder." is clicked, the cd drive opens. Email the program to people and see how many
API Declarations
(ByVal lpstrCommand As String, ByVal lpstrReturnString As String, _
ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
Dim L As Long
Dim S As Long
'To open the CD door, use this code.
L = mciSendString("set CDAudio door open", S, 127, 0)
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Dim L As Long
Dim S As Long
'To close the CD door, use this code.
L = mciSendString("set CDAudio door closed", S, 127, 0)
Timer1.Enabled = False
End Sub
No comments have been posted about When a button that says Click here if you want a drink holder. is clicked, the cd drive opens. Em. Why not be the first to post a comment about When a button that says Click here if you want a drink holder. is clicked, the cd drive opens. Em.