vb.net环境：c1flexgrid单元格如何像EXCEL那样进行判定计算？

收藏

这是EXCEL单元格的判断语句
=IF($U5=N$3,"●",IF(N4="●",1,N4+1))，那么c1flexgrid的单元格里，如何实现呢？

我自己的想法是：
dim value1,value2 as integer
value1 = _flex.GetData(6 i)
value2 = _flex.GetData(6, j)

if value1 = value2 then
。。。。。成立就调用imagelist，不成立就......

● 是不是要用上imagelist

但具体的语句该如何写呢？

ZenosZeng · ZenosZeng

你是说不知道怎么输入这个字符吗“●”，这是一个特殊字符，可以在输入法的特殊字符集中找到

zheng_hq · zheng_hq

就像附件里的图片那样。（不知怎么回事，发不起图片）

ZenosZeng · ZenosZeng

你只是想显示这个字符，你看以下代码是否满足你的需求：

_flex.SetData(1, 4, "●")
如果你觉得显示的有点小，可以设置该单元格的字体大小来调整"●"的大小

复制代码

运行效果：

zheng_hq · zheng_hq

主要实现计算效果
如果_flex(i,2) = _flex(i,7)，那么就显示 “●”，如果不成立就从显示自然数列 i （ 1234567......)

ZenosZeng · ZenosZeng

请参考以下代码：

Dim value2, value7 As Int32
For index As Int32 = 1 To 10
value2 = _flex.GetData(index, 2)
value7 = _flex.GetData(index, 7)
If value2 = value7 Then
_flex.SetData(index, 2, "●")
Else
_flex.SetData(index, 2, index)
End If
Next

复制代码

zheng_hq · zheng_hq

如果 c1flexgrid1(3，3)的数值 = 1 or 2 or 3 or 5 or 7,那么就在c1flexgrid(3 ,8)显示●，否则显示1
如果 c1flexgrid1(4，3)的数值 = 1 or 2 or 3 or 5 or 7,那么就在c1flexgrid(4 ,8)显示●; 否则：（如果这时c1flexgrid(3,8)=●，那么显示1；如果这时c1flexgrid(3,8)=1,那么增加1，显示2）

以此类推

这样的效果，如何写代码呢？

ZenosZeng · ZenosZeng

类似的代码吧：

Dim list As New ArrayList()
list.Add(1)
list.Add(2)
list.Add(3)
list.Add(5)
list.Add(7)
For index As Int32 = 3 To 6
If list.Contains(_flex.GetData(index, 3)) Then
_flex.SetData(index, 8, "●")
Else
_flex.SetData(index, 8, index)
End If
Next

复制代码

zheng_hq · zheng_hq

如果 c1flexgrid1(3，3)的数值 = 1 or 2 or 3 or 5 or 7,那么就在c1flexgrid(3 ,8)显示●，否则显示1
如果 c1flexgrid1(4，3)的数值 = 1 or 2 or 3 or 5 or 7,那么就在c1flexgrid(4 ,8)显示●; 否则：（如果这时c1flexgrid(3,8)=●，那么显示1；如果这时c1flexgrid(3,8)=1,那么增加1，显示2）

ZenosZeng · ZenosZeng

你只要稍微修改一下8楼中的代码，再写一个IF判断就可以实现了

		自动登录	找回密码
密码			立即注册

vb.net环境：c1flexgrid单元格如何像EXCEL那样进行判定计算？

15 个回复

本帖子中包含更多资源

利用c1flexgrid实现单元格的计算

本帖子中包含更多资源

本帖子中包含更多资源

对c1flexgrid单元格的计算

本帖子中包含更多资源

活字格认证

圣诞拼拼乐

微信认证勋章

讲师达人

元老葡萄

悬赏达人