Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1") Dim str As String = "" For Each nd As WinForm.TreeNode In trv.AllNodes If nd.Checked = True str &= nd.Text & "," End If Next e.Form.DropDownBox.Value = str.trim(",") e.Form.DropDownBox.CloseDropdown()
加好友 
发短信
Post By：2017/3/9 15:22:00 [显示全部帖子]
