请教 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

共有2912人关注过本帖树形打印复制链接主题：请教

hbhb

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

加好友

发短信

等级：狐神帖子：5061 积分：13092 威望：0 精华：0 注册：2014/5/15 21:34:00

请教

Post By：2014/12/11 0:12:00 [只看该作者]

大师好!

请问:一个项目，希望实现如下功能，该如何实现？

希望第一次打开项目，如果客户按按钮1，就提示首先必须进行一项设置按按钮2，如果没有设置就进行提示，设置完后，以后打开项目按按钮1就不提示，如何搞？

Bin

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

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/12/11 8:03:00 [只看该作者]

用SaveConfigValue来储存是否有按个按钮1

或者存到注册表去

http://www.foxtable.com/help/topics/2051.htm

hbhb

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

加好友

发短信

等级：狐神帖子：5061 积分：13092 威望：0 精华：0 注册：2014/5/15 21:34:00

Post By：2014/12/11 11:01:00 [只看该作者]

谢谢！

那SaveConfigValue初始赋值，何时在哪里写代码？发布前用命令窗口，还是如何搞？

有点甜

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

加好友

发短信

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

Post By：2014/12/11 11:05:00 [只看该作者]

执行一次SaveConfigValue，然后发布项目

hbhb

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

加好友

发短信

等级：狐神帖子：5061 积分：13092 威望：0 精华：0 注册：2014/5/15 21:34:00

Post By：2014/12/11 11:09:00 [只看该作者]

我是这样搞的，有无更好的方法？

有点甜

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

加好友

发短信

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

Post By：2014/12/11 11:11:00 [只看该作者]

以下是引用hbhb在2014-12-11 11:09:00的发言：
我是这样搞的，有无更好的方法？

不需要赋初值，因为没有意义。

取值的时候，如果没有取到，就会用默认值的

hbhb

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

加好友

发短信

等级：狐神帖子：5061 积分：13092 威望：0 精华：0 注册：2014/5/15 21:34:00

Post By：2014/12/11 11:37:00 [只看该作者]

谢谢！我讲的是，设计时有可能已经赋过初始值了，项目初始化时，可对表数据初始化，对以上的存储值初始化，有无统一的办法进行？

有点甜

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

加好友

发短信

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

Post By：2014/12/11 11:39:00 [只看该作者]

木有，发布之前，统一设置一次。

hbhb

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

加好友

发短信

等级：狐神帖子：5061 积分：13092 威望：0 精华：0 注册：2014/5/15 21:34:00

Post By：2014/12/11 11:53:00 [只看该作者]

再请教，如示例，请问如何用代码在表a中找到c、d、e、f都出现的列号？

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目4.zip

有点甜

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

加好友

发短信

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

Post By：2014/12/11 12:00:00 [只看该作者]

Dim dt As DataTable = DataTables("表A")
Dim ary() As String = {"a", "b", "c", "d"}
For Each dc As DataCol In dt.DataCols
    Dim vs As object = dt.GetValues(dc.name)
    Dim flag As Boolean = True
    For Each a As String In ary
        If vs.contains(a) = False Then
            flag = False
        End If
    Next
    If flag Then
        msgbox(dc.name)
    End If
Next

下一主题 >> << 上一主题

总数 12 1 2 下一页

主题：请教