窗口控從副本表字段拉入產生錯誤?? - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 窗口控從副本表字段拉入產生錯誤??

共有6408人关注过本帖树形打印复制链接主题：窗口控從副本表字段拉入產生錯誤??

tennis

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

加好友

发短信

等级：六尾狐帖子：1433 积分：10763 威望：0 精华：0 注册：2013/3/29 10:23:00

Post By：2015/2/24 17:43:00 [只看该作者]

3Q!! 一只是修改了,但是出来的数据与实际行不同.

此主题相关图片如下：err.jpg

[此贴子已经被作者于2015/2/24 17:45:52编辑过]

有点甜

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

加好友

发短信

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

Post By：2015/2/24 17:46:00 [只看该作者]

以下是引用tennis在2015/2/24 17:43:00的发言：
3Q!! 一只是修改了,但是出来的数据与实际行不同.

我的意思是，叫你把 nd.Text 改成 nd.Name，没叫你拷贝全部代码过去。代码还是用你原先的代码。

tennis

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

加好友

发短信

等级：六尾狐帖子：1433 积分：10763 威望：0 精华：0 注册：2013/3/29 10:23:00

Post By：2015/2/25 7:10:00 [只看该作者]

3Q!! 請問如附圖如何解決,明明有8筆計算時確只有5筆

此主题相关图片如下：err1.jpg

有点甜

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

加好友

发短信

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

Post By：2015/2/25 9:00:00 [只看该作者]

已经跟你说过了啊，直接用Compute函数统计

你计算的是节点的个数啊。如果要计算表数据，参考来写 http://www.foxtable.com/help/topics/2741.htm

有点甜

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

加好友

发短信

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

Post By：2015/2/25 9:13:00 [只看该作者]

Dim tv As WinForm.TreeView = Forms("訊息主檔").Controls("Tvw_Left")
tv.nodes(0).text = tv.nodes(0).Name & " " & DataTables("訊息主檔").DataRows.Count & " 筆"
Dim ary As String() = Forms("訊息主檔").Controls("Cmb_FilterCol").Text.split(",")

For Each nd As WinForm.TreeNode In tv.AllNodes
    If IsDate(nd.Name) AndAlso nd.Name.Split(" ").Length > 1 AndAlso nd.Name.Split(" ")(1) = "00:00:00" Then
        nd.Text = nd.name.Split(" ")(0)
    End If
    'If nd.Nodes.Count > 0 Then   ' 顯示統計
        nd.Text = nd.name & " " & DataTables("訊息主檔").Select(ary(nd.Level) & "='" & nd.Name & "'").count & " 筆"
    'End If
Next