主题：求教代码问题

For Each ctl As WinForm.Control In e.Form.Controls

    For Each c As Col In Tables("主表.副表").Cols

        If TypeOf ctl Is WinForm.RadioButton Then

            Dim rd As WinForm.RadioButton = ctl

            If rd.Checked AndAlso rd.Name.StartsWith(c.Name) Then

                Tables("主表.副表").Current(c.Name) = rd.Text

            End If

        End If

    Next

Next

为什么这段代码执行总是在表第一行，而不是应用在新增的行中呢？求教如何才能应用在当前行中？