以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 录入窗口 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=186968) |
-- 作者:985123414 -- 发布时间:2023/6/12 9:12:00 -- 录入窗口 老师,用窗口给表中录入信息时,当姓名ComboBox1的值发生变化时,PictureBox1绑定的是另一个表的照片列,让PictureBox1根据ComboBox1的值显示录入的这个姓名的照片,代码应该怎样写呢 [此贴子已经被作者于2023/6/12 9:14:54编辑过]
|
-- 作者:有点蓝 -- 发布时间:2023/6/12 9:23:00 -- ComboBox1、valuechanged事件 With Tables("另一个表") Dim r As Integer
r = .FindRow("[姓名] = \'" & e.sender.text & "\'") \'从 第一行开始查找 If r >= 0 Then \'如果找到的话 .Position = r \'定位到找到的行。 End If End With |
-- 作者:985123414 -- 发布时间:2023/6/12 9:36:00 -- 好的谢谢老师啦 |
-- 作者:985123414 -- 发布时间:2023/6/12 16:23:00 -- 老师,如果将筛选结果显示在label1中,代码要怎么修改呀 Dim Filter As String With e.Form.Controls("combobox6") If .Value IsNot Nothing Then Filter = "姓名 like \'%" & .Value & "%\'" End If End With |
-- 作者:有点蓝 -- 发布时间:2023/6/12 16:28:00 -- 什么筛选结果?举例说明一下 |
-- 作者:985123414 -- 发布时间:2023/6/12 16:48:00 -- 就是这样,上面选择姓名,下面显示相应信息 |
-- 作者:有点蓝 -- 发布时间:2023/6/12 16:57:00 -- 上传图片的方法:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78 |
-- 作者:985123414 -- 发布时间:2023/6/12 17:04:00 -- 好的我重新传一下 [此贴子已经被作者于2023/6/12 17:05:36编辑过]
|
-- 作者:985123414 -- 发布时间:2023/6/12 17:10:00 -- 就是这样老师,上面筛选姓名,下面显示相应内容 此主题相关图片如下:b63d6072-02f1-4f2b-8b14-6346aef44977.png [此贴子已经被作者于2023/6/12 17:10:45编辑过]
|
-- 作者:有点蓝 -- 发布时间:2023/6/12 17:12:00 -- 控件绑定列即可:http://www.foxtable.com/webhelp/topics/0704.htm |