专业报表的单选框、复选框如何实现？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 专业报表的单选框、复选框如何实现？

共有1825人关注过本帖平板打印复制链接主题：专业报表的单选框、复选框如何实现？

lin98

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：五尾狐帖子：1145 积分：7566 威望：0 精华：0 注册：2020/11/4 22:15:00

Post By：2023/10/20 10:47:00 [只看该作者]

Dim s As String = "爱好："

Dim ah As String = CurRow("爱好")

If ah.contains("书法") Then

s = s & "口"

Else

s = s & "■"

End If

s = s & "书法"

If ah.contains("跑步") Then

s = s & "口"

Else

s = s & "■"

End If

s = s & "跑步"

If ah.contains("唱歌") Then

s = s & "口"

Else

s = s & "■"

End If

s = s & "唱歌"

If ah.contains("种花") Then

s = s & "口"

Else

s = s & "■"

End If

s = s & "种花"

[此贴子已经被作者于2023/10/20 11:15:13编辑过]

总数 18 1 2 下一页

主题：专业报表的单选框、复选框如何实现？