2012-06-06 2 views
2

한 필드 (club_name)로 액세스 할 수있는 양식이 있는데이 양식의 그림 개체가 있습니다. 어딘가에있는 폴더에 나는 각 사진이 (* .png) 각 클럽의 사진이 내 테이블에있는 레코드와 동등하다는 것을 알고있다. 예를 들어 나는 "FCB"라는 레코드를 가지고 있고 그 폴더에는 "FCB.png"라는 그림이있다. 이런 나 자신의 코드 :양식에있는 Access 2010 VBA 그림 개체

개인 서브 Form_Current()
Image5.Picture =
최종 하위를 ".png를"& Club_Name.Text & "C \ 밀라 드 \ 바탕 화면 \ 클럽 imgs \ \ 사용자"

하지만 올바르지 않습니다.
도와주세요.

답변

1

컨트롤의 텍스트 속성을 참조하지 마십시오. 컨트롤에 포커스가있을 때만 사용할 수 있습니다. 속성을 사용해야하는 경우 value를 사용하십시오.

Me.Image5.Picture = "C:\Users\Milad\Desktop\club imgs\FCB.png" 

다시 댓글

sPath = CurrentProject.Path & "\" 
sBlank = "Blank.png" ''Your own default empty picture 

If IsNull(Me.Club_Name) Then 
    sFile = sBlank 
Else 
    ''Does the file exist? Note: Use FilesystemObject 
    ''instead if you are working network paths. 

    sFile = Dir(sPath & Me.Club_Name & ".png") 

    ''Empty string ("") 
    If sFile = vbNullString Then 
     sFile = sBlank 
    End If 
End If 

Me.Image5.Picture = sPath & sFile 
+0

과 사진 나던 경기가 다음으로 이동 형성하는 경우 : "진짜"이름을 사용하여 모든 작품이 있음을

Me.Image5.Picture = "C:\Users\Milad\Desktop\club imgs\" & Me.Club_Name & ".png" 

또한 확인할 수 있습니다 ? –

+0

누군가 내 컴퓨터 폴더에 데이터베이스 폴더 (데이터베이스 폴더에 사진이있는 클럽 폴더 - 클럽 폴더가 포함되어 있음)를 복사하는 경우 다음과 같이 databse 경로를 사용하는 기능을 사용하고 싶습니다. "DatabasPath &"\ club imgs \ "& me.club_name & ".png" –

+0

데이터베이스 폴더는'CurrentProject.Path'입니다. 첫 코멘트가 무슨 뜻인지 모르겠다. – Fionnuala