VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



When a button that says Click here if you want a drink holder. is clicked, the cd drive opens. Em

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

Rate When a button that says Click here if you want a drink holder. is clicked, the cd drive opens. Em



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


Download this snippet    Add to My Saved Code

When a button that says Click here if you want a drink holder. is clicked, the cd drive opens. Em Comments

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.

Post your comment

Subject:
Message:
0/1000 characters