こんにちは
質問内容を見るとPictureBoxの数は固定のようですね。
ランダムな値を配列(今回のサンプルだったらpbs)に割り当てて
ください。

VBの環境がないので単純なサンプルにしました。
もしPictureBoxの数が固定じゃなく、
状況により変わるならListなどのコレクションを使ってください。

＞追伸
本当は、複数の画像を描画する時も１つのコントロール(PictureB
oxなど)か、もしくはできるだけ数を減らすのが望ましいです。


＞サンプル

Private Sub Form1_Load(sender As Object, e As EventArgs)

Dim pbs As PictureBox() = {Me.PictureBox1, Me.PictureBox2, Me.PictureBox3}



Dim name As String



For i As Integer = 0 To pbs.Length - 1

name = pbs(i).Name

Console.WriteLine(name)

Next

End Sub