Foxtable(狐表)用户栏目专家坐堂 → 改逻辑开关的显示字体内容


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

主题:改逻辑开关的显示字体内容

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/2/3 14:05:00 [显示全部帖子]

到浏览器测试页面,打开开发者工具,看逻辑开关的文字使用的是什么css类,按照上面代码用法改即可

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/2/3 15:24:00 [显示全部帖子]

打开开发者工具,您看到看逻辑开关的文字使用的是什么css类?又写了什么和这个类有关的代码?


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/2/3 15:29:00 [显示全部帖子]

wb.AppendHTML("<style>.weui_cell_switch .weui_cell_hd{color:dodgerblue;}</style>",True)

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/2/3 15:50:00 [显示全部帖子]

AddSwtich(ID, Label, Checked)

ID开关ID。
Label在开关左侧显示的标签内容
Checked逻辑型,可选参数,开关默认是否处于开启状态。

Dim mr As DataRow = DataTables("疫情表").sqlfind("身份证号='"& dr("身份证号") & "' and 是否正常='异常'")
        If mr isnot nothing andalso mr("咳嗽")="咳嗽"
            .AddSwitch("咳嗽","咳嗽",True)           
        Else
            .AddSwitch("咳嗽","咳嗽")
        End If

 回到顶部