以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- form中间插入文字 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=150765) |
-- 作者:fubblyc -- 发布时间:2020/6/6 21:57:00 -- form中间插入文字 wb.AddForm("","form2","tongjibiao222jg.htm") \'表单显示在第一个页面 With wb.AddInputGroup("form2","ipg1","请选择统计期间") .AddHiddenValue("zhangtao",e.PostValues("zhangtao")) \'隐藏选定后的账套 不显示 With .AddInput("d1","开始日期","date") Dim d As Date Dim y As Integer = Date.Today.Year Dim m As Integer = Date.Today.Month d = y & "-" & m & "-1" .Value = Format(d,"yyyy-MM-dd") .Attribute = "" End With With .AddInput("d2","结束时间","date") .Value = Format(Date.Today,"yyyy-MM-dd") .Attribute = "" End With End With wb.InsertHTML("<h5 style=\'margin-left:0.8em; margin-top:0.5em\' >卡号较多时,可分别选看2个卡号,方便手机查看.</h5>") With wb.AddCheckGroup("form2","卡号","请选择要显示的卡号") For Each dr As DataRow In DataTables("卡号设置").sqlSelect("账套 = \'" & e.PostValues("zhangtao") & "\' and 币种 = \'人民币\'") .Add(dr("卡号"),dr("卡号")).Attribute = "" Next End With 老师,明明把inserthtml放在了卡号前面,他显示在下面,是因为同一个form会放在一起的原因吗? 有什么办法可以实现放在卡号前面吗?不然放在下面怪怪的。 |
-- 作者:有点蓝 -- 发布时间:2020/6/7 20:49:00 -- wb.InsertHTML("form2","<h5 style=\'margin-left:0.8em; margin-top:0.5em\' >卡号较多时,可分别选看2个卡号,方便手机查看.</h5>") |