• Domingo 22 de Diciembre de 2024, 22:14

Autor Tema:  Ayuda Con Cuadros De Texto  (Leído 1215 veces)

iori2029

  • Miembro activo
  • **
  • Mensajes: 48
    • Ver Perfil
Ayuda Con Cuadros De Texto
« en: Sábado 24 de Febrero de 2007, 21:48 »
0
Hola a todos, mi duda es la siguiente:

Como hago para que cuando abandono un cuadro de texto(lost focus) me revise lo que quedo en el cuadro( si es un numero menor a 0 por ejemplo).Otra pregunta .En un programa yo llamo a un fichero de texto a traves de su ruta dentro de la pc en que lo tengo ( ejemplo c:\Programa\archivo1.txt) ,pero al compilar y crear el ejecutable y llevarlo a otra pc no se ejecuta por la falta del archivo, ¿hay alguna forma de incluir el fichero de texto dentro del ejecutable para que solo lo llame con su nombre(sin la ruta fija).

Gracias de antemano. :devil:

mamex

  • Miembro activo
  • **
  • Mensajes: 77
  • Nacionalidad: mx
    • Ver Perfil
Re: Ayuda Con Cuadros De Texto
« Respuesta #1 en: Sábado 24 de Febrero de 2007, 22:19 »
0
Pregunta 1.  Pues puedes hacerlo en el evento validate, ejemplo:

Código: Text
  1.  
  2. Private Sub Text1_Validate(Cancel As Boolean)
  3.     If Val(Text1.Text) < 0 Then
  4.         MsgBox "Numero menor a 0"
  5.     Else
  6.         MsgBox "No es un numero menor a 0, vuelva a escribirlo"
  7.         Cancel = True
  8.     End If
  9. End Sub
  10.  
  11.  

Pregunta 2.  Puedes meter el archivo en la carpeta donde se encuentra tu ejecutable (exe), y para llamarlo debes escribir:

Código: Text
  1.  
  2. app.path & "/" & nombreDeArchivo
  3.  
  4.  

Y esta será la ruta de tu archivo.

iori2029

  • Miembro activo
  • **
  • Mensajes: 48
    • Ver Perfil
Re: Ayuda Con Cuadros De Texto
« Respuesta #2 en: Martes 27 de Febrero de 2007, 17:47 »
0
Muchas Gracias!!!!!!!!

Lo probare   :hola: