Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")
Dim vls As String = ""
For Each vr As WinForm.ListViewRow In lvw.CheckedRows
vls = vls & "@" & vr.tag("pic")
vr.tag("gongxiang")= "0"
Tables("商城.商品").Filter = "[gongxiang] = '1'"
Tables("商品").Filter = "[gongxiang] = '1'"
Next
e.Form.DropDownBox.Value = vls.Trim(",")
e.Form.DropDownBox.CloseDropdown()
代码如上, 感觉使用黄色的部分控制的
因为所有被选项中间都用@ 分隔开了
但是问题是,第一个数据前面也会加@
所有数据都是以@开头的
有没有办法让第一个数据不带@啊??
请问这种应该怎么处理?