“3号位没有行？”是什么意思？

本文介绍了“3号位没有行？”是什么意思？的处理方法，对大家解决问题具有一定的参考价值，需要的朋友们下面随着小编来一起学习吧！ 问题描述 我尝试使用listview自动选择我的程序的最低编号。但是它总是说没有位置3任何人？谢谢 Dim ct 作为 整数 对于 ct = 0 要 .Tables（ 0 ）。Rows.Count - 1 下一步 Dim ls As 新 ListViewItem ls.Text = .Tables（ 0 ）。行（ct）.Item（ 0 ） 如果 ls.SubItems.Add（.Tables（ 0 ）。行（ct）.Item（ 2 ））< = ls.SubItems.Add（.Tables（ 0 ）。行（ct）.Item（ 2 ））然后 ls.BackColor = Color.Yellow lvpoapproveitem.Items.Add（ls） 结束 如果 解决方案 使用 For Each Loop 而不是 For Loop 见下面的修改代码： 对于 每个 _mRow As DataRow 在 DataSetName.Tables（ 0 ）。行 Dim ls As 新 ListViewItem ls.Text = DataSetName.Tables（ 0 ）。行（ct）.Item（ 0 ） 如果 ls.SubItems.Add（_mRow.Item（ 2 ））< = ls.SubItems.Add（_mRow.Item（ 2 ））然后 ls.BackColor = Color.Yellow lvpoapproveitem.Items.Add（ls） End 如果 下一页 另外检查您的数据集表中是否存在第3列，因为您指的是索引（2） 。表（ 0 ）。行（ct）.Item（ 2 ） 我希望这会对你有所帮助。 ：） 也许，你打算做的是在代码底部有 Next ，而不是在顶部。 .. 这样，ct会为每行改变，而不是在实际使用之前设置为行数？ Dim ct 作为 整数 对于 ct = 0 到。表（ 0 ）。Rows.Count - 1 Dim ls As New ListViewItem ls.Text = .Tables（ 0 ）。行（ct）.Item（ 0 ） If ls.SubItems.Add（.Tables（ 0 ）。行（ct）.Item（ 2 ））< = ls.SubItems.Add（。表（ 0 ）。行（ct）。项目（ 2 ））然后 ls.BackColor = Color.Yellow lvpoapproveitem .Items.Add（ls） 结束 如果 下一步 I tried to select automatically the lowest number of my program w/ it's highlight using listview. but then it always says "There is no position 3" anyone? thanksDim ct As Integer For ct = 0 To .Tables(0).Rows.Count - 1 Next Dim ls As New ListViewItem ls.Text = .Tables(0).Rows(ct).Item(0) If ls.SubItems.Add(.Tables(0).Rows(ct).Item(2)) <= ls.SubItems.Add(.Tables(0).Rows(ct).Item(2)) Then ls.BackColor = Color.Yellow lvpoapproveitem.Items.Add(ls) End If 解决方案 Use For Each Loop Instead of For LoopSee below modified code :For Each _mRow As DataRow In DataSetName.Tables(0).Rows Dim ls As New ListViewItem ls.Text = DataSetName.Tables(0).Rows(ct).Item(0) If ls.SubItems.Add(_mRow.Item(2)) <= ls.SubItems.Add(_mRow.Item(2)) Then ls.BackColor = Color.Yellow lvpoapproveitem.Items.Add(ls) End IfNextAlso check 3rd column exist or not in your DataSet Table because you are referring Index (2).Tables(0).Rows(ct).Item(2)I hope this will help you. :)Perhaps, what you meant to do was have the Next at the bottom of the code, rather than at the top...That way, ct would change for each row, rather than just being set to the number of rows before you actually use it?Dim ct As IntegerFor ct = 0 To .Tables(0).Rows.Count - 1 Dim ls As New ListViewItem ls.Text = .Tables(0).Rows(ct).Item(0) If ls.SubItems.Add(.Tables(0).Rows(ct).Item(2)) <= ls.SubItems.Add(.Tables(0).Rows(ct).Item(2)) Then ls.BackColor = Color.Yellow lvpoapproveitem.Items.Add(ls) End IfNext 这篇关于“3号位没有行？”是什么意思？的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！