以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]webui的表格宽度问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=134745) |
-- 作者:nuhou -- 发布时间:2019/5/5 20:32:00 -- [求助]webui的表格宽度问题 用的webui生成的表格,好像不管多少列,手机上都会限制整体表格的宽度正好等于屏幕的宽度。 如果表格的列比较多,某列的内容多一点的话,那一行的行高就被拉的很高,或者在低分辨率的手机上显示效果很差。
能不能设置好每列固定的宽度,如果整体超过了手机的宽度,则可以左右滚动条,使得每行的行高不会拉的过高 |
-- 作者:有点蓝 -- 发布时间:2019/5/5 21:15:00 -- 参考: Select Case e.Path Case "table.htm" Dim wb As New WeUI wb.InsertHTML("","<div id=\'div1\' style=\'overflow-x:auto;width:100%\'>") With wb.AddTable("","Table1") .Attribute = "style=\'width:1000px\'" .head.AddRow("部门","姓名","年龄","电话","地址") \'表头 .body.AddRow("技术部","张三","36","110","中国北京中国北京中国北京中国北京中国北京") \'数据 .body.AddRow("技术部","李四","38","110","中国上海") .body.AddRow("技术部","王五","39","110","中国深圳") .body.AddRow("生产部","赵六","39","110","中国深圳") .body.AddRow("生产部","刘七","39","110","中国深圳") End With wb.InsertHTML("form2","</div>") e.WriteString(wb.Build) End Select |