.NET Framework 版本:4.0.30319.34209
Foxtable 版本:2020.4.10.8
错误所在事件:窗口,窗口下拉录入,Enter
详细错误信息:
未将对象引用设置到对象的实例。
项目这个事件代码是否也要修改?
AfterSelChange
Dim dr As DataRow
If e.OldRange.RowSel <> e.NewRange.RowSel OrElse e.OldRange.ColSel <> e.NewRange.ColSel Then
Dim c As Col = e.Table.Cols(e.NewRange.ColSel)
If c.IsString Then
dr=DataTables("列项设置").find("表名='" & e.Table.name & "' and 列名='" & c.Name & "' and 下拉选项 Is not null and 停用=false")
If dr IsNot Nothing Then
If dr("多值字段")=True Then
DataTables(e.Table.name).DataCols(c.name).ExtendType = ExtendTypeEnum.Values
ElseIf dr("多值字段")=False Then
DataTables(e.Table.name).DataCols(c.name).ExtendType = ExtendTypeEnum.none
End If
c.AllowDirectType=dr("允许编辑")
c.combolist=dr("下拉选项")
Else
c.combolist=""
End If
End If
End If
[此贴子已经被作者于2020/4/15 14:34:32编辑过]