以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]同一列如何比较数据并赋值  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=75253)

--  作者:whaa
--  发布时间:2015/10/1 13:58:00
--  [求助]同一列如何比较数据并赋值

 

 

比较列”交易比例“中每场次的交易比例赋予最大两个比例的值,并自动在交易表达式中显示最大两项比例,如图片所示,请教如何写代码

 

 


图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2015/10/6 21:07:28编辑过]

--  作者:sloyy
--  发布时间:2015/10/1 21:30:00
--  
把图片作为附件上传
--  作者:大红袍
--  发布时间:2015/10/4 11:52:00
--  

上传图片或者项目

 

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78

 


--  作者:whaa
--  发布时间:2015/10/7 8:35:00
--  
改了
--  作者:大红袍
--  发布时间:2015/10/7 9:21:00
--  

必须编写代码,DataColChanged事件

 

Select Case e.DataCol.name
    Case "第一列","第二列","第三列"
        Dim drs As List(Of DataRow) = e.DataTable.Select("第一列 = \'" & e.DataRow("第一列") & "\'", "第二列 desc")
        Dim str As String = ""
        If drs.count > 1 Then
            str &= drs(0)("第三列")
        End If
        If drs.count > 2 Then
            str &= drs(1)("第三列")
        End If
        For Each dr As DataRow In drs
            dr("第四列") = str
        Next
End Select


--  作者:whaa
--  发布时间:2015/10/7 19:13:00
--  

这几天发现不能全COPY记事本的代码到代码编辑器上,总是缺少东西,另一个情况是输入任何字符会自动删除代码.... 这是什么原因?难道安装的输入法同FOXTABLE上快捷键冲突?

[此贴子已经被作者于2015/10/7 19:13:37编辑过]

--  作者:大红袍
--  发布时间:2015/10/7 19:21:00
--  

呃,不应该,你用的是正版还是盗版还是试用版?

 


--  作者:whaa
--  发布时间:2015/10/7 23:12:00
--  

直接官方网站下载的,是否是因为试用版本?一直在测试使用还未购买正版,想熟悉点才购买。


--  作者:大红袍
--  发布时间:2015/10/7 23:19:00
--  
有可能是试用版过期了,一般用三个月左右就会到期的。