以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  双击行号单元格的问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=103956)

--  作者:蓝蚂蚁
--  发布时间:2017/7/20 11:35:00
--  双击行号单元格的问题
表的结构和内容如下:
产品编号   产品名称   规格  单位     .........
C5601     螺钉         5#    枚       .........
我想双击该行的行号单元格时,弹出窗口 ,如何在这个窗口的文本框显示该行的内容【里面只有一个文本框(设置多行显示)】
如图:
图片点击可在新窗口打开查看此主题相关图片如下:文本框信息.png
图片点击可在新窗口打开查看
谢谢

--  作者:有点甜
--  发布时间:2017/7/20 11:41:00
--  
Dim r As Row = Tables("表A").current
Dim str As String = ""
For Each c As Col In r.Table.cols
    str &= c.name & ":" & r(c.name) & vbcrlf
Next
msgbox(str)