Номера символов ascii - VB

Формулировка задачи:

помогите доработать программку. дан массив состоящий из 10 символов, организовать массив состоящий из номеров символов первого массива ascii

Public Class Form1
    Dim a(10), b(10), i As Integer
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Randomize()
        For i = 1 To 10
            a(i) = Int(Rnd(10) * 10)
            Label1.Text = Label1.Text & "  " & a(i)
            b(i) = Asc(a(i))
            Label2.Text = Label2.Text & "  " & b(i)
        Next
    End Sub
End Class

вот сделал так, но сдесь тока цифры

все сделал))

Решение задачи: «Номера символов ascii»

textual
                            Листинг программы 
                        
                            Dim a(10), b(10), i As Integer