我可以在对象中存储变量吗？

Question

假设我有一个表单应用程序，并在其中绘制一个圆圈。我可以在该圆形对象中存储变量吗？像这样的东西？

Dim circle1.testVar As Integer = 1

这会有效吗？如果不这样做，还有办法吗？

Answer 1

不，您无法动态地向Control添加属性。你可以使用控件的现有Tag属性：

circle1.Tag = 1

不幸的是，Tag的类型为Object，因此您必须检查Nothing和/或在检索时转换该值。