Dim Files As String() = _
    {"file1.exe", "file2.exe", "file3.exe"} 
' los nombres de los archivos declarados globales por si vas a usar los nombres en otra parte del codigo 
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
        For Each file In Files
            If My.Computer.FileSystem.FileExists(file) Then
                MsgBox("Perfecto! El programa ha encontrado el archivo " & file & ". Pulse aceptar para continuar", MsgBoxStyle.Information)
                'Formdeacciones.Show()
            Else
                MsgBox("No se ha encontrado el archivo" & file & ". Asegurese de que estan dentro de la misma carpeta que el ejecutable principal.")
            End If
        Next