vb.net用逗号分隔的字符串利用循环和获取控件名赋值到窗体的几个文本框中
时间: 2024-01-22 19:20:38 浏览: 22
假设你有一个用逗号分隔的字符串,每个逗号后面跟着一个控件的名称,如下所示:
"TextBox1,Label1,TextBox2,Label2,TextBox3,Label3"
下面是一个示例代码,它将使用循环和控件名称来将值分配给窗体上的多个文本框:
```
' 定义用逗号分隔的字符串
Dim controlString As String = "TextBox1,Label1,TextBox2,Label2,TextBox3,Label3"
' 将字符串拆分为控件名称数组
Dim controlNames() As String = controlString.Split(",")
' 定义需要分配值的文本框数量
Dim numTextboxes As Integer = 3
' 使用循环将值分配给文本框
For i As Integer = 0 To numTextboxes - 1
' 获取当前文本框的控件名称
Dim textboxName As String = controlNames(i * 2)
' 获取当前文本框的值
Dim textboxValue As String = "Value " & (i + 1)
' 根据控件名称获取文本框控件
Dim textboxCtrl As Control = Me.Controls(textboxName)
' 将值分配给文本框
If TypeOf textboxCtrl Is TextBox Then
Dim textbox As TextBox = CType(textboxCtrl, TextBox)
textbox.Text = textboxValue
End If
Next
```
这个示例代码假设你的窗体上有名为 `TextBox1`、`TextBox2` 和 `TextBox3` 的文本框控件,并且你想要将它们的值分别设置为 `"Value 1"`、`"Value 2"` 和 `"Value 3"`。对于每个文本框,它会在控件名称数组中找到相应的控件名称,并使用 `Me.Controls(controlName)` 语句来获取该控件的引用。然后,它将检查控件是否是文本框,并将值分配给文本框的 `Text` 属性。