Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/fortran/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb.net 如何同时在多个阵列中循环?_Vb.net - Fatal编程技术网

Vb.net 如何同时在多个阵列中循环?

Vb.net 如何同时在多个阵列中循环?,vb.net,Vb.net,我是vb新手,如果以前有人问过我的问题,我很抱歉。我已经搜索过了,但没能找到,也许也没能认出答案。我正在使用visual studio 2010并在vb.net中创建一个应用程序。 我有两个名为问答的数组。我想同时遍历这两个数组并从这两个数组中检索记录。我正在使用以下代码执行此操作 Dim sql As String = "SELECT QuestionId,Answer FROM tbl_Answers" Dim dt As DataTable = obj.GetDTbl(sql) Fo

我是vb新手,如果以前有人问过我的问题,我很抱歉。我已经搜索过了,但没能找到,也许也没能认出答案。我正在使用visual studio 2010并在vb.net中创建一个应用程序。 我有两个名为问答的数组。我想同时遍历这两个数组并从这两个数组中检索记录。我正在使用以下代码执行此操作

 Dim sql As String = "SELECT QuestionId,Answer FROM tbl_Answers"
 Dim dt As DataTable = obj.GetDTbl(sql)
 For Each row As DataRow In dt.Rows              
     SelectedAnswers += row("Answer").ToString & ","
 Next
 Dim Questions() As String = QuestionsIds.Split(",")
 For Each question In Questions
     Dim answers() As String = SelectedAnswers.Split(",")
     For Each answer In answers
         Dim rbl As RadioButtonList = DirectCast(plcHolderForm.FindControl("Question_" & question), RadioButtonList)


         rbl.SelectedIndex = rbl.Items.IndexOf(rbl.Items.FindByValue("answer".ToString))

在上面的代码中可以明显看出,我的外部for循环只执行一次。我需要为每个循环遍历2次以上,以便针对每个问题,我可以通过FindByValue函数获取其答案,您可以在1个通用for循环中循环问题和答案吗

Dim CurQuestion as String
Dim CurAnswer as String
For i As Integer = 0 To Questions.Length - 1
    CurQuestion = Questions(i)
    CurAnswer = Answers(i)
    'Do what you need what current question and answer
Next

这假设您有相同数量的问题和答案,并且它们排列在各自的数组中。如果没有,您将不得不对其进行微调以满足您的特定需求。

您能否在1个通用for循环中循环通过问题和答案

Dim CurQuestion as String
Dim CurAnswer as String
For i As Integer = 0 To Questions.Length - 1
    CurQuestion = Questions(i)
    CurAnswer = Answers(i)
    'Do what you need what current question and answer
Next

这假设您有相同数量的问题和答案,并且它们排列在各自的数组中。如果没有,您必须对其进行微调,以满足您的具体需求。

请澄清您的问题。dt中有什么?
Questions
是字符串数组吗?每个问题是否只有一个答案,或者可能有多个(可能是错误的)答案?每个问题只有一个答案。dt是数据表。问题是一个字符串数组,我将其拆分为多个问题,就像我拆分答案数组一样。可能使用for循环而不是foreach?每个问题都有一个答案??你能把什么数字加起来得到10?5 + 5? 3 + 7? 1 + 9? 等取决于问题的提问方式。请澄清您的问题。dt中有什么?
Questions
是字符串数组吗?每个问题是否只有一个答案,或者可能有多个(可能是错误的)答案?每个问题只有一个答案。dt是数据表。问题是一个字符串数组,我将其拆分为多个问题,就像我拆分答案数组一样。可能使用for循环而不是foreach?每个问题都有一个答案??你能把什么数字加起来得到10?5 + 5? 3 + 7? 1 + 9? 等取决于问题是如何提出的。谢谢你的回答。我有点困惑,如何使用1 for循环遍历问答数组。你能详细说明你的答案吗。这是一个简单的for循环,你只需将名为
I
的变量从0迭代到
问题。长度-1
,然后你可以通过像
Answers(i)
这样的数组的
ith
值来引用当前的答案或问题。谢谢你的回答。我有点困惑,我怎么能用1 for循环遍历问答数组。你能详细说明你的答案吗。这是一个简单的for循环,您只需将名为
i
的变量从0迭代到
Questions.Length-1
,然后您可以通过获取数组的
ith
值来引用当前答案或问题,如
Answers(i)