Question

如何把VB中的shape控件放在按钮之上，做按钮按下时的指示灯用。

Answer 1

shape是无句柄的弱控件，不能放在按钮上。但你何不利用按钮本身的功能用图片来做指示灯呢？绝对比用shape做的好看，而且更简单方便：

在属性窗口把按钮（比如Command1）的Style属性设为1（这点是关键）
然后在Picture属性和DownPicture属性中分别放入一张适当的图片，前者是按钮未点击时的背景图片，后者是点击时按钮的背景图片，你只要选择两张大小适中的图片（BMP、GIF或JPG格式的）分别表示灯亮和灯灭即可。 连一句代码都不用，简单吧？

Answer 2

Shape不能直接放在按钮上 要放在Picture里才能在顶层显示 把Picture放在顶层就可以了
然后

Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Shape1.BorderColor = &HFF&
End Sub
Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Shape1.BorderColor = &H0&
End Sub