Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Like ó Instr
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Like ó Instr 
 
Hola!.

Estoy acostumbrado a usar en algunas ocasiones mas la instrucción Instr que Like.
Ejemplo:

...
If tipogasto Is ValueBox And InStr(tipogasto.name, "vlbG") <> 0 Then
...
 


Si se que tengo tres gastos fijos, puedo nombrarlos como vlbG1,vlbG2,vlbG3...son objetos del tipo ValueBox.
Y puedo tener algo como esto:

...
 If tipogasto Is ValueBox And tipogasto.name Like "vlbG[123]"
...
 


Este es el procedimiento de donde sale todo:

Public Sub Gastos_KeyRelease()
  
  Dim tipogasto As Object
  Dim gasto As Float
  
  For Each tipogasto In Me.Controls    
    'If tipogasto Is ValueBox And InStr(tipogasto.name, "vlbG") <> 0 Then
    If tipogasto Is ValueBox And tipogasto.name Like "vlbG[123]"
      If Not IsNull(tipogasto.value) Then
        gasto += tipogasto.value
      Endif
    Endif
  Next
  vlbGastos.Value = gasto
  
End
 


Naturalmente la condicional se puede ampliar en la primera linea y no crear una segunda condicional, parece verse mejor.
¿ Qué opináis del uso de Like con respecto a veces otras sentencias de comparación de cadenas ?.

Saludos
 




===================
Gambas Básico
"No es un bug, es una característica no documentada"
 
Shell - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Like ó Instr 
 
En términos de comodidad y flexibilidad me gusta 'Like', pero en términos de eficiencia siempre serán más rápidos los métodos de cadenas que las expresiones regulares (que es lo que usa internamente Like).

Saludos
 




===================
Jesús Guardón

Por favor, usemos el corrector ortográfico antes de pulsar el botón "Enviar".

"uo ǝs ʇɐu pıɟıɔıן ɐdɹǝupǝɹ ɐ dɹoƃɹɐɯɐɹ, soןo ɥɐʎ bnǝ dɹodouǝɹsǝןo"
 
jguardon - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
Ocultar¡Este tema fue útil?

 

Elegir valoración:                       

Media de valoración Valoración mínima Valoración máxima Número de valoraciones
0.00 0 0 0
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
No puede descargar archivos
No puede publicar eventos en el calendario