Foxtable(狐表)用户栏目专家坐堂 → 表达式列能否批量修改数据?


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

主题:表达式列能否批量修改数据?

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


加好友 发短信
等级:婴狐 帖子:43 积分:360 威望:0 精华:0 注册:2015/7/8 13:44:00
表达式列能否批量修改数据?  发帖心情 Post By:2015/8/31 17:14:00 [显示全部帖子]

各位老师,请问如果有很多表达式列,我能否批量修改表达式列里面的函数呀?就是我打开表结构可以清楚看到表达式列的计算方法,但是如何批量修改呢?
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20150831171134.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:婴狐 帖子:43 积分:360 威望:0 精华:0 注册:2015/7/8 13:44:00
  发帖心情 Post By:2015/9/7 11:41:00 [显示全部帖子]

大红袍老师,我又出现新问题了,现在做了Excel报表以后,只能调用一行数据,其它行的数据,即便我设定了9行也是重复的,不能自动补空格,也不能调用多行数据,我用的是哪个你帮我写过调用多张图片代码的表,会不会是代码哪里有什么问题呀?需要怎么改动呀?“尺码表”为父表,“订单明细”为子表。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:invoice.xls


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


加好友 发短信
等级:婴狐 帖子:43 积分:360 威望:0 精华:0 注册:2015/7/8 13:44:00
  发帖心情 Post By:2015/9/7 13:36:00 [显示全部帖子]

大红袍老师,我上传了具体例子,请帮我看看报表出错的原因,谢谢!
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:desktop.rar


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


加好友 发短信
等级:婴狐 帖子:43 积分:360 威望:0 精华:0 注册:2015/7/8 13:44:00
  发帖心情 Post By:2015/9/7 16:29:00 [显示全部帖子]

谢谢大红袍老师的悉心教导,虽然我还是云里雾里一头雾水,不过我会尽量认真学习的,我刚才试过,其它功能OK了,不过我调用的图片是从第三个表里调用的,现在显示图片只能一个重复图片,而且我的“订单明细”表变得非常慢,指针会一个个往上跳,好崩溃呀,好折磨人呀,呜呜呜!

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


加好友 发短信
等级:婴狐 帖子:43 积分:360 威望:0 精华:0 注册:2015/7/8 13:44:00
  发帖心情 Post By:2015/9/7 16:48:00 [显示全部帖子]

大红袍老师,我在“订单明细”表的currentchange里面写的代码是这样的:图片表里的图片实在是太多了,我有必要全部拷贝到“订单明细”表里面吗?

If e.Table.Current IsNot Nothing Then
    Dim dx As Integer = Tables("图片").FindRow("[款号] = '" & e.Table.current("款号") & "'")
    If dx >= 0 Then     
        Tables("图片").Position = dx 
    End If
End If

Dim dr As DataRow = e.Table.Current.DataRow
Dim wz As Integer = Tables("尺码表").FindRow(dr)
If wz >=0 Then
      Tables("尺码表").Position = wz
End  If

MyTimers("计划1").Enabled = True


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


加好友 发短信
等级:婴狐 帖子:43 积分:360 威望:0 精华:0 注册:2015/7/8 13:44:00
  发帖心情 Post By:2015/9/7 17:15:00 [显示全部帖子]

表达式列引用其它表的图片进去?完全不懂呀,彻底崩溃了。
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20150907171319.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:婴狐 帖子:43 积分:360 威望:0 精华:0 注册:2015/7/8 13:44:00
  发帖心情 Post By:2015/9/9 12:09:00 [显示全部帖子]

大红袍老师,请帮我看看代码,我不知道是不是我哪里写错了,我三个表需要联动,一个“图片表”,一个“订单明细”表,一个"尺码表"。我在“订单明细”表的currentchange里面写的代码是这样的,我百思不得其解,为什么三个表就是不能同时定位呀?好郁闷呀。“图片”和“订单明细”靠“款号”联,“订单明细”和“尺码表”靠“PO”关联。

 

If e.Table.Current Is Nothing Then '如果Current为Nothing
    Return '则返回 '没有选定行时执行的代码
Else
     Dim dx As Integer = Tables("图片").FindRow("[款号] = '" & e.Table.current("款号") & "'")

    If dx >= 0 Then     

        Tables("图片").Position = dx 

    End If

End If

    Dim wz As Integer

    Dim dr As DataRow

        dr = DataTables("尺码表").Find("[PO] = '" & e.Table.Current("PO") & "'")

    If dr IsNot Nothing Then

    wz = Tables("尺码表").FindRow(dr)

    If wz >= 0 Then

        Tables("尺码表").Position = wz

    End If  '有选定行时执行的代码
End If


 回到顶部