Question

VB中shape控件的属性有哪些

我想单击控件shape控件，那么他的什么属性改变？？

Answer 1

shape控件没有鼠标点击事件，不过你可以将shape控件放入Picturebox容器中，给你个简单例子，在Shape控件上单击，shape立即变成红色：

Private Sub Form_Load()
Picture1.Move Shape1.Left, Shape1.Top, Shape1.Width, Shape1.Height
Picture1.BorderStyle = 0
Shape1.Move 0, 0
End Sub

Private Sub Picture1_Click()
Shape1.BackColor = vbRed
Shape1.BackStyle = 1
End Sub