以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  没有明细数据，点复制就出错  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=91860)
--  作者：weijun
--  发布时间：2016/10/20 15:02:00
--  没有明细数据，点复制就出错

.NET Framework 版本：2.0.50727.3053
Foxtable 版本：2016.7.29.1
错误所在事件：窗口,调拨单,Button8,Click
详细错误信息：
未将对象引用设置到对象的实例。

 

没有明细数据，点复制就出错，用代码写弹出窗口 “提示没有明细数据” 怎样编写
--  作者：weijun
--  发布时间：2016/10/20 15:04:00
--  
CurrentTable.Current.Clone
--  作者：狐狸爸爸
--  发布时间：2016/10/20 15:20:00
--  
if currenttable.Position >=0 then
    CurrentTable.Current.Clone
end if
--  作者：weijun
--  发布时间：2016/10/20 15:46:00
--  
If Tables("调拨单.调拨单明细").Position >=0 Then
    Tables("调拨单.调拨单明细").Current.Clone() \'克隆当前表的第一行
    \'End If   
Else
    messagebox.Show("没有明细复制")
End If