以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  列表框放在中间,怎么显示不全?请教如何处理好呢?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=174016)

--  作者：kylin --  发布时间：2021/12/27 13:08:00 --  列表框放在中间,怎么显示不全?请教如何处理好呢? 有关代码(摘录部分):           With .AddInputCell("ic2") \'通过InputCell增加输入框,可以分三段,很好                 With .AddInput("ybm","text",0)                     .Value = pr!RgsDpt  \'增加输入框,0表示显示在左边                     .Readonly = True                 End With                                .AddSelect("bm","",1)\'增加下拉列表,1表示显示在中间                .AddVcodeButton("ts2","选择后更新",2) \'增加获取验证码按钮,2表示显示在右边             End With 出现的样子,如下: 此主题相关图片如下：图片1.png

--  作者：有点蓝 --  发布时间：2021/12/27 13:43:00 --   我测试没有问题，肯定自己添加了什么莫名其妙的的样式影响了。

--  作者：kylin --  发布时间：2021/12/27 14:48:00 --   都是用帮助示例中的各种例子结合起来,还没弄什么其他的格式

--  作者：有点蓝 --  发布时间：2021/12/27 14:49:00 --   请上传实例测试

--  作者：kylin --  发布时间：2021/12/27 15:14:00 --   HttpServer事件: Select Case e.path                            Case "stfedt.htm"                 Functions.Execute("StfEdt",e)             Case  "stfedtgetbm.htm"                 Dim vals As String                 \' If e.PostValues.Count = 1 Then                 vals  = "|" & DataTables("HtmItm").GetComboListString("Dpt","DptSer =\'" & e.PostValues("lb") & "\'")                 \' End If                 e.WriteString(vals)          End Select 函数代码:  下载信息  [文件大小：   下载次数： ] 点击浏览该文件:stfedt函数.txt

--  作者：有点蓝 --  发布时间：2021/12/27 15:44:00 --   调试不了，请提供可以测试的实例说明