Once selected, enter Quick Mask mode, then Ctrl-click on the button base layer to load the transparency selection for it. Use the arrow keys to move the selection about 1/4 -> 1/3 the way down. Then fill with black (Edit->Fill or Alt-Backspace).