Hide/show command button - Programmers Heaven

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories

Hide/show command button

I was wandering how to make a comand button hidden unless two buttons such as ctrl + L is pressed and how to make the form auto-resize to fit the new command button?


Comments

  • To do this, you'd set the Visible property of the Command button to False

    at design time. Next, put the following procedure in the Form_KeyDown event

    of the Form containing the Command Button:


    'Check for Ctrl+L

    If KeyCode = vbKeyL And (Shift And vbCtrlMask > 0) Then


    'Move the top of the button to the bottom of the Form

    Command1.Top = Height


    'Add the height of the button to the height of the Form - plus some

    'extra to make it look OK

    Height = Height + Command1.Height + 800


    'Show the button

    Command1.Visible = True


    'Make sure the Form repaints

    Refresh


    End If


    Depending on what other controls are on your Form, you may have to set the

    KeyPreview Property of the Form to True to make sure the Form knows that

    you've pressed Ctrl+L. You can use the Top and Left Propeties - or the

    Move Method - to adjust the position of the Command button before you make

    it visible.


    For more information about the VB Constants (vbKeyL and vbCtrlMask) see the

    KeyDown Event topic in VB Help. If you have a version of VB that doesn't

    support those specific Constants:


    vbKeyL= 76

    vbCtrlMask = 2




    John




Sign In or Register to comment.