- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 函数怎么用 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=111467)
-- 发布时间：2017/12/22 15:25:00
-- 函数怎么用
大神帮我解答一下示例
此主题相关图片如下：ljqq.jpg
：如图f21行的第一个0对比第2行的第一个9，我的函数表达式是：如果f2,1的第一=如果f2,2的第一，等就是是，不等就不。2比3，3比4，往下填充
-- 发布时间：2017/12/22 15:36:00
--
Dim t As Table = Tables("表A")
For i As Integer = 1 To t.rows.count-1
Dim r1 As Row = t.rows(i-1)
Dim r2 As Row = t.rows(i)
If r1.IsNull("第一列") OrElse r2.IsNull("第一列") Then
r2("第二列") = "不"
Else
If r1("第一列").substring(0,1) = r2("第一列").substring(0,1) Then
r2("第二列") = "是"
Else
r2("第二列") = "不"
End If
End If
Next
-- 发布时间：2017/12/22 15:42:00
--
谢谢
-- 发布时间：2017/12/25 11:20:00
--
请教群组对比的函数怎么写，r1对比（r2到r10）,如果（r2到r10）有和r1相同的就“有”要么“无”。谢谢
此主题相关图片如下：qq图片20171225111450.jpg
-- 发布时间：2017/12/25 12:09:00
--
Dim t As Table = Tables("表A")
For i As Integer = 0 To t.rows.count-1
Dim r1 As Row = t.rows(i)
Dim flag As String = "无"
For j As Integer = i+1 To t.rows.count-1
Dim r2 As Row = t.rows(j)
If r1.IsNull("第一列") = False AndAlso r2.IsNull("第一列") = False AndAlso r1("第一列").substring(0,1) = r2("第一列").substring(0,1) Then
flag = "有"
Exit For
End If
Next
r1("第二列") = flag
Next
-- 发布时间：2017/12/25 12:14:00
--
谢谢
-- 发布时间：2017/12/25 12:56:00
--
不好意思，我表达的不够明白，对比的是1行和{2行到10行}的第1个数字，就是{2行到10行}的第一个数字中有1行的数字，结果列就显示“有”要么“无”。2行对比{3行到11行}往下推对比。上图例应该第一个结果是“无”吧
-- 发布时间：2017/12/25 12:59:00
--
不好意思，我表达的不够明白，对比的是1行和{2行到10行}的第1个数字，就是{2行到10行}的第一个数字中有1行第一个的数字，结果列就显示“有”要么“无”。2行对比{3行到11行}往下推对比。上图例应该第一个结果是“无”吧
-- 发布时间：2017/12/25 14:15:00
--
Dim t As Table = Tables("表A")
For i As Integer = 0 To t.rows.count-10
Dim r1 As Row = t.rows(i)
Dim flag As String = "无"
For j As Integer = i+1 To i+9
Dim r2 As Row = t.rows(j)
If r1.IsNull("第一列") = False AndAlso r2.IsNull("第一列") = False AndAlso r1("第一列").substring(0,1) = r2("第一列").substring(0,1) Then
flag = "有"
Exit For
End If
Next
r1("第二列") = flag
Next
-- 发布时间：2018/5/15 10:06:00
--
如图f21行的第一个0对比第2行的第一个9，我的函数表达式是：如果f2,1的第一等于f2,2的第一，等就是是，不等就不。2比3，3比4，往下对比到第20行，假如f21行的第一个对比第2行的第一个的结果是（是）那么执行这样的一个代码：2比3，3比4，往下对比到第20行的结果里有（是）的结果，第2列显示（是有），2比3，3比4，往下对比到第20行的结果里无（是）的结果，第2列显示（是有）！假如f21行的第一个对比第2行的第一个的结果是（不）那么不执行上面的代码。