for循环中有更好的if语句位置吗

For k = 0 To (.Cells(38, 4).Value - 1)
    For i = 70 To 73
        For j = 0 To 2
            If j = 0 Then
                bumpvalue = k * (.Cells(39, 4).Value + .Cells(31, 4).Value)
            Else
                bumpvalue = 0
            End If
            StartPoint(j) = .Cells(i, 8 + j).Value + bumpvalue
            EndPoint(j) = .Cells(i + 1, 8 + j).Value + bumpvalue
        Next j

        Set lineObj = DWGFile.ModelSpace.AddLine(StartPoint, EndPoint)
    Next i
Next k

有没有更好的地方或方法来实现“bumpValue”,它只适用于j=0?

有件事告诉我下面不会飞。

 StartPoint(j) = .Cells(i, 8 + j).Value + if j = 0 then k * (.Cells(39, 4).Value + .Cells(31, 4).Value) else 0