以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何获取选择图片是第几张  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=160637)

--  作者:鱼鱼鱼
--  发布时间:2021/2/9 11:38:00
--  [求助]如何获取选择图片是第几张
怎样获取在图片浏览器中选择图片的序号。
--  作者:有点蓝
--  发布时间:2021/2/9 11:46:00
--  
Dim r As Row = Tables("员工").Current
Dim pv As WinForm.PictureViewer = e.Form.Controls("PictureViewer1")
Dim s As String = FileSys.GetName(pv.SelectedItem)
msgbox(s)
Dim lst As List(of String) = r.DataRow.Lines("照片")
msgbox(lst.Indexof(s))

--  作者:鱼鱼鱼
--  发布时间:2021/2/9 11:55:00
--  
谢谢版主