Re: Substraction code in MSFlex Grid
 

Thanx to all of you, teachers... I'm sorry for being so dumb before this.. Hehe.. It was alreasdy solved.. But, the 8th column need to be changed ti 7th column.. K, thanx lot..

[Private Sub cmdCalculate_Click()

Dim i As Integer

      Dim TAmt As Currency

      TAmt = 0

      For i = 1 To Grd.Rows - 1

         TAmt = TAmt + Val(Grd.TextMatrix(i, 7))

      Next

      TAmt = Val(txtBudget.Text) - TAmt

      txtBalance.Text = Format(TAmt, "0.00")

End Sub]