删除datagridview行时只会删除奇数行,求解
JiXu:
For i = 1 To DataGridView1.Rows.Count
If DataGridView1.Rows(i).Cells(5).Value Like "*2018-10-20*" Then
TextBox1.Text = DataGridView1.Rows(i).Cells(5).Value
TextBox2.Text = DataGridView1.Rows(i).Cells(4).Value
TextBox3.Text = DataGridView1.Rows(i).Cells(3).Value
TextBox4.Text = DataGridView1.Rows(i).Cells(2).Value
TextBox5.Text = DataGridView1.Rows(i).Cells(1).Value
TextBox6.Text = DataGridView1.Rows(i).Cells(0).Value
Else
DataGridView1.Rows(i).Selected = True
DataGridView1.Rows.RemoveAt(i)
'Stop
' DataGridView1.Refresh()
End If
System.Threading.Thread.Sleep(5000)
Application.DoEvents()
Continue For
Next
GoTo JiXu