• 全部
  • VBS
  • .NET技术
  • VBA
  • VB网络编程
  • VB多媒体
  • VB数据库
  • VB控件
  • VB COM/DCOM
  • VB基础类
  • VB API
  • 问答

请教几个VB.net小问题,谢谢

huhaodn 2005-03-14 09:34:11
C#中的struct关键字在vb.net中是什么?如何将一组Button控件申明成数组?
...全文
84 点赞 收藏 9
写回复
9 条回复
切换为时间正序
当前发帖距今超过3年，不再开放新的回复
发表回复
hidejay 2005-03-14
Dim but As Button
Dim butArray(10) As Button
Dim i As Integer
For i = 0 To 9
butArray(i) = New Button
butArray(i).Name = i.ToString()
butArray(i).Top = i * 10
butArray(i).Visible = True
Me.Controls.Add(butArray(i))
Next
类似过去的控件数组，可以的
 回复 赞
huhaodn 2005-03-14
谢谢,我试试先
 回复 赞
WTaoboy 2005-03-14
Dim but As Button
Dim butArray(10) As Button
Dim i As Integer
For i = 0 To 9
butArray(i) = New Button
butArray(i).Name = i.ToString()
butArray(i).Top = i * 10
butArray(i).Visible = True
Me.Controls.Add(butArray(i))
Next
 回复 赞
hamadou 2005-03-14
Dim a As New Button()
a.Name = "b1"
Dim a1 As New Button()
a1.Name = "b2"
Dim b() As Button = {a, a1}
Dim i As Integer
For i = 0 To b.GetUpperBound(0)
MessageBox.Show(CType(b(i), Button).Visible.ToString)
Next
 回复 赞
huhaodn 2005-03-14
循环Visible属性
 回复 赞
hamadou 2005-03-14
Dim a As New Button()
a.Name = "b1"
Dim a1 As New Button()
a1.Name = "b2"
Dim b() As Button = {a, a1}
Dim i As Integer
For i = 0 To b.GetUpperBound(0)
MessageBox.Show(b(i).Name())
Next
是可以的啊，不知道你想使用数组的什么属性？？？
 回复 赞
huhaodn 2005-03-14
非常感谢楼上的,这种数组方式我昨天试过,但是在循环这个数组属性时,编译通不过,说是末将增加到引用
 回复 赞
hamadou 2005-03-14
1.
structure
2.
Dim a As New Button()
a.Name = "b1"
Dim a1 As New Button()
a1.Name = "b2"
Dim b() As Button = {a, a1}
 回复 赞
huhaodn 2005-03-14
楼上的,你这是循环创建控件,我控件是已存的
 回复 赞
发帖
VB
创建于2007-09-28

1.6w+

社区成员

11.0w+

社区内容

VB技术相关讨论，主要为经典vb，即VB6.0
申请成为版主
帖子事件
创建了帖子
2005-03-14 09:34
社区公告
暂无公告