- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]如何在副本表中实现Crtl+D 复制列功能 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=88387)
-- 发布时间：2016/8/2 8:28:00
-- [求助]如何在副本表中实现Crtl+D 复制列功能
如何在副本表中实现Crtl+D 复制列功能
-- 发布时间：2016/8/2 10:44:00
--
顶一下。求解
-- 发布时间：2016/8/2 11:08:00
--
Ctrl+D是主菜单中的功能，如果这个副本表在独立窗口或模式窗口，是没有办法用Ctrl+D
但是你可以自己设置表的KeyDown事件：
http://www.foxtable.com/webhelp/scr/1642.htm
if e.Control= True AndAlso e.KeyCode = Keys.d Then
if e.Table.Position > 0 then
e.Table.Current(e.ColSel) = e.Table.Rows(e.position -1)(e.ColSel)
end if
end if
-- 发布时间：2016/8/2 11:15:00
--
此主题相关图片如下：1.png
狐狸爸爸，会出现 这样的错误，是不是因为我的表是副本表的原因。
-- 发布时间：2016/8/2 11:20:00
--
找到解决方法 了
If e.control = True AndAlso e.keycode = keys.d Then
Syscmd.Edit.RepeatFill()
End If
-- 发布时间：2016/8/2 11:20:00
--
但是狐爸，我还有一个问题。
[求助]Excel 导入时在其它列输入数据 
Post By：2016/8/2 8:51:00 [只看该作者]
Post By：2016/8/2 8:51:00 [只看该作者] 如下以代码，我想在导入BOM的同时，在父阶料号列输入父阶料号“１.００１.０１” 请问怎么实现。 Excel有列。物料代码|物料名称|物料规格|用量|单位 Foxtel有列。父阶料号|物料代码|物料名称|物料规格|用量|单位 Dim dlg As New OpenFileDialog \'定义一个新的OpenFileDialog dlg.Filter= "Excel文件|*.xls;*.xlsx" \'设置筛选器 If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮 Dim mg As New Merger mg.SourcePath = dlg.FileName mg.Format = "excel" \'指定格式 mg.SourceTableName = "sheet1$" \'指定要合并的表 mg.DataTableName = "BOM" \'指定接收数据的表 mg.Merge() \'开始合并 End If MessageBox.Show("全部导入完成","完成",MessageBoxButtons.OK,MessageBoxicon.Information) |
-- 发布时间：2016/8/2 11:29:00
--
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=88388