以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  list 型is nothing这样写代码对吗  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=136825)

--  作者：weibu --  发布时间：2019/6/22 11:22:00 --  list 型is nothing这样写代码对吗 Dim trs As List(of Row) = Tables("商品信息").GetCheckedRows() If trs Is Nothing Then    MessageBox.Show("请勾选要删除商品!")         老师我这边希望，如果没有勾选复选框时提示"请勾选要删除商品!"            但未勾选时，却没有提示？？？ Else Dim Result As DialogResult Result = MessageBox.Show("确定删除?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) If Result = DialogResult.Yes Then For Each tr As Row In trs tr.locked = False tr.Delete Next DataTables("商品信息").Save() MessageBox.Show("删除成功") End If End If

--  作者：有点蓝 --  发布时间：2019/6/22 11:42:00 --   这种情况判断集合数量即可，返回的集合肯定不是空对象 If trs.count = 0 Then