Private Sub Form_Activate()
    Dim i As Integer
    For i = 0 To 9
        Image_GO(i).Visible = False
    Next i
    ・
    ・
    ・
    


Private Sub ImageS_MouseMove(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
    Dim EXTX As String
    Dim AUYX As Double
    Image_GO(Index).Visible = True
    MsgBox "処理中"
    ・
    ・
    ・


ImageSとImage_GOが同一のフォーム上にありますが、
ImageS_MouseMoveのコードの実行処理が全て終了しないと
フォーム上のImage_GO(Index)が表示されません。
つまり
Image_GO(Index).Visible = True
を実行してもImageS_MouseMoveが全て終了しないと
フォームに表示処理されない感じなのですが、
すぐに表示するには、どうすれば良いかこれだけでわかるでしょうか？

注意事項を読んでおられないようなのでレスする気になれなかったのですが、何方からも
レスがつかないようなので。

> Private Sub ImageS_MouseMove(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
>     Dim EXTX As String
>     Dim AUYX As Double
>     Image_GO(Index).Visible = True
>     MsgBox "処理中"
>
> ImageSとImage_GOが同一のフォーム上にありますが、
> ImageS_MouseMoveのコードの実行処理が全て終了しないと
> フォーム上のImage_GO(Index)が表示されません。

そもそも何の為にどのようなしたいのか、コードを投稿するなら事象を再現できる
ようなコードを投稿しないと、これを見ている人には伝わりませんし、何回もやりとり
するのも面倒と敬遠されます。

結論から言えば、貴方がそのような仕様のコードを書いているからで、目的等が
分からない以上どうするのがよいか答えようがないのではないでしょうか。
MouseMove イベントになぜ表示処理を書いているのか。
MsgBox "処理中" なるコードを実行したらそこで、MsgBox を閉じるまで処理が止まって
しまいませんか？

何をしようとされているのかは知りませんが、根本的に仕様を見直した方が良いような
気がします。