Código PHP:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim x, con, cont As Integer
Dim matriz(4) As Integer
For cont = 0 To 4
For con = 1 To 10
x = 100 * Rnd()
matriz(cont) = x
Next
Me.TextBox1.Text = matriz(0)
Me.TextBox2.Text = matriz(1)
Me.TextBox3.Text = matriz(2)
Me.TextBox4.Text = matriz(3)
Me.TextBox5.Text = matriz(4)
Next
End Sub
End Class