Private Sub SCGrid1_TextChange(ByVal Row As Integer, ByVal Col As Integer)
   Cambia la variable blnFieldChanged a verdadero
    blnFieldChanged = True
Refresca el Grid, y se ejecuta el codigo frmFacturacionNuevo-SCGrid1_Cellchange.txt
    SCGrid1.Refresh
    initVariables
End Sub
