VB中控件数组在VB.NET中用法,请给一个例子
我是VB.NET完全的新手,请帮我把下面由VB6.0实现的功能改成.NET代码:我有10个Button,名字是Rd(0)到Rd(9);20个Combo,名字是Fs(0)到...
我是VB.NET完全的新手,请帮我把下面由VB6.0实现的功能改成.NET代码:
我有10个Button,名字是Rd(0)到Rd(9);20个Combo,名字是Fs(0)到Fs(19)
Private Sub Rd_Click(Index As Integer)
Fs(Index).ListIndex = Fix(Fs(Index).ListCount * Rnd)
Fs(Index + 10).ListIndex = Fix(Fs(Index + 10).ListCount * Rnd)
End Sub
按下索引为Index的按钮,作用是使索引为Index和Index+10的组合框在下拉列表中随机选择项。现在我想在.NET中实现相同的功能,上面30个控件的名称该怎样设置,用一个过程实现该功能的代码该怎样写?
如果我再加一个按钮RdFs,代码为:
Private Sub RdFs_Click()
Dim i As Integer
For i = 0 To 9
Call Rd_Click(i)
Next
End Sub
.NET中能否也用循环语句实现这个功能,代码又该如何写?谢谢,如果能够得到哪位高人的详尽解答,以后.NET学习中碰到别的问题也会请阁下来代为释疑的。
我就是知道.NET没有控件数组才提这个问题的。我的问题主要是,我原来的VB程序中不仅有按钮数组,很多标签、文本框、组合框等控件也用的数组,并且我的大部分操作是比如一个数组数组中的一个按钮操作一个文本框数组中的文本框之类的,我想通过这个典型例子来学习用法。最后,我完全是新手,希望通过具体代码来学习……谢谢费心了 展开
我有10个Button,名字是Rd(0)到Rd(9);20个Combo,名字是Fs(0)到Fs(19)
Private Sub Rd_Click(Index As Integer)
Fs(Index).ListIndex = Fix(Fs(Index).ListCount * Rnd)
Fs(Index + 10).ListIndex = Fix(Fs(Index + 10).ListCount * Rnd)
End Sub
按下索引为Index的按钮,作用是使索引为Index和Index+10的组合框在下拉列表中随机选择项。现在我想在.NET中实现相同的功能,上面30个控件的名称该怎样设置,用一个过程实现该功能的代码该怎样写?
如果我再加一个按钮RdFs,代码为:
Private Sub RdFs_Click()
Dim i As Integer
For i = 0 To 9
Call Rd_Click(i)
Next
End Sub
.NET中能否也用循环语句实现这个功能,代码又该如何写?谢谢,如果能够得到哪位高人的详尽解答,以后.NET学习中碰到别的问题也会请阁下来代为释疑的。
我就是知道.NET没有控件数组才提这个问题的。我的问题主要是,我原来的VB程序中不仅有按钮数组,很多标签、文本框、组合框等控件也用的数组,并且我的大部分操作是比如一个数组数组中的一个按钮操作一个文本框数组中的文本框之类的,我想通过这个典型例子来学习用法。最后,我完全是新手,希望通过具体代码来学习……谢谢费心了 展开
展开全部
VB.net中没有控件数组的说法。
替代方法:
·创建一个控件的类型数组: Button[],将所有的button控件创建好后存进去,可以遍历它;
·或将所有要遍历的控件放在一个容器如Panel中,以后遍历这个容器的子控件即可。
----------
你的情况,推荐放在容器中。比如下面就是一个遍历容器的控件,然后找出所有的文本框并修改内容的程序:
//pn 是个 Panel 控件
foreach (Control item in pn.Controls)
{
if (typeof(TextBox) == item.GetType())
{
((TextBox)item).Text = "我是动态修改的!";
}
}
替代方法:
·创建一个控件的类型数组: Button[],将所有的button控件创建好后存进去,可以遍历它;
·或将所有要遍历的控件放在一个容器如Panel中,以后遍历这个容器的子控件即可。
----------
你的情况,推荐放在容器中。比如下面就是一个遍历容器的控件,然后找出所有的文本框并修改内容的程序:
//pn 是个 Panel 控件
foreach (Control item in pn.Controls)
{
if (typeof(TextBox) == item.GetType())
{
((TextBox)item).Text = "我是动态修改的!";
}
}
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询