子窗体中显示清单时，需要同时显示图片。

3ddesign · 发表于 2006-8-29 02:33:00

子窗体中显示清单时，需要同时显示图片。如何做到请各位指教，谢谢！

是一张清单就有一张图片与之对应。由于原文件太大，请见附件中的贴图。

在线等！

[此贴子已经被作者于2006-8-28 18:40:45编辑过]

tmtony · 发表于 2006-8-29 02:39:00

1.在子窗體的 current事件來更新父窗體中的圖片變化

2.子窗體不使用數據表,直接使用連續表,圖片放在連續窗體中(可放在窗體頁腳)

3ddesign · 发表于 2006-8-29 02:52:00

Hi tmtony,

第一种方式，能否写一下Current的语句，以便我以它当作样子在我的Access中试一下，有劳了。谢谢！

附上我的例子，删除了所有的照片和无关的东西。菜鸟级选手，见笑了！

[此贴子已经被作者于2006-8-28 19:11:55编辑过]

ui · 发表于 2006-8-29 03:57:00

d

[此贴子已经被作者于2006-8-28 19:57:12编辑过]

tmtony · 发表于 2006-8-29 04:00:00

1.将表中pic字段改为文字型,只存图片路径

2.将主窗体的Pic控件换为 image,不用OLE绑定控件

3.在子窗体的current事件中加入下列代码



  Dim strPic As String

  strPic = Nz(DLookup("

ic", "ModuleNoList", "[Module No]='" & Me.ModuleNo & "'"))

If Dir(strPic) <> "" Then

Me.Parent.Pic.Picture = strPic

End If

3ddesign · 发表于 2006-8-29 20:19:00

非常感谢站长的鼎力相助，我好好学习学习，有问题还敬请再指教！

谢谢！

帐号		自动登录	找回密码
密码			注册

[窗体] 子窗体中显示清单时，需要同时显示图片。

群介绍
主题无相 (随机显示版	同地区群块其他地区)