0

これが理にかなっており、誰かが私を正しい方向に向けることができることを願っています. Access 2007 でプロジェクトを作成しています

テキストフィールドPhotoNameを持つテーブルtblEmployees、リストボックスList0を持つフォームForm2、および空の画像ボックスImage1とImage2があります

フィールド PhotoName には、写真の名前、つまり 122000_998.jpg がフル パスなしで格納されます (例: C:\Photos\122000_998.jpg)。

List0 には 4 列のデータがあり、Column(4) は写真のファイル名、つまり 122000_998.jpg です。

Form2が開いたときに、複数の行から写真を自動的に選択する必要があります

以下を使用して、任意の行から写真を取得して Image1 と Image2 に表示できますが、tblEmployees PhotoNamI のファイル名を 122000_998.jpg から C:\Photos\122000_998.jpg に変更した場合、または Me.Image1.Picture を変更した場合のみです。 = Me.List0.Column(4) から Me.Image1.Picture = "C:\VisitorImage\" & Me.List0.Column(4)

Me.List0.Selected(0) =真

Me.Image1.Picture = Me.List0.Column(4)

Me.List0.Selected(1) =真

Me.Image2.Picture = Me.List0.Column(4)

tblEmployees PhotoName へのパスを追加したり、コードの各行に追加したりせずに、上記が Form Open Event プロシージャで実行されるときに、上記にパスを追加して写真を見つけるにはどうすればよいですか。パスが変更される可能性があるため、20枚以上の写真がある可能性があるため、各行を通過するよりもパスの値を変更する方が簡単になるのでお願いします

すべての助けに感謝します、ありがとう

ジェドスキー3

4

1 に答える 1

1

どうですか？

dim pathprefix as String
pathprefix = "C:\Photos\"
Me.List0.Selected(0) =True
Me.Image1.Picture = pathprefix + Me.List0.Column(4)
Me.List0.Selected(1) =True
Me.Image2.Picture = pathprefix + Me.List0.Column(4)
于 2012-08-10T23:23:31.913 に答える