在窗口
AfterLoad
事件中
Dim cmb As WinForm.ComboBox = e.form.Controls("ComboBox1")cmb.ComboList = DataTables("客户表").GetComboListString("客户ID")
Dim cmd As WinForm.ComboBox = e.form.Controls("ComboBox2")cmd.ComboList = DataTables("客户表").GetComboListString("mzmc","[地址ID] = '" & e.Row("客户ID") & "'")