vb.net直接获取文本框控件名排序后对窗体文本框赋值的多种办法
时间: 2023-07-31 12:13:22 浏览: 141
1. 使用 Linq 查询控件集合,并对其按名称排序,然后循环遍历控件集合,对文本框控件赋值。
```
Dim textBoxes = Me.Controls.OfType(Of TextBox)().OrderBy(Function(tb) tb.Name)
For Each tb In textBoxes
tb.Text = "Hello"
Next
```
2. 使用 For 循环遍历窗体中的所有控件,并判断控件类型是否为文本框,如果是,则对其赋值。
```
For Each control In Me.Controls
If TypeOf control Is TextBox Then
DirectCast(control, TextBox).Text = "Hello"
End If
Next
```
3. 使用控件容器的 Controls 属性获取所有子控件,并对其按名称排序,然后循环遍历子控件集合,对文本框控件赋值。
```
Dim textBoxes = Me.Panel1.Controls.OfType(Of TextBox)().OrderBy(Function(tb) tb.Name)
For Each tb In textBoxes
tb.Text = "Hello"
Next
```
其中,Panel1 为控件容器的名称,可以根据实际情况进行修改。
相关问题
vb.net Control 类循环向窗体文本框控件名赋值
可以使用 `For Each` 循环遍历窗体上的控件,并判断其类型是否为文本框控件,然后进行赋值操作。代码示例如下:
```vb
For Each ctl As Control In Me.Controls
If TypeOf ctl Is TextBox Then
ctl.Text = "赋值内容"
End If
Next
```
其中 `Me.Controls` 表示当前窗体上的所有控件集合,`TypeOf` 判断控件是否为指定类型,`TextBox` 表示文本框控件类型。你可以将 `"赋值内容"` 替换为需要赋的值。
vb.net Control 类循环向窗体文本框控件赋值
你可以使用以下代码循环向窗体中的文本框控件赋值:
```vb.net
For Each ctl As Control In Me.Controls
If TypeOf ctl Is TextBox Then
ctl.Text = "赋值内容"
End If
Next
```
这段代码会循环遍历窗体中的所有控件,如果该控件是文本框控件,则将其文本属性设置为指定的赋值内容。你也可以根据需要修改赋值的内容和控件类型。
阅读全文