Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: rapbyone en 12 Mayo 2015, 22:17 pm



Título: Comprobar valor en celda de FlexGrid
Publicado por: rapbyone en 12 Mayo 2015, 22:17 pm
Estimados, desde hace rato que no publicaba, he aprendido mucho gracias a ustedes y he loggrado muchas cosas de manera autodidacta, pero ahora me encuentro con un problema:

Tengo el componente FlexGrid y a traves de este codigo, agregue algunos valores a diferentes celdas:

Código
  1. Private Sub Command1_Click()
  2. Dim lCount As Long
  3.  
  4.  
  5.    grid.Rows = 2
  6.    grid.Cols = 2
  7.    grid.FixedCols = 0
  8.    grid.FixedRows = 0
  9.  
  10.   grid.ColWidth(0) = 400
  11.   grid.ColWidth(1) = 400
  12.   grid.Height = 100000
  13.  
  14. lCount = 1
  15. grid.TextMatrix(lCount, 1) = "12"
  16.  
  17. lCount = 0
  18. grid.TextMatrix(lCount, 0) = "11"
  19.  
  20. lCount = 1
  21. grid.TextMatrix(lCount, 0) = "10"
  22.  
  23. lCount = 0
  24. grid.TextMatrix(lCount, 1) = "09"
  25.  
  26.  
  27. End Sub

Pero me gustaría saber como poder por medio de un IF comprobar un volar, por ejemplo:

If (celda fila1, columna 2) = 12 then
msgbox "es 12"
end if

Espero su ayuda amigos
muchas gracias