建议用 DataGridView（你用的是它吧？）内建的排序方法来排序。介绍和示例代码可以参考MSDN：
成都创新互联公司是一家专注于成都网站设计、网站制作与策划设计,龙华网站建设哪家好?成都创新互联公司做网站,专注于网站建设十载,网设计领域的专业建站公司;建站业务涵盖:龙华等地区。龙华做网站价格咨询:028-86922220
第一种方式：手动设置，设置列允许重新排列，这样在单击datagridview的列名时，就会自动排序
第二种方式：自动排序，想要按那列排序，就设置那列的SortMode的属性为：Programmatic
给数据集排序？为什么不直接在SQL文里排序。。如果你逼不得已非要用数据集排序。。就得循环了，循环数据集，按照你的需求来做出排序，重新绑定到数据集里。。
你这个是冒泡排序么？从大到小么？
For j = 0 To lstNetworkRisk.Items.Count - 1 应该改成
For j = i To lstNetworkRisk.Items.Count - 1
另外尽量不要用GOTO语句。而且完全也可以不用这个GOTO。
还有不知道你用的什么版本的.net 如果是3.5的完全可以直接用linq。