Option Strict On　 '必要がない限りON がいいかと
Option Explicit On　'必要がない限りON がいいかと

Public Class　ｘｘｘｘｘ

：
中略
：


        For i = 1 To 5
            If IsNothing(Me.Controls("PictureBox" & i.ToString("0"))) = False Then
                If System.IO.File.Exists(FILE_JATextBox.Text) Then
                    CType(Me.Controls("PictureBox" & i.ToString("0")), PictureBox).Image = Image.FromFile(FILE_JATextBox.Text)     'JA
                Else
                    CType(Me.Controls("PictureBox" & i.ToString("0")), PictureBox).Image = Nothing
                End If
            End If
        Next



：
中略
：



        Dim strDmmy As String
        Dim Ret As DialogResult


        With Me.OpenFileDialog1
            .Title = "画像ファイルの選択"
            .Filter = "画像 ファイル (*.bmp)|*.bmp|ピクチャ (*.jpg;*.ico)|*.jpg;*.ico|全て  (*.*)|*.*"
            .FilterIndex = 1
            .DefaultExt = "bmp"
            .InitialDirectory = PrmPath
            .FileName = ""

        End With
        Ret = Me.OpenFileDialog1.ShowDialog
        If Ret = Windows.Forms.DialogResult.OK Then
            strDmmy = Me.OpenFileDialog1.FileName
            Label10.Text = strDmmy
            '
            CType(PrmImg, PictureBox).Image = Image.FromFile(strDmmy) '表示中のデータを更新
            CType(PrmTXT, TextBox).Text = strDmmy
            '
        Else
            'エラー処理
        End If

：
中略
：

        Dim Btt As Button

        Btt = CType(sender, Button)
        '
        GB_OkNg.Tag = Btt.Tag
        GB_OkNg.Top = Btt.Top + Btt.Height
        GB_OkNg.Left = Btt.Left
        GB_OkNg.Visible = True


’こんな感じでいかがでしょうか？