以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 网页筛选怎么默认打开后对应框是空值 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=137093) |
-- 作者:巷弄太过弯曲 -- 发布时间:2019/6/28 8:35:00 -- 网页筛选怎么默认打开后对应框是空值 老师,请问我做了如图这个网页,我想要默认打开的时候“单据编号”“供应商”“单据状态”“制单人”的内容是空值,我现在打开默认就是输入了对应的值了 Select Case e.Path Case "cxym.htm" wb.AddForm("","form1","f.htm") Dim gjs As List(of String) = dt.sqlGetValues("单据编号") Dim aa As List(of String) = dt.sqlGetValues("供应商") Dim bb As List(of String) = dt.sqlGetValues("单据状态") Dim cc As List(of String) = dt.sqlGetValues("制单人") With wb.AddInputGroup("form1","ipg1","数据筛选") With .AddSelect("","单据编号", String.Join("|",gjs.ToArray)) \'.Attribute = """ End With With .AddSelect(" ","供应商", String.Join("|",aa.ToArray)) End With With .AddSelect(" ","单据状态", String.Join("|",bb.ToArray)) End With \' With.AddSelect(" ","制单人", String.Join("|",cc.ToArray)) End With |
-- 作者:有点甜 -- 发布时间:2019/6/28 9:18:00 -- 试试
With .AddSelect(" ","供应商", " |" & String.Join("|",aa.ToArray))
|
-- 作者:巷弄太过弯曲 -- 发布时间:2019/6/28 9:32:00 -- 可以了 谢谢老师 |