以文本方式查看主题

-  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=390)

--  作者:btsfdz
--  发布时间:2008/9/9 15:43:00
--  程序代码求教

有两个表分别是表1和表2,要想让表1的列标题显示的表2第二列的内容该如何编写代码,我写了一个老不对请老师指教
With Tables("表1")
    .Cols("kx1").Caption = Tables("表2").cols("第二列").current=1\'获取表2第二列第一行的内容
    .Cols("kx2").Caption = Tables("表2").cols("第二列").current=2\'获取表2第二列第二行的内容
    .BuildHeader() \'
End With


--  作者:狐狸爸爸
--  发布时间:2008/9/9 15:49:00
--  
呵呵,怀疑你根本没有看帮助,怎么会错得这么离谱呢?

正确:

With Tables("表1")
    .Cols("kx1").Caption = Tables("表2").Rows(0)("第二列")
    .Cols("kx2").Caption = Tables("表2").Rows(1)("第二列")
    .BuildHeader()
End With
--  作者:btsfdz
--  发布时间:2008/9/9 15:53:00
--  
谢谢老师指教,看帮助了,总是一头雾水,英文太差了,还请老师多指教
--  作者:blackzhu
--  发布时间:2008/9/9 17:13:00
--  
以下是引用btsfdz在2008-9-9 15:53:00的发言:
谢谢老师指教,看帮助了,总是一头雾水,英文太差了,还请老师多指教

  我也,英文底子太差,看不懂代码。其他问题不大。