以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  .AddSelect怎么显示值 ，如下  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=190112)
--  作者：chinawangsa
--  发布时间：2024/1/17 14:53:00
--  .AddSelect怎么显示值 ，如下
.AddSelect怎么显示值 ，如下，别的都可以用value返回，但这个却不能，要怎么写。
图片点击可在新窗口打开查看
function getBrands(){
    var gj=document.getElementById("cpfl").value;
   -- setOptions("品牌",document.getElementById(gj).innerHTML);
}
--  作者：有点蓝
--  发布时间：2024/1/17 15:05:00
--  

在输入框组增加一个列表输入框的语法为：

AddSelect(ID, Label, Values)

ID输入框ID。
Label在输入框左侧显示的标签内容
Values列表项目，用符号"|"隔开，例如"大专|本科|硕士|博士"。
打开网页后，默认会选择第一个值，如果要将其他位置的值作为默认值，可以将其用方括号括起来，例如"大专|[本科]|硕士|博士"，打开网页后，会自动选择本科。

比如：

        Dim gjs As List(of String) = DataTables("汽车").GetValues("国家")
dim 某值 as string = "中国"
dim s as string = ("|" & String.Join("|",gjs.ToArray) & "|").replace("|" & 某值 & "|","|[" & 某值 & "]|").trimend("|")
        With wb.AddInputGroup("form1","ipg1","动态列表")
            .AddSelect("国家","国家", s ).Attribute = ""  \'调用js函数。
            .AddSelect("品牌","品牌","")
        End With
--  作者：chinawangsa
--  发布时间：2024/1/17 15:28:00
--  
高手。可以了。非常感谢！