vb.net 中 创建一个label数组

DHC_ArThur 2008-10-08 05:13:33
我在.net中想创建一个label数组
我想问下怎么杨动态创建一个数组
。。
急。。
还有怎么样计算一个label数组的大小。
我现在已经创建了一个名字叫lab_0的label了
现在想创建一个以lab_0开头的数组可以么?
或者直接创建一个
...全文
222 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
ZengHD 2008-10-08
  • 打赏
  • 举报
回复
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim lbl() As Label
ReDim lbl(10)
Dim i As Int16
For i = 0 To lbl.Length - 1
lbl(i) = New Label
With lbl(i)
.Name = "lbl_" & i.ToString
.Text = "lbl_" & i.ToString
.Tag = i '很有用
End With
Next

Me.Controls.AddRange(lbl)
End Sub
blues_zhao_yang 2008-10-08
  • 打赏
  • 举报
回复
试试这段代码你就明白了


Public Class Form1
Dim MyLable() As Label

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ReDim MyLable(TextBox1.Text)
For i = 0 To Val(TextBox1.Text) - 1
MyLable(i) = New Label
Controls.Add(MyLable(i))
MyLable(i).Text = i
MyLable(i).Location = New Point(0, i * 30)
Next
MsgBox(MyLable.Length - 1)
End Sub
End Class

16,717

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧