想实现如: "某单位"退回"某制品名称""多少""单位". 

其中,"单位"读取数据表中的值,请问前面的 定义 和 表达式 如何写?

Select Case e.sender.name

        Case "确认"

        Dim lqdw As WinForm.ComboBox = e.Form.controls("领取单位")

        Dim zpmc As winform.combobox = e.Form.controls("制品名称")

        Dim thxl As WinForm.NumericComboBox = e.Form.controls("退回数量")

        Dim dw As String  = CurrentTable.Current("单位")

        Dim result As dialogresult

        result = messagebox.show(" " & lqdw.text & " 退回 " & zpmc.text & " " & thxl.Value & ""dw",请确认","提示",messageboxbuttons.OKcancel,MessageBoxIcon.Question)

        If result = DialogResult.OK Then

            CurrentTable.Current.save()

        Else If result = DialogResult.Cancel

            Return

        End If

此主题相关图片如下：1.png