在勾选某一行删除时出错,这一行有数据。 但是勾选其他行删除没有问题。
.NET Framework 版本:2.0.50727.8937
Foxtable 版本:2018.9.9.1
错误所在事件:窗口,收据打印,Button1,Click
详细错误信息:
索引和长度必须引用该字符串内的位置。
参数名: length
全部代码:
Dim Result As DialogResult
Dim rs As List (of Row) = CurrentTable().GetCheckedRows()
If rs.count= 0 Or Tables("收据打印").Current("姓名") = Nothing
messagebox.Show("此行为空,或者您未勾选要删除的客户.请先勾选 !","提示",MessageBoxButtons.OK,messageboxicon.warning)
Return
End If
Dim ids As String
For Each r As Row In rs
ids = ids & "," & r("姓名").substring(0,3)
Next
Result = MessageBox.Show("确定要删除 " & ids.Trim(",") & " ?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
For Each r As Row In rs
r.Delete()
Next
Else
Return
End If
[此贴子已经被作者于2018/12/30 17:57:59编辑过]