【发布时间】:2023-03-14 10:10:02
【问题描述】:
我想更改 Datagridview 中的特定行和列。
当我在x 列中输入特定数据时,它将在Y 列中返回任何特定值。否则x列中的数据将在Y列中返回值7777
但是当我运行这段代码时,Y 列没有任何变化:
Private Sub Table1DataGridView_CellEndEdit(sender As Object, e As System.Windows.Forms.DataGridViewCellEventArgs) Handles Table1DataGridView.CellEndEdit
'For e.ColumnIndex + 1
If e.ColumnIndex = 2 Then
If Val(Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex).Value) = 5 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 5
ElseIf Val(Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex).Value) = 7 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 7
ElseIf Val(Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex).Value) = 1 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 6
'1
ElseIf Val(Table1DataGridView.Rows(1).Cells(2).Value) = 1.5 Then
Table1DataGridView.Rows(1).Cells(e.ColumnIndex + 1).Value = 7.326
'2
ElseIf Val(Table1DataGridView.Rows(2).Cells(2).Value) = 2 Then
Table1DataGridView.Rows(2).Cells(e.ColumnIndex + 1).Value = 6.374
'3
ElseIf Val(Table1DataGridView.Rows(3).Cells(2).Value) = 2.5 Then
Table1DataGridView.Rows(3).Cells(e.ColumnIndex + 1).Value = 4.702
'4
ElseIf Val(Table1DataGridView.Rows(4).Cells(2).Value) = 2 Then
Table1DataGridView.Rows(4).Cells(e.ColumnIndex + 1).Value = 1.321
'5
ElseIf Val(Table1DataGridView.Rows(5).Cells(2).Value) = 2.5 Then
Table1DataGridView.Rows(5).Cells(e.ColumnIndex + 1).Value = 0.035
'6
ElseIf Val(Table1DataGridView.Rows(6).Cells(2).Value) = 4 Then
Table1DataGridView.Rows(6).Cells(e.ColumnIndex + 1).Value = 0.205
'7
ElseIf Val(Table1DataGridView.Rows(7).Cells(2).Value) = 2.5 Then
Table1DataGridView.Rows(7).Cells(e.ColumnIndex + 1).Value = 4.969
'8
ElseIf Val(Table1DataGridView.Rows(16).Cells(2).Value) = 4 Then
Table1DataGridView.Rows(16).Cells(e.ColumnIndex + 1).Value = 1.588
'9
ElseIf Val(Table1DataGridView.Rows(17).Cells(2).Value) = 2.5 Then
Table1DataGridView.Rows(17).Cells(e.ColumnIndex + 1).Value = 4.696
'10
ElseIf Val(Table1DataGridView.Rows(18).Cells(2).Value) = 2.5 Then
Table1DataGridView.Rows(18).Cells(e.ColumnIndex + 1).Value = 0.866
'11
ElseIf Val(Table1DataGridView.Rows(19).Cells(2).Value) = 2 Then
Table1DataGridView.Rows(19).Cells(e.ColumnIndex + 1).Value = 1.881
'12
ElseIf Val(Table1DataGridView.Rows(20).Cells(2).Value) = 2.5 Then
Table1DataGridView.Rows(20).Cells(e.ColumnIndex + 1).Value = 4.702
'13
ElseIf Val(Table1DataGridView.Rows(21).Cells(2).Value) = 2 Then
Table1DataGridView.Rows(21).Cells(e.ColumnIndex + 1).Value = 6.515
'14
ElseIf Val(Table1DataGridView.Rows(22).Cells(2).Value) = 1.5 Then
Table1DataGridView.Rows(22).Cells(e.ColumnIndex + 1).Value = 6.92671744
Else
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 7777
End If
End If
End Sub
然后,我尝试更改此代码,但在 Y 列返回一些相同的值:
Private Sub Table1DataGridView_CellEndEdit(sender As Object, e As System.Windows.Forms.DataGridViewCellEventArgs) Handles Table1DataGridView.CellEndEdit
'For e.ColumnIndex + 1
If e.ColumnIndex = 2 Then
If Val(Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex).Value) = 5 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 5
ElseIf Val(Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex).Value) = 7 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 7
ElseIf Val(Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex).Value) = 1 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 6
'1
ElseIf Val(Table1DataGridView.Rows(1).Cells(2).Value) = 1.5 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 7.326
'2
ElseIf Val(Table1DataGridView.Rows(2).Cells(2).Value) = 2 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 6.374
'3
ElseIf Val(Table1DataGridView.Rows(3).Cells(2).Value) = 2.5 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 4.702
'4
ElseIf Val(Table1DataGridView.Rows(4).Cells(2).Value) = 2 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 1.321
'5
ElseIf Val(Table1DataGridView.Rows(5).Cells(2).Value) = 2.5 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 0.035
'6
ElseIf Val(Table1DataGridView.Rows(6).Cells(2).Value) = 4 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 0.205
'7
ElseIf Val(Table1DataGridView.Rows(7).Cells(2).Value) = 2.5 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 4.969
'8
ElseIf Val(Table1DataGridView.Rows(16).Cells(2).Value) = 4 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 1.588
'9
ElseIf Val(Table1DataGridView.Rows(17).Cells(2).Value) = 2.5 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 4.696
'10
ElseIf Val(Table1DataGridView.Rows(18).Cells(2).Value) = 2.5 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 0.866
'11
ElseIf Val(Table1DataGridView.Rows(19).Cells(2).Value) = 2 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 1.881
'12
ElseIf Val(Table1DataGridView.Rows(20).Cells(2).Value) = 2.5 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 4.702
'13
ElseIf Val(Table1DataGridView.Rows(21).Cells(2).Value) = 2 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 6.515
'14
ElseIf Val(Table1DataGridView.Rows(22).Cells(2).Value) = 1.5 Then
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 6.92671744
Else
Table1DataGridView.Rows(e.RowIndex).Cells(e.ColumnIndex + 1).Value = 7777
End If
End If
End Sub
感谢您的帮助!
【问题讨论】:
标签: vb.net winforms visual-studio-2010 datagridview