Deberias hacer esta misma pregunta, aqui:
Saludos!
Código [Seleccionar]
http://groups.google.com/group/crackslatinos
Saludos!
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menúhttp://groups.google.com/group/crackslatinos
'escribe a continuacion
Open "c:\notepad.txt" For Append Access Write As #1
Print #1, "como estas"
Close #1
'escribe en nueva linea
Open "c:\notepad.txt" For Append Access Write As #1
Print #1, ""
Print #1, "como estas de nuevo"
Close #1
Dim menor As Integer
dim iAux as Integer
menor = 65537 'este deberia ser el mayor valor posible
For i = 0 To msflexgrid1.rows - 1
iAux = Val(MSFlexGrid1.TextMatrix(i, 5))
If iAux < Val(MSFlexGrid1.TextMatrix(i+1, 5)) Then
menor = iAux
end if
Next i
http://ricardonarvaja.info/WEB/OTROS/IDA%20BIGUNDILLA/