Foxtable(狐表)用户栏目专家坐堂 → [求助]求窗口控件Label的动态用法!祝大神们春节快乐,万事如意


  共有3981人关注过本帖树形打印复制链接

主题:[求助]求窗口控件Label的动态用法!祝大神们春节快乐,万事如意

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/2/25 17:44:00 [显示全部帖子]

例如代码

 

Forms("窗口1").Controls("Label1").Text = Tables("表A").Compute("sum(金额)")


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/2/25 19:00:00 [显示全部帖子]

Dim Total As Integer
Dim Amount As Double
With DataTables("销售明细账")
    Total = .Compute("Sum(数量)")
    Amount = .Compute("Sum(实付金额)")
End With
 

Forms("窗口1").Controls("Label1").Text = "数量:" & Total

Forms("窗口1").Controls("Label2").Text = "金额:" & Amount

 回到顶部