共10 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：[求助]关于数据表表名和标题重命名的问题
1楼
hyx 发表于：2011/9/15 22:36:00关于数据表表名和标题重命名的问题：
如下图
此主题相关图片如下：qq截图未命名.jpg
现在我有个A表里面记录了表名和标题的对应关系(表名是英文的，标题是中文的)，
可不可以在B表载入完成的时候，根据B表的表名从A表中查询出B表的标题，然后写入B表的标题中。
[此贴子已经被作者于2011-9-15 22:42:50编辑过]
2楼
czy 发表于：2011/9/15 22:57:00目前没有动态设置表标题的方法。
3楼
狐狸爸爸 发表于：2011/9/15 22:57:00
4楼
czy 发表于：2011/9/15 23:05:00以下是引用狐狸爸爸在2011-9-15 22:57:00的发言：
可以的，很简单：
有动态设置表标题的方法？
5楼
狐狸爸爸 发表于：2011/9/15 23:08:00惭愧，是我自己看错了，居然还教训楼主，自打30板
对不起了，楼主，这个不能用代码设置的。
6楼
hyx 发表于：2011/9/15 23:16:00那有没有其他办法可以实现这个功能的？？？？
急用、、、、迷惘中。。。。。。。
7楼
程兴刚 发表于：2011/9/15 23:20:00等下一次更新！
8楼
don 发表于：2011/9/16 7:39:00以下是引用狐狸爸爸在2011-9-15 23:08:00的发言：
惭愧，是我自己看错了，居然还教训楼主，自打30板
对不起了，楼主，这个不能用代码设置的。
--------------------------------------------------------------------
板下留人,慢打!俺有一笨方法,看看能否解楼主燃眉之急?
For Each r As Row In Tables("A").rows
If Tables(r("TableName")).DataTable.Caption <> r("Caption") Then
MainTable = Tables(r("TableName"))
Sendkeys.Send("{Tab}" & r("Caption") & "{Tab}~" )
Syscmd.Table.Rename()
End If
Next
MainTable = Tables("B")
[此贴子已经被作者于2011-9-16 8:10:28编辑过]
9楼
狐狸爸爸 发表于：2011/9/16 8:22:00为何不在添加外部表的时候，直接指定一个中文名？
10楼
don 发表于：2011/9/16 8:55:00可能标题是动态变化的吧
共10 条记录, 每页显示 10 条, 页签:
[1]