[求助]weui列表框清空 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

此主题相关图片如下：1.png

此主题相关图片如下：2.png

Dim e As RequestEventArgs = args(0)

Dim wb As New weui

Dim Page As Integer

If e.GetValues.ContainsKey("page") Then

Integer.TryParse(e.GetValues("page"), page)

End If

wb.AddForm("","form1","list.htm?page=0")

With wb.AddInputGroup("form1","ipg0","快速数据筛选")

With .AddInput("合同号1","合同号1","text")

.Attribute = """

End With

'.AddInput("客户","客户","text")

With .AddInput("款号1","款号1","text")

.Attribute = """

End With

'.AddInput("开始日期","开始日期","date")

' .AddInput("结束日期","结束日期","date")

End With

With wb.AddInputGroup("form1","ipg1","只填合同号或款号")

With .AddSelect("合同号","合同号","")

.Attribute = ""

End With

With .AddSelect("款号","款号","")

.Attribute = ""

End With

With wb.AddButtonGroup("form1","btg1",False)

.Add("btn1", "筛选", "submit")

.Add("btn1", "返回", "button","list.htm?page=" & Page) '返回原页面

End With

wb.AppendHTML("<script src='./lib/order.js'></script>")

e.WriteString(wb.Build())

********************************************

order.js

function clearhth() {

document.getElementById("合同号").value = ""

}

function clearkh() {

document.getElementById("款号").value = ""

}

[此贴子已经被作者于2020/12/18 14:26:46编辑过]

document.getElementById("款号").options.length = 0;

结果是一样不行

https://blog.csdn.net/nuptsv_ice/article/details/9088183

document.getElementById("款号").innerHTML = "";

此主题相关图片如下：3.png

document.getElementById("款号").innerHTML = "";我测试没有问题

麻烦你发一个测试例子出来,我还是不成功

下载信息 [文件大小：下载次数： ]
点击浏览该文件:clselect.zip

Select Case e.Path

Case "test.htm"

Dim wb As New weui

wb.AddForm("","form1","test.htm")

With wb.AddInputGroup("form1","ipg1","列表项目")

.AddSelect("os","操作系统","iOS|Windows|Andriod")

.AddSelect("bw","浏览器","Chorme|[Edge]|Firefox|Internet Explorer")

End With

With wb.AddButtonGroup("form1","btg1",True)

.Add("btn1", "确定", "button")

End With

wb.InsertHTML("<script >document.getElementById(""bw"").innerHTML = """";</script>")

e.WriteString(wb.Build) '生成网页

End Select

成功了,我看下那里出问题了,谢谢

[此贴子已经被作者于2020/12/18 17:31:44编辑过]

主题：[求助]weui列表框清空