vb声明一个动态数组A,将2~100之间的素数放入该数组中，最后在窗体中显示A数组的各元素

Dim n As Integer, sum As Integer, j As Integer
        TextBox1.Text = ""
       &n