If e.Form.Controls("RadioButton9").Checked Then
If e.Form.Controls("ComboBox2").Text = "对公" Then
e.Form.Controls("Label7").Text= "名称:"
e.Form.Controls("Label14").Text= "编号:"
e.Form.Controls("ComboBox4").ComboList = DataTables("供应系统").GetComboListString("供应商名称") '输入时提供列有的数据
ElseIf e.Form.Controls("ComboBox2").Text = "对私" Then
e.Form.Controls("Label7").Text= "债方:"
e.Form.Controls("Label14").Text= "类型:"
e.Form.Controls("ComboBox4").ComboList = DataTables("欠款明细").GetComboListString("债权人") '输入时提供列有的数据
End If '改变文字控件的显示名字
End If
红色代码部分可以加一个条件吗?
就是点击ComboBox4下拉按钮筛选出债权人列的时候,
显示的列债权人列没有最后一行为0的,
欠款明细 表 有在欠金额列,如果欠款金额列的最后一行 为0,提供列就没有了。感谢 感谢