说明没有认真看帮助啊
| Values | 列表项目，用符号"|"隔开，例如"大专|本科|硕士|博士"。
打开网页后，默认会选择第一个值，如果要将其他位置的值作为默认值，可以将其用方括号括起来，例如"大专|[本科]|硕士|博士"，打开网页后，会自动选择本科。 |
With wb.AddInputGroup("form1", "ipg4", "城市")
dim s as string = "|" & DataTables("行政区划表").GetComboListString("省份") & "|"
msgbox(s)
s = s.replace("|" & pr("省份") & "|","|[" & pr("省份") & "]|").trimend("|")
msgbox(s)
With .AddSelect("省份", "省份", s)
.Attribute = """
End With
if pr.isnull("省份") orelse pr.isnull("城市") then
.AddSelect("城市", "城市", "")
else
dim a as string = "|" & DataTables("行政区划表").GetComboListString("城市","省份='" & pr("省份") & "'") & "|"
msgbox(a)
a = a.replace("|" & pr("城市") & "|","|[" & pr("城市") & "]|").trimend("|")
msgbox(a)
.AddSelect("城市", "城市", a)
end if
End With
加好友 
发短信
Post By：2024/1/1 20:37:00 [显示全部帖子]
