Loop through bound DataGrid with RadioButtonList in TemplateColumn

I have a DataGrid and I need to check the selected value of the RadioButtonList in each column when the form is submitted. I have included the code for the DataGrid and the section of VB code I am using to loop through it below.

Thanks for your help!

**********Begin DataGrid*****************
<form id="QualitySurvey" method="post" runat="server">
<asp:DataGrid Runat="server" ID="dataGridQuestions" AutoGenerateColumns="False">
   <Columns>
      <asp:BoundColumn HeaderText="" DataField="QuestionOrder"></asp:BoundColumn>
      <asp:BoundColumn HeaderText="Question" DataField="QuestionText"></asp:BoundColumn>
      <asp:TemplateColumn HeaderText="Answer">
         <ItemTemplate>
            <asp:RadioButtonList ID="radiolistAnswers" Runat="server" RepeatDirection="Horizontal">
               <asp:ListItem Value="1">1</asp:ListItem>
               <asp:ListItem Value="2">2</asp:ListItem>
               <asp:ListItem Value="3">3</asp:ListItem>
               <asp:ListItem Value="4">4</asp:ListItem>
               <asp:ListItem Value="5">5</asp:ListItem>
            </asp:RadioButtonList>
         </ItemTemplate>
      </asp:TemplateColumn>
   </Columns>
</asp:DataGrid>
<br><br>
<input id="buttonSubmit" type="submit" value="Submit Survey" runat="server" onserverclick="submitSurvey">
</form>
*********End    DataGrid*********************

*********Begin VB Code*********************
'##  Bind the DataGrid
Public Sub datagridQuestionsBind()
   Dim strSelectQuestions = "SELECT * FROM dbo.Question WHERE SurveyIndex = '" & ddlSurvey.SelectedValue & "' ORDER BY QuestionOrder;"
   Dim connectionString = ConfigurationSettings.AppSettings("ConnectionStringQS")
   Dim objConnect As New SqlConnection(connectionString)
   Try
       objConnect.Open()
       Dim objCommand As New SqlCommand(strSelectQuestions, objConnect)
       Dim objDataReader As SqlDataReader
       objDataReader = objCommand.ExecuteReader()
       dataGridQuestions.DataSource = objDataReader
       dataGridQuestions.DataBind()
       objDataReader.Close()
       objConnect.Close()
   Catch objError As Exception
       Response.Write("Error transacting with database: " & objError.Message)
   End Try
End Sub
'##  loop through the DataGrid when form is submitted
Public Sub submitSurvey(ByVal sender As Object, ByVal e As System.EventArgs)
   Dim item As DataGridItem
   For Each item In dataGridQuestions.Items
      '##  need code here to check the RadioButtonList values in the row.
   Next
End Sub
*********End   VB Code*********************