[求助] &= 在代码中是什么意思 Post By:2019/6/29 13:13:00 [显示全部帖子]
Dim str As String = "" For Each c As Col In CurrentTable.Cols str &= c.Name & "(" & c.Caption & ")|" Next e.Form.Controls("CheckedListBox1").ComboList = str.Trim("|")
Dim clist As WinForm.CheckedListBox = e.Form.Controls("CheckedListBox1") For Each c As Col In CurrentTable.Cols clist.SetItemChecked(c.Index, not c.Visible) Next