以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]图片选择后如何在图片框中显示 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=91791) |
||||
-- 作者:188802386 -- 发布时间:2016/10/19 10:36:00 -- [求助]图片选择后如何在图片框中显示 求助有很多张图片,请问假如选中了图片3,请问如何在图片框中显示图片3的图片呢,参考图片在二楼 |
||||
-- 作者:188802386 -- 发布时间:2016/10/19 10:37:00 -- 参考图片 |
||||
-- 作者:有点蓝 -- 发布时间:2016/10/19 10:56:00 -- 病历listview,取得和单选框名称一样的行,把图片路径给图片框 |
||||
-- 作者:188802386 -- 发布时间:2016/10/19 11:40:00 -- 没做过,有没有教程或案例,参考学习下 |
||||
-- 作者:有点蓝 -- 发布时间:2016/10/19 11:59:00 -- 都在帮助中:http://www.foxtable.com/webhelp/scr/2849.htm 不会就上传例子
|
||||
-- 作者:188802386 -- 发布时间:2016/10/23 15:14:00 -- 谢谢了
|
||||
-- 作者:狐狸爸爸 -- 发布时间:2016/10/23 17:33:00 -- radiobutton的命名要有规则,不能RadioButton1、RadioButton2,这样不利于统一编码。 应该这样: rdo-p-x,例如 rdo-1-2,表示在位置1显示第2个图片,rdo-2-7表示在位置2显示第三个图片。
接下来的全局CheckedChanged事件代码:
if e.Seneder.Name.StartsWith("rdo-") Then Dim pts = e.Sender.Name.Split("-") Dim wz As Integer = pts(1) \'位置 Dim tp AS Integer = pts(2) ‘要显示的图片编号 .......你可以i自己处理了。
需要批量处理的时候,规范命名是简化编码的基础。 |
||||
-- 作者:188802386 -- 发布时间:2016/10/23 18:34:00 -- 老师能不能给个全的,出错了,之前没接触过单选框如何返回 比如 dro-1-2,请问如何实现在图片位置1列显示 图片2列选定行的网址呢 Dim dr As Row = Tables("表A").Current If e.Seneder.Name.StartsWith("rdo-") Then Dim pts = e.Sender.Name.Split("-") Dim wz As Integer = pts(1) \'位置 Dim tp As Integer = pts(2) \'要显示的图片编号 For w As Integer = 1 To 4 For t As Integer = 1 To 10 If e.Form.Controls("dro-" & w & t).Checked Then dr("图片位置" & w) = e.Form.Controls("dro-" & w & t).Text Exit For End If Next End If |
||||
-- 作者:狐狸爸爸 -- 发布时间:2016/10/24 7:23:00 -- 是Sender,不是Seneder,错误提示,已经告诉你了啊 |