错误依旧
.NET Framework 版本:2.0.50727.5485
Foxtable 版本:2017.3.18.1
错误所在事件:窗口,项目收款帐户选择,Button1,Click
详细错误信息:
未将对象引用设置到对象的实例。
窗口与控件事件
项目收款帐户选择_AfterLoad
Dim cmb As
WinForm.ComboBox = e.form.Controls("ComboBox1")
cmb.ComboList =
DataTables("银行资料").GetComboListString("帐户名")
项目收款帐户选择_Button1_Click
Dim r As Row =
Tables("项目收款登记").Current
r("帐户名")
=e.Form.Controls("combobox1").Value
r("开户行")
=e.Form.Controls("combobox2").Value
r("帐号")
=e.Form.Controls("combobox3").Value
e.Form.Close
项目收款帐户选择_ComboBox2_Enter
Dim cmb As
WinForm.ComboBox = e.Sender
Dim str As String
= e.Form.Controls("ComboBox1").Value
cmb.ComboList =
DataTables("银行资料").GetComboListString("开户行", "帐户名 =
'" & str & "'")
项目收款帐户选择_ComboBox3_Enter
Dim cmb As
WinForm.ComboBox = e.Sender
Dim str As String
= e.Form.Controls("ComboBox2").Value
cmb.ComboList =
DataTables("银行资料").GetComboListString("帐号", "开户行 =
'" & str & "'")
确定按钮
Dim r As Row = Tables("项目收款登记").Current
r("帐户名") =e.Form.Controls("combobox1").Value
r("开户行") =e.Form.Controls("combobox2").Value
r("帐号") =e.Form.Controls("combobox3").Value
e.Form.Close
[此贴子已经被作者于2017/4/10 16:01:25编辑过]