Hejsan!
Kan någon hjälpa mig med hur jag ska fylla mina Labels (Label0101 - Label0109) med slumpade tal? Det fungerar att göra enligt nedan, men när det börjar handla om fler labels blir det lite klumpigt att göra på detta viset...
Jag försökte mig på att använda en Array men då fick jag inte till det.
Finns det någon kunnig där ute som har något bra förslag på bättre metoder?
-------------------------------------------
private m_Rnd As New Random
function Slump() As Integer
Slump = m_Rnd.Next(1,11)
end function
sub FyllNummer(obj as object, e as eventargs)
'Slumpa nummer till labels
Label0101.Text = Slump
Label0102.Text = Slump
Label0103.Text = Slump
Label0104.Text = Slump
Label0105.Text = Slump
Label0106.Text = Slump
Label0107.Text = Slump
Label0108.Text = Slump
Label0109.Text = Slump
Label0110.Text = Slump
.
.
.
\<td align="middle" width="20"\>
\<asp:Label id="Label0101" runat="server"\>\</asp:Label\>\</td\>
.
Sub FyllNummer(sender As Object, e As EventArgs)
'Ändra 4 till så många labels du vill ha
Dim dummydatasource(4) As String
repLabels.DataSource = dummydatasource
repLabels.DataBind()
End Sub 'FyllNummer
Sub repLabels_itemdatabound(sender As Object, e As RepeaterItemEventArgs)
If e.Item.ItemType = ListItemType.Item Or e.Item.ItemType = ListItemType.AlternatingItem Then
Dim rnd As New Random()
CType(e.Item.FindControl("lbNumber"), Label).Text = rnd.Next(1, 11).ToString()
End If
End Sub 'repLabels_itemdatabound
