在VB.NET WinForms中以编程方式添加线型

如何在VB.NET WinForms中以编程方式添加

线型

我想写一些类似于您为

标签

、

复选框

或其他任何东西编写的东西：

Dim somelabel as New Label
somelabel.Text = "Whatever"
somelabel.Location = New Point(200, 200)
Me.Controls.Add(somelabel)

等等

我的目的是在构成4x4网格的16个标签的行和列之间创建细分隔线

---

我理解，由于

LineShape

是VB PowerPacks的一部分，这可能会带来一些困难，例如必须使用

Imports…

，或者，如果确实需要，导入

.dll

。但我想看看你所有的想法/解决方案

首先，导入powerpacks命名空间以允许您访问控件：

Imports Microsoft.VisualBasic.PowerPacks

然后你可以这样做：

Dim startx As Integer
Dim starty As Integer
Dim endx As Integer
Dim endy As Integer
Dim yourline As New LineShape(startx, starty, endx, endy)

其中，startx=x起始位置，starty=y起始位置，endx=结束x位置，endy=结束y位置。 如果要将其放入画布中，只需执行以下操作：

Dim yourcanvas As ShapeContainer
canvas.Parent = formName
yourline.Parent = canvas

有关更多信息和API参考，请访问：

---

您使用的是哪个版本的.net？控件总是以编程方式添加的。如果你想知道设计师是如何做的，那么你就知道自己是如何做的，然后看看它生成的代码。单击“解决方案资源管理器”窗口中的“显示所有文件”工具栏按钮，打开表单的Designer.vb文件。我提供的链接中有关于旧版本的更多信息