以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  复制到另外的表格怎么做啊  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=51803)

--  作者:yangwenghd
--  发布时间:2014/6/3 20:27:00
--  复制到另外的表格怎么做啊
点击按钮怎么把当时选中的行复制到窗口显示的编号行里面啊!感谢 感谢
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20140603202304.jpg
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:复制行.table



--  作者:有点甜
--  发布时间:2014/6/3 20:39:00
--  

 代码

 

Dim fdr As DataRow = DataTables("表B").Find("第一列 = \'" & e.Form.Controls("Label1").Text & "\'")
If fdr IsNot Nothing Then
    fdr("第二列") = Tables("表A").Current("第一列")
    fdr("第三列") = Tables("表A").Current("第二列")
End If


--  作者:yangwenghd
--  发布时间:2014/6/3 20:57:00
--  
如果根据窗口显示的编号去打开第一列的电子邮件和第二列的QQ吗?
--  作者:有点甜
--  发布时间:2014/6/3 21:00:00
--  

Dim Proc As New Process \'定义一个新的Process
Proc.File = Tables("表A").Current("第一列")
Proc.Start()

 

Proc = New Process \'定义一个新的Process
Proc.File = Tables("表A").Current("第二列")
Proc.Start()

[此贴子已经被作者于2014-6-3 21:00:32编辑过]