Here's my code:
Dim valueArray() As Double = {0.5, 1, 10, 147, ..., 20018.68, 100025.8956}
Dim labelArray() As Label = {Label1, Label2, Label3, ..., label25, label26}
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
For i = 0 To 25
labelArray(i).Text = valueArray(i)
Next
End Sub

New Topic/Question
Reply



MultiQuote



|