각 루프에 대해 뷰백 이름에 변수를 붙입니다.

Question

저는 여러 개의 뷰백을 생성해야하는 mvc 3 vb.net 앱이 있습니다. 다음 코드를 사용하여 뷰백 이름의 끝에 변수를 놓으려고했습니다. 각 루프하지만 그것을 가져 가지 않을거야 .. 그것은 "개체 변수 또는 With 블록 변수가 설정되지 않았습니다." 그것은 자신이 루프를 만든다 번째 패스에 viewbag.status (p) 라인 ...

 Dim p As Integer = 0 
     For Each registrant In b 
      Dim _regi As attendance = registrant 
      Dim _status As New List(Of String) 
      If Not String.IsNullOrWhiteSpace(_regi.Completed_Class) Then 
       _status.Add(_regi.Completed_Class) 
      End If 
      _status.Add("--") 
      _status.Add("Absent") 
      _status.Add("Left Early") 
      _status.Add("Completed") 
      ViewBag._status(p) = _status 
      p = p + 1 
     Next 

하고 뷰는 다음과 같다 때

@ModelTYPE List(Of xxxxxx.attendance) 
    @Code 
    ViewData("Title") = "Class Attendance Record" 
End Code 
@Using Html.BeginForm 
@<fieldset> 
<table> 
<tr> 
    <th>First Name</th> 
    <th>Last Name</th> 
    <th>Registrant ID</th> 
    <th>Course Status</th> 
    <th>Comments</th> 

</tr> 

@For r As Integer = 0 To Model.Count - 1 
    Dim i As Integer = r 
    @Html.HiddenFor(Function(m) m(i).id) 
    @Html.HiddenFor(Function(m) m(i).course_ref) 



    @<tr>   
    <td>@Html.DisplayFor(Function(m) m(i).firstName) 
     @Html.HiddenFor(Function(m) m(i).firstName) 
    </td> 

    <td>@Html.DisplayFor(Function(m) m(i).lastName) 
     @Html.HiddenFor(Function(m) m(i).lastName) 
    </td> 
    <td>@Html.DisplayFor(Function(m) m(i).reg_id) 
     @Html.HiddenFor(Function(m) m(i).reg_id) 
    </td> 

    <td>@Html.DropDownListFor(Function(m) m(i).Completed_Class, New SelectList(ViewBag._status(i))) 
     @Html.HiddenFor(Function(m) m(i).Completed_Class) 
    </td> 
    <td>@Html.TextBoxFor(Function(m) m(i).Comments, New With {.class = "AttenComment"}) 
     @Html.HiddenFor(Function(m) m(i).Comments) 
    </td> 
</tr> 
Next 
</table> 
<p><input type="submit" name="submit" /></p> 
</fieldset> 
End Using 

어떤 아이디어 ???

Answer 1

은 단순히 ... 내보기의 각 루프의 내부 viewbag을 생성 ..

Answer 2

제공하신 코드에 따르면 ViewBag._status은 실제로 List(Of List(Of String))입니다. 즉, 각 ViewBag._status (p)는 실제로 List (Of String)을 보유하고 _status 그 자체는리스트 또는 배열입니다.

난 당신의 문제를 해결할 것입니다 먼저 루프를 마친 후에 ViewBag._status 설정 한 모든 작업을 수행하는 것입니다. 그런 식으로 매번이 표에서 항목뿐만 아니라 드롭 다운에 대한 viewbag 것을 생성 할 각 항목을 처리하기 위해 루프를 통해 가니

Dim statusLists As New List(Of List(Of String)) 
For Each registrant In b 
    Dim _regi As attendance = registrant 
    Dim _status As New List(Of String) 
    If Not String.IsNullOrWhiteSpace(_regi.Completed_Class) Then 
     status.Add(_regi.Completed_Class) 
    End If 
    _status.Add("--") 
    _status.Add("Absent") 
    _status.Add("Left Early") 
    _status.Add("Completed") 
    statusLists.Add(_status) 
Next 
ViewBag._status = statusLists