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


  共有1809人关注过本帖树形打印复制链接

主题：专业报表的单选框、复选框如何实现？
帅哥哟，离线，有人找我吗？
lin98
 小大  11楼 | 信息 | 搜索 | 邮箱 | 主页 | 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编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107825 积分：548476 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/10/20 10:50:00 [只看该作者]

Dim s As String = "爱好："
Dim ah As String = CurRow("爱好")
msgbox(ah) 显示什么内容
If ah.contains("书法") Then
s = s & "口"
 回到顶部
帅哥哟，离线，有人找我吗？
lin98
 小大  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1145 积分：7566 威望：0 精华：0 注册：2020/11/4 22:15:00 		  发帖心情 Post By：2023/10/20 10:54:00 [只看该作者]

Dim s As String = "爱好："
Dim ah As String = CurRow("爱好")
msgbox(ah) 显示什么内容
这个显示正确，
但专业报表显示是下行的数据
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107825 积分：548476 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/10/20 10:58:00 [只看该作者]

那就是其它代码影响了

 回到顶部
帅哥哟，离线，有人找我吗？
lin98
 小大  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1145 积分：7566 威望：0 精华：0 注册：2020/11/4 22:15:00 		  发帖心情 Post By：2023/10/20 11:08:00 [只看该作者]





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

msgbox(ah) '显示什么内容
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:43编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107825 积分：548476 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/10/20 11:09:00 [只看该作者]

调换位置


If ah.contains("书法") Then
    s = s & "■"
Else
    s = s & "口"
End If
 回到顶部
帅哥哟，离线，有人找我吗？
lin98
 小大  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1145 积分：7566 威望：0 精华：0 注册：2020/11/4 22:15:00 		  发帖心情 Post By：2023/10/20 11:31:00 [只看该作者]

"■"太小如何调大？

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  18楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107825 积分：548476 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2023/10/20 11:44:00 [只看该作者]

设置字体大小：http://www.foxtable.com/webhelp/topics/1183.htm
[此贴子已经被作者于2023/10/20 11:44:51编辑过]
 回到顶部
总数 18 上一页 1 2
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 4 次数据查询