以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]报表设计器打不开  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=124937)

--  作者:liumiao123
--  发布时间:2018/9/17 8:14:00
--  [求助]报表设计器打不开

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看
请问老师这是什么情况呢~~
我装的是WORD 2016~
是不是不支持啊~~

图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2018/9/17 8:55:00
--  

1、

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=54396&replyID=360697&skin=1

 

2、如果1无法修复,就重新安装一下wps。


--  作者:liumiao123
--  发布时间:2018/9/18 8:22:00
--  回复:(有点甜)1、 http://www.foxtable...
请问老师这个怎么实现自动统计里面的数量~~

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180918081815.png
图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2018/9/18 9:09:00
--  

datacolchanged事件

 

If e.datacol.name = "号码" Then

    e.datarow("数量") = iif(e.datarow("号码") = nothing, nothing, e.datarow("号码").split(",").length)

End If


--  作者:liumiao123
--  发布时间:2018/9/18 12:09:00
--  回复:(有点甜)datacolchanged事件 If e.d...
谢谢老师~解决了··
请老师帮忙看下这段代码·
----------------------------------------------

Dim pbx As WinForm.PictureBox = e.Sender
Dim r As Row = Tables("表C").Current
If r IsNot Nothing Then
    If r("状态") = True And  r("正常") = False  Then
        e.File = "正常.png" \'显示正常图片
    Else
        If r("状态") = True And  r("异常") = True  Then
            e.File = "异常.png" \'显示异常图片
        Else            
            e.File = "" \'不显示图片
            
        End If
    End If
End If


-------------------------------
我想实现自动判断-如果状态列·现实正常·那图片就是正常··请问老师·哪里错了呢··现实的错误不认识~

--  作者:有点甜
--  发布时间:2018/9/18 12:25:00
--  

1、绑定状态列

 

http://www.foxtable.com/webhelp/scr/0704.htm

 

2、写5楼的代码,图片文件拷贝到images文件夹下

 

3、如果还有问题,做个例子上来测试


--  作者:liumiao123
--  发布时间:2018/9/18 12:55:00
--  回复:(有点甜)1、绑定状态列 http://www....
老师·帮忙看下··
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip


--  作者:有点甜
--  发布时间:2018/9/18 14:51:00
--  
Dim pbx As WinForm.PictureBox = e.Sender
Dim r As Row = Tables("表C").Current
If r IsNot Nothing Then
    If r("状态") = "正常" Then
        e.File = "正常.png" \'显示正常图片
    Else
        If r("状态") = "异常"  Then
            e.File = "异常.png" \'显示异常图片
        Else
            e.File = "" \'不显示图片
           
        End If
    End If
End If

--  作者:liumiao123
--  发布时间:2018/9/18 15:44:00
--  回复:(有点甜)Dim pbx As WinForm.PictureBox = e....
谢谢甜老师··图片点击可在新窗口打开查看图片点击可在新窗口打开查看图片点击可在新窗口打开查看·
--  作者:liumiao123
--  发布时间:2018/9/19 14:52:00
--  回复:(liumiao123)回复:(有点甜)Dim pbx As Win...
请老师帮忙看下~~
我有个订单状态·出现欠单的·就出现在TopicBar里面·
我的代码如下··老师请问哪里出错了·

[此贴子已经被作者于2018/9/19 14:56:26编辑过]