Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 2 de 2
Ir a la página Anterior  1, 2
 
Como Controlar Un Valuebox Cantidad De Enteros Y Decimales?
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Re: Como Controlar Un Valuebox Cantidad De Digitos Y Decimales? 
 
vicr escribió: [Ver mensaje]
Hola V3ctor...
¿pusiste "float(8,2)" en la base de datos?
Por lo que recuerdo allí estás diciendo que quieres un número de 8 dígitos incluyendo 2 decimales; es decir, la parte entera de 6 dígitos más 2 en decimales.

Eso puedo decir por ahora...

Saludos a todos.


gracias por la aclaración, la verdad es que tenia mis dudas, jajaj como el desconocimiento de pequeñas cosas te pueden meter en grandes lios.
 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Como Controlar Un Valuebox Cantidad De Enteros Y Decimales? 
 
55_1450744062_511097



llamadas
If FloatEntero.FormatoDecimal(vBoxMonto, 1, "Monto") = False Then Return
  If FloatEntero.FormatoDecimal(vBoxEntrega, 1, "Entrega") = False Then Return



modulo

' gambas module file

Public Sub FormatoDecimal(vBox As ValueBox, tipoMensaje As Integer, nombre As String) As Boolean
  Dim partes As String[]
  
  If Len(CStr(Int(vBox.Value))) > 6 Then
     FMain.SError.Play
     Select Case tipoMensaje
       Case 1
         Ventanas.Mgv1.Close
         Ventanas.Mgv1.Open("La parte entera del número no puede ser mayor a 6 cifras! (" & nombre & ")")
       Case 2
         Message.Warning("La parte entera del número no puede ser mayor a 6 cifras! " & gb.NewLine & nombre)
     End Select
    
     Return False
  Else If InStr(vBox.Text, ",") <0> 2 Then
         FMain.SError.Play
         Select Case tipoMensaje
           Case 1
             Ventanas.Mgv1.Close
             Ventanas.Mgv1.Open("La parte decimal del número no puede ser mayor a 2 cifras! (" & nombre & ")")
           Case 2
             Message.Warning("La parte decimal del número no puede ser mayor a 2 cifras! " & gb.NewLine & nombre)
         End Select
         Return False
       Endif
  Else
    Return True
  Endif
  
  Return True
  
End

 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Decimales Como Valor De Incremento En Bucle Shell General 2 Domingo, 21 Abril 2013, 08:33 Ver último mensaje
Shell
No hay nuevos mensajes Como Controlar El Evento Data De Gridview? vr_rv Bases de Datos 6 Jueves, 23 Junio 2016, 22:34 Ver último mensaje
jguardon
No hay nuevos mensajes Como Puedo Crear Un Checkbox Dentro De Una... Ricardo Prieto Controles/Librerías/Componentes 10 Lunes, 29 Agosto 2016, 22:48 Ver último mensaje
vuott
No hay nuevos mensajes ¿Como Regular El Alto De Un ListBox Segun... v3ctor General 8 Viernes, 29 Septiembre 2017, 19:11 Ver último mensaje
v3ctor
 

Publicar nuevo tema  Responder al tema  Página 2 de 2
Ir a la página Anterior  1, 2

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 0 invitados
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
Puede descargar archivos
No puede publicar eventos en el calendario



  

 

cron