主题：求助：利用listview做的下拉窗体，在表中录入没有问题，在窗体中用下拉控件定义不能正常使用

 代码

Dim lvw As WinForm.ListView = e.Sender
Dim lv As WinForm.ListViewRow = lvw.Current
If lv Is Nothing Then
    Return
End If
If e.Form.DropDownBox IsNot Nothing Then
    Dim tr As Row = Tables("LED订单").Current
    tr("LED规格") = lv("LED规格")
    tr("LED长度") = lv("LED单块长度")
    tr("LED宽度") = lv("LED单块宽度")
    tr("LED灯间密度") = lv("LED灯间密度")
    tr("LED颜色") = lv("颜色类别")
    tr("LED单价") = lv("LED单价")
    e.Form.DropDownBox.Value = lv("LED规格")
    tr("LED规格") = lv("LED规格")
Else If e.Form.DropTable IsNot Nothing Then '如果下拉窗口是从表中打开
    Dim tr As Row = e.Form.DropTable.Current
    tr("LED规格") = lv("LED规格")
    tr("LED长度") = lv("LED单块长度")
    tr("LED宽度") = lv("LED单块宽度")
    tr("LED灯间密度") = lv("LED灯间密度")
    tr("LED颜色") = lv("颜色类别")
    tr("LED单价") = lv("LED单价")
    e.Form.DropDownBox.Value = lv("LED规格")
End If
e.Form.DropDownBox.CloseDropdown()