list 型is nothing这样写代码对吗 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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

DataTables("商品信息").Save()

MessageBox.Show("删除成功")

End If

主题：list 型is nothing这样写代码对吗