如何解决vb.net 在枚举数据表时使用字符串访问 Dim
我试图在遍历数据表时更新变量 如果我想更新标签,我可以使用 Findcontrol,但如何为 Dim 更新?
Dim test1 As String = ""
Dim test2 As String = ""
Dim test3 As String = ""
Dim int As Integer = 1
Do Until int = 4
"Test" & int = "Value"
int += 1
Loop
解决方法
只需使用像 array 或列表这样的集合:
Dim testCollection(3) As String
For i As Int32 = 0 To 3
testCollection(i) = "Value" & i
Next
现在您有一个 String()
,其中包含 4 个可以通过索引访问的元素,例如:
Dim test1 As String = testCollection(0) ' "Value0"
如果您实际上不想通过数字而是通过名称访问它们,则应将它们存储在 Dictionary(Of String,String)
中。以下是带有您评论姓名的示例:
Dim dict = New Dictionary(Of String,String) From {{"db_ma_vsYear",""},{"db_en_vsYear",""}}
现在您可以按名称访问和修改它:
dict("db_ma_vsYear") = "New Value"
Dim db_ma_vsYear As String = dict("db_ma_vsYear") ' New Value
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。