以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  ExWeUI扩展控件Radio/Check 项各占用一行的设置?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=186990)

--  作者:一笑
--  发布时间:2023/6/13 10:06:00
--  ExWeUI扩展控件Radio/Check 项各占用一行的设置?

ExWeUI扩展控件,列表项可以和客户端的单选框一样在一排显示。如果想单/复选列表Radio/Check 项一个选项占用一行,如何设置?谢谢!

--  作者:有点蓝
--  发布时间:2023/6/13 10:23:00
--  
这种建议使用weui的控件,比如:http://www.foxtable.com/mobilehelp/topics/0053.htm
--  作者:一笑
--  发布时间:2023/6/13 10:50:00
--  
因为ExWeUI扩展控件界面好看,现在想做个线上考试的选择题网页,WEUI的界面有点不搭,还请老师完善,谢谢
--  作者:有点蓝
--  发布时间:2023/6/13 11:35:00
--  
学会使用样式控制就行了

Dim e As RequestEventArgs = args(0)
Dim wb As New weui
wb.AppendHTML("<link rel=\'stylesheet\' href=\'./weui/exweui.css\'/>",True)
wb.AppendHTML("<script src=\'./weui/exweui.js\' ></script>",True)
wb.AddForm("","form1","testRes.htm")
Dim rdg As ExWeUI.ExRadioGroup = ExWeUI.WebUI.AddRadioGroup("","rdg1","横排,自动换行显示<span style=\'float:right;color:red\' id=\'v1\'></span>")
rdg.add("rd1","Microsoft Edge")
rdg.add("rd2","Google Chorme")
rdg.add("rd3","FireFox")
wb.InsertHTML("form1", rdg.BuildHtml)
wb.AppendHTML("<script>document.getElementById(\'rd1\').parentNode.parentNode.style.flexFlow = \'column\';document.getElementById(\'rd1\').parentNode.parentNode.style.alignItems = \'flex-start\';</script>"): 
e.WriteString(wb.Build) \'生成网页