以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何一行多列的显示加减控件?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=175080)

--  作者:wh420
--  发布时间:2022/2/18 17:12:00
--  如何一行多列的显示加减控件?
如图,如何让一行显示两列或多列加减控件,可否代码举个例子?(一行两列)

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


--  作者:有点蓝
--  发布时间:2022/2/18 17:14:00
--  
目前不支持
--  作者:wh420
--  发布时间:2022/2/18 17:21:00
--  
如果用原生网页如何实现呢?有没有例子可参考一下。
一行一个控件太浪费空间了,手机屏本来就小应该充分利用可显示内容空间。

--  作者:有点蓝
--  发布时间:2022/2/18 17:28:00
--  
2个控件并排,就直接放到一起即可:比如2个文本框:
<input type="text" name="fname" /><input type="text" name="fname2" />

如果说要重新使用原生html做2个加减控件,现在没有这个功夫。您可以使用开发者根据分析源代码自己提取出来使用

--  作者:wh420
--  发布时间:2022/2/22 14:24:00
--  
如何在表格中放入加减控件?如下代码红色部分
Dim ipg As ExWeUI.ExInputGroup = ExWeUI.WebUI.AddInputGroup("","ipg1","默认")

With wb.AddTable("","Table1")
    .head.AddRow("部门","姓名","年龄","电话","地址") \'表头
    .body.AddRow(ipg.AddSpinner("sp01","数量")) \'数据
End With

--  作者:有点蓝
--  发布时间:2022/2/22 15:00: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>")
wb.AppendHTML("<style >#ipg1 .weui_cell_hd{display: none;}</style>")
With wb.AddTable("","Table1")
    .head.AddRow("部门","姓名","年龄","电话","地址") \'表头
    .body.AddRow("技术部","张三","36","110","中国北京") \'数据
    Dim ipg As ExWeUI.ExInputGroup = ExWeUI.WebUI.AddInputGroup("","ipg1","")
    ipg.AddSpinner("sp01",".")
    .body.AddRow(ipg.BuildHtml,"李四","38","110","中国上海")
End With

wb.AppendHTML("<script>initExWeUI();</script>")
e.WriteString(wb.Build)

--  作者:wh420
--  发布时间:2022/2/22 15:36:00
--  
下面代码为啥不显示LABEL名称?(标红处)
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>")
wb.AppendHTML("<style >#ipg1 .weui_cell_hd{display: none;}</style>")
With wb.AddTable("","Table1")
    Dim ipg As ExWeUI.ExInputGroup = ExWeUI.WebUI.AddInputGroup("","ipg1","默认")
    ipg.AddSpinner("sp01","数量")
    .body.AddRow(ipg.BuildHtml)
End With
wb.AppendHTML("<script>initExWeUI();</script>")
e.WriteString(wb.Build)


图片点击可在新窗口打开查看此主题相关图片如下:搜狗截图22年02月22日1535_1.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2022/2/22 15:36:50编辑过]

--  作者:有点蓝
--  发布时间:2022/2/22 15:38:00
--  
代码里屏蔽了,至于是那一句代码屏蔽的,自己找找
--  作者:wh420
--  发布时间:2022/2/22 17:25:00
--  
收到,问题解决。
我想调整一下如图框选WIDTH的数值,在代码里如何改?

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


--  作者:有点蓝
--  发布时间:2022/2/22 17:28:00
--  
自己在开发者工具里直接改值看效果,就知道要改哪个了