For i As Integer = 1 To 13
If cmb(i)..... then
do stuff
End If
I think I might be way off here on how to pull this off.. any help would be great
Next
For Each cntrl As Control In Me.Controls
If TypeOf cntrl Is ComboBox Then
Dim cbobx As ComboBox = CType(cntrl, ComboBox)
If String.Equals(cbobx.Text, "not done", StringComparison.OrdinalIgnoreCase) Then
'Do Something
End If
End If
Next
-saige-
For Each cntrl As Control In Me.Controls
If TypeOf cntrl Is RadComboBox Then
Dim cbobx As RadComboBox = CType(cntrl, RadComboBox)
If cbobx.Text = "Not Done" Then
cbobx.BackColor = Color.Orange
End If
End If
Next
<telerik:RadSplitter ID="RadSplitter3" runat="server" SplitBarsSize="" LiveResize="True" Width="1200px" Height="600px">
<telerik:RadPane ID="RadPane5" Runat="server" Height="600px" Width="700px">
<br /><br />
<table class="nav-justified">
<tr>
<td class="auto-style111"> </td>
<td class="auto-style112">STATUS</td>
<td> </td>
<td> </td>
<td> </td>
</tr>
<tr>
<td class="auto-style111">Survey Complete</td>
<td class="auto-style112">
<telerik:RadComboBox ID="cmb1" Runat="server">
<Items>
<telerik:RadComboBoxItem runat="server" Text="Done" Value="Done" />
<telerik:RadComboBoxItem runat="server" Text="Not Done" Value="Not Done" />
<telerik:RadComboBoxItem runat="server" Text="N/A" Value="N/A" />
</Items>
</telerik:RadComboBox>
</td>
<td> </td>
<td> </td>
<td> </td>
</tr>
Open in new window