역시나 답변이 안달리네요.
내용으로 보면 Visual Basic .NET으로 보이는데요.
아래 오류는 exception으로 보입니다.
UAC환경에서, Program Files 폴더에 일반유저(?)로 접근하려고 하니, 접근 권한이 필요하다는 exception을 던진 것으로 보이네요.

여러가지 해결 법이 있을 것 같은데요,
1. UAC를 끈다.
2. 프로그램을 실행시킬 때, administrator 권한으로 실행시킨다.
3. 프로그램 전체의 실행 권한을 administrator로 조정한다. (manifest수정 등의 방법 필요)
4. 필요한 함수를 실행할 때, 권한 상승을 요구한다.
등등....

무엇을 하시는 분인지는 모르겠지만, 맨땅에 헤딩하면서 삽질하시는 모습이 무모하지만, 보기에는 좋습니다.
(위 표현은 절대 비하하는 내용이 아니며, 일반적인 IT용어로서의 표현입니다.)

맨땅에 헤딩이나 삽질로 시작하지만, 그렇게만 하기에는 쉽게 지칠 수 있습니다.
조금만 단계를 밟으시는 것이 좋을 것 같습니다.

그럼, 참고하세요.

윤원 님이 쓰신 글 :
: Public Class Form1
:
:
:     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
:         Dim foundFile As String
:         foundFile = "c:\freejoin1.exe"
:
:         If Not IO.File.Exists(foundFile) Then
:             '파일이 없으면 찾는다.
:             foundFile = Nothing
:             For Each foundFile In My.Computer.FileSystem.GetFiles(My.Computer.FileSystem.SpecialDirectories.ProgramFiles, FileIO.SearchOption.SearchAllSubDirectories, "freejoin1.exe")
:
:             Next
:         End If
:         If foundFile Is Nothing Then Exit Sub
:         Dim filePath As String = My.Computer.FileSystem.GetFileInfo(foundFile).DirectoryName
:         Dim xExeFile As String = My.Computer.FileSystem.GetFileInfo(foundFile).FullName
:         Dim xfile As String = "D:\10_작업문서\10_개발문서\01_공통관리문서\65_업무관리사항.ppt"
:
:         '프로세스 실행
:         Process.Start(xExeFile, xfile)
:
:         ' 프로세스 id 로 실행
:         'Dim pID As Integer = Shell(xfile, AppWinStyle.NormalFocus)
:         ''AppActivate(pID)
:
:
:        
:     End Sub
: End Class
:
:
:
: xp에서는 파일을 찾아서 실행을 시키는데요..
:
: xp가 아닌 윈도우 7은 안되요 ㅠ.ㅠ 에러문구가 뜨넹요~
:
: For Each foundFile In My.Computer.FileSystem.GetFiles(My.Computer.FileSystem.SpecialDirectories.ProgramFiles, FileIO.SearchOption.SearchAllSubDirectories, "freejoin1.exe")
:
: 이부분에서 엑서스가 거부되었다고 하네요..