请问，怎样用代码求出某一列是备注列？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 请问，怎样用代码求出某一列是备注列？

共有1548人关注过本帖树形打印复制链接主题：请问，怎样用代码求出某一列是备注列？

dogman

小大 1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：88 积分：1036 威望：0 精华：0 注册：2013/9/2 18:25:00

请问，怎样用代码求出某一列是备注列？ 发帖心情

Post By：2018/1/4 20:20:00 [只看该作者]

请问，怎样用代码求出某一列是备注列？

要求是这样的：在备注列中打开快捷菜单，也能像右击字符型列一样，可以用“文本筛选”的“包含”筛选出备注列中包含关键字的记录。

也就是希望将快捷菜单中的代码：StringFilter.Visible = c.IsString

能改成：StringFilter.Visible = c.IsString OrElse c.Is备注这样的句子就好了。图片点击可在新窗口打开查看

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/1/4 20:56:00 [只看该作者]

判断列的字符的长度即可，如

dim t as table = tables("表A")
msgbox(t.cols("第四列").DataCol.maxlength)
msgbox(t.cols("第十列").DataCol.maxlength)

如果maxlength=-1或者大于255的，而且isString的，就是备注列。

主题：请问，怎样用代码求出某一列是备注列？