Dim nms3 As List(of String()) = DataTables("单据").GetValues("单号|企业名称", Tables("单据").filter) For Each nms() As String In nms3 e.Form.controls("TextBox5").value=nms(0)Next
上面这的循环取值可以执行,但是转化为下列取不重复数时,执行时就出问题,下面的 e.Form.controls("combobox1").text 值想循环取值,这个代码需怎样改呢?
Dim ls As List(Of String) = DataTables("销售明细").getvalues("客户全称")
For Each s As String In ls e.Form.controls("combobox1").value =
Next