主题：关于自定义函数 实现COMBOBOX下拉列表的问题

Dim Dp_form As String = args(0)

Dim Dp_combobox As String = args(1)

Dim Dp_val As String = args(2)

Dim cmb As WinForm.ComboBox

cmb = Forms(Dp_form).Controls(Dp_combobox)

Dim dt=DataTables("tbl_词组").GetComboListString("名称", "词组类型 = '" & Dp_val & "'")

cmb.ComboList = dt