- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]图形化物料清单listview (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=116410)
-- 发布时间：2018/3/24 4:37:00
-- [求助]图形化物料清单listview
如图，我打开一个父项后，需要拖拽其他的子料到物料清单下的这个表，可以做到嘛？
或者简单意思就是，拖拽产生一个复制该拖拽对象的编号到我需要的表里，能做的到嘛？
先谢谢各位大神了
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:开发物料进程管理_201803232019.zip |
此主题相关图片如下：图形化物料清单.png.gif
-- 发布时间：2018/3/24 8:45:00
--
这个做不到。建议做个按钮，勾选后点击按钮进行添加
-- 发布时间：2018/3/26 2:10:00
--
Dim ddr As Row = Tables("物料详细_Table2").AddNew()
Dim lvw2 As WinForm.ListView = Forms("主窗口").Controls("ListView1")
Dim vr As WinForm.ListViewRow = lvw2.Current \'获取ListView的当前行
If vr Is Nothing Then \'如果不存在当前行,也就是内有选定任何一行
Return
End If
ddr("子键") = vr("编号")
ddr("父键") = Tables("物料").Current("编号")
双击打开窗口后指定父键，在LISTVIEW的行选择子项，直接用一个按钮生成
-- 发布时间：2018/3/26 9:05:00
--
回复3楼，如果还有其他问题，请详细说明。
-- 发布时间：2018/3/27 3:45:00
--
转了点弯，做了一个自己认为可以的，例子是毛胚，分享一下哈 另外请问怎么把大图片下面的标题做成两行的？比如第一行DR"编号，第二行DR(\'描述\')，相当于把我这个的文字放在图片的下面，搞了好久就只能显示一行
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:拖拽图形化bom_201803262228.zip |
-- 发布时间：2018/3/27 8:39:00
--
回复5楼这种情况的话，你就需要自己画listview里面的内容了，参考这个例子
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=116256&skin=0
画里面内容，参考这些知识点
http://www.foxtable.com/webhelp/scr/1482.htm
-- 发布时间：2018/3/27 8:41:00
--
回复5楼，如果好换行，最简单，就是这样写，如
Dim s1 As string = "123"
Dim s2 As String = "abc"
msgbox(s1 & vbcrlf & s2)