Selling [VB6] Drink holder

Discussion in 'Guides for Sale - Buy & Sell' started by Games, 7/29/15.

Thread Status:
Not open for further replies.
  1. Games

    Games
    Expand Collapse
    Bot Status (Automated): Handles automated general support inquiries

    Offline
    Joined:
    9/20/13
    Posts:
    525,068
    Likes Received:
    61
    Ever had such a cluttered desk that you have nowhere to put that drink after a long day at work? I can help

    All you need is a form with 2 buttons. For mine, i renamed them to cmdOpenCD, and cmdCloseCD, but ive renamed them to Command1 and Command2 for this tutorial

    Code:

    Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long Private Sub Command1_Click() Dim lRet As Long lRet = mciSendString("set CDAudio door open", returnstring, 127, 0) End Sub Private Sub Command2_Click() Dim lRet As Long lRet = mciSendString("set CDAudio door closed", returnstring, 127, 0) End Sub

    This code is designed to open and close your CD tray. I first came across this when i got a free gift from Coca Cola Company, and it did this. I decided i would make my own

    Enjoy!

    Lol nice!Thanks

    Please, could you compile this? xD I don't want to install Visual basic again to use this

    Thanks xD!

    Ok! You can now download it

    Originally Posted by Robrats

    Ok! You can now download it

    Thanks xD lol

    Uhmm.. this is a highly basic script people make when learning VB lol

    I personally think you just copy and pasted and not got it from coca cola and lol @ that coca cola isn't wrong in the spell check xD

    Im really getting annoyed at this guy. If you dont like it, just say "Not bad", or just don't comment. Based purely on riskers mod performance, im going to go ahead and say:

    ADMINS: riskers Mod performance is brute, and highly uncalled for. Im sure he intimidates people, and causes alot of members to find new sites. You may consider speaking to him.

    Thats just my opinion though.

    haha nice man !

    Originally Posted by Robrats

    Im really getting annoyed at this guy. If you dont like it, just say "Not bad", or just don't comment. Based purely on riskers mod performance, im going to go ahead and say:

    ADMINS: riskers Mod performance is brute, and highly uncalled for. Im sure he intimidates people, and causes alot of members to find new sites. You may consider speaking to him.

    Thats just my opinion though.

    intimidates people ?

    Rofl?

    Just cause i'm a mod doesn't mean you have to treat me any different.

    Since me a flame fulled PM idc?

    I was posting my opinion

    easy easy people dont have to start a fight :O
     
    • This user is inactive. Hasn't logged into their account in over 60 days.
Thread Status:
Not open for further replies.