VS 2010 Issue with accessing data from dynamically created DropdownLists

For Each u As UpgradeTypeList In upgrades
            Dim lbl As New Label
            Dim ddl As New DropDownList
 
            ddl.AutoPostBack = False
 
            Dim TR_Row As New TableRow
            Dim TD_Label, TD_Dropdown As New TableCell
 
            TD_Label.Attributes.Add("style", "padding: 2px;")
            TD_Dropdown.Attributes.Add("style", "padding: 2px;")
 
            TD_Label.Attributes.Add("align", "right")
 
            lbl.Text = String.Format("{0}: ", u.Type)
 
            Dim ucList As List(Of UpgradeDropdown) = (From x In db.tblCards_Upgrades
                                                      Where x.Type = u.ID
                                                      Select New UpgradeDropdown With {
                                                          .Name = String.Format("{0} ({1})", x.Title, x.PointCost),
                                                          .UpgradeID = x.UpgradeID
                                                      }).ToList
 
            ddl.Items.Add(New ListItem("", 0))
            For Each x As UpgradeDropdown In ucList
                ddl.Items.Add(New ListItem(x.Name, x.UpgradeID))
            Next
 
            TD_Label.Controls.Add(lbl)
            TD_Dropdown.Controls.Add(ddl)
 
            TR_Row.Controls.Add(TD_Label)
            TR_Row.Controls.Add(TD_Dropdown)
 
            rowUpgrades.Controls.Add(TR_Row)
        Next

Protected Sub btnAddSquadMember_Click(sender As Object, e As EventArgs) Handles btnAddSquadMember.Click
        For Each c As Control In rowUpgrades.Controls
            If TypeOf c Is DropDownList Then
                Dim DoesExist As Boolean = False
 
                For Each x As SquadMember_Upgrade In Global_asax.TempPilot.Upgrades
 
                    If x.ID = sender.ID Then
                        DoesExist = True
                    End If
 
                    If DoesExist Then
                        x.Name = sender.SelectedValue
                        Exit Sub
                    End If
                Next
 
                Dim newUpgrade As New SquadMember_Upgrade
                newUpgrade.ID = sender.ID
                newUpgrade.Name = sender.SelectedValue
 
                Global_asax.TempPilot.Upgrades.Add(newUpgrade)
            End If
        Next
 
        Global_asax.SquadMembers.Add(Global_asax.TempPilot)
    End Sub