请教老师，下面代码的问题要怎么修改
Dim t As Table = CurrentTable
For i As Integer = t.TopRow To t.BottomRow
If t.Rows(i).Locked = False Then
' t.Rows(i).Delete() ' 多选删除，删除不尽，还会留行
Syscmd.Row.Delete() '删除单行，确认一下，正常删除；多选行删除，确认一下，可以删除选定行，但再还会继续弹出是和否，只有再点否才能退出，多选几行要点几下否
Else
Messagebox.show("不能删除已锁定的行!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If
Next
[此贴子已经被作者于2021/1/22 9:10:07编辑过]
加好友 
发短信
Post By：2021/1/22 9:08:00 [显示全部帖子]
