主题：[求助]

在人员、物资的click事件，写代码

Dim cmb1 As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim cmb2 As WinForm.ComboBox = e.Form.Controls("ComboBox2")
If e.Form.Controls("人员").Checked = True Then
    cmb1.ComboList = DataTables("人员").GetComboListString("name")
    cmb2.ComboList = DataTables("人员").GetComboListString("bh")
ElseIf e.Form.Controls("物资").Checked = True Then
    cmb1.ComboList = DataTables("物资").GetComboListString("wzmc")
    cmb2.ComboList = DataTables("物资").GetComboListString("bh")
End If