主题：求助

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

 

我想实现，当付款方式在选择的情况下，结账自动勾选，当付款方式为空时，则不勾选

ValueChanged 代码

Dim r As Row = Tables("采购总表").Current

Dim cmb As WinForm.ComboBox = e.Sender

Dim str As String = e.Form.Controls("ComboBox1").Value

cmb.ComboList = DataTables("词典").GetComboListString("名称","类别 = '付款方式'","_identify")

If cmb.ComboList <> "" Then

    r("结账").Checked = True

End If