Help with my project

Hi there,

I hope somebody could tell me where I am going wrong with the following code. I am doing a Investment Program and seem to be stuck.

For i = minimum To maximum Step 0.5

For Years = 1 To end_year Step 1

Select Case Years
Case 1, 5, 10, 15, 20, 25, 30, 35, 40, 45, 50


MSFlexGridgrid.Cols = icolumn + 1
MSFlexGridgrid.Row = 0
MSFlexGridgrid.Col = icolumn
MSFlexGridgrid.Text = CStr(i)
icolumn = icolumn + 1

MSFlexGridgrid.Rows = irow + 1
MSFlexGridgrid.Col = 0
MSFlexGridgrid.Row = irow
MSFlexGridgrid.Text = CStr(Years)
irow = irow + 1

Case Else
End Select

Next Years
Next i

I also haven't put my calculation for the fill grids, a little puzzled with this one too.

Any suggestions?

Thanks
Sam

Not sure where you are having the problem, but my guess is that your step needs to be an intenger, not a decimal.

Try creating a var and making it equal to maximum times two, and change step to 1.

Good luck!