Dim lst As WinForm.CheckedComboBoxlst = e.Form.Controls("CheckedComboBox1")Dim dr As DataRow = lst.SelectedItemif dr IsNot nothing then e.Form.Controls("TextBox20").value = dr("货损描述")end if
但提示错误。不知那里出错了,请各位指点!