Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共4 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:程序代码求教

1楼
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

2楼
狐狸爸爸 发表于: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
3楼
btsfdz 发表于:2008/9/9 15:53:00
谢谢老师指教,看帮助了,总是一头雾水,英文太差了,还请老师多指教
4楼
blackzhu 发表于:2008/9/9 17:13:00
以下是引用btsfdz在2008-9-9 15:53:00的发言:
谢谢老师指教,看帮助了,总是一头雾水,英文太差了,还请老师多指教

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

共4 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .01563 s, 2 queries.