• Martes 13 de Mayo de 2025, 08:19

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - Jaume

Páginas: 1 2 3 [4] 5 6 7
76
Visual Basic 6.0 e inferiores / Re: funciones en visual basic
« en: Viernes 3 de Enero de 2003, 07:59 »
Hola y bienvenido.

La función la puedes escribir en el formulario, o en un módulo (si no has llegado a esa parte, hazlo en el formulario)

Lo que debes poner en el commandbuton es la llamada a la función

CommandButton_Click()
    Text1.Text=dblSqrt(cDbl(Text1.Text))
End Sub

Con esto consigues varias cosas:
1º llamar a la función dblSqrt
2º pasarle un parámetro en formado Double. La función cDbl convierte un texto a Double. Además ese parámetro es el texto que ha escrito el usuario.
3º y último, estás poniendo el resultado en el mismo textbox

Espero que haya sido lo suficientemente claro.

Un Saludo y feliz 2003

77
Visual Basic 6.0 e inferiores / Manejo de Puertos COM????
« en: Jueves 2 de Enero de 2003, 11:20 »
No te sirve la respuesta de Code con respecto a otro mensaje sobre el puerto Com?

78
Visual Basic 6.0 e inferiores / Mi otro problemita!! ayudenme porfa!!!
« en: Martes 31 de Diciembre de 2002, 08:36 »
Si te he entendido bien, solo quieres validar que no dejen en blanco esta casilla???

Eso es muy senzillo. Solo debes colocar el siguiente código en el evento Validate del MaskEdBox.

    If MaskEdBox1.Text = "" Then
        Cancel = True
    End If

De esta manera será imposible salir de él sin escribir nada. Ahora solo faltaría verificar el contenido, pero eso creo que ya lo tienes.

Salu2

79
Visual Basic 6.0 e inferiores / Formularios hijos
« en: Jueves 26 de Diciembre de 2002, 18:26 »
Usa esta funcion

'---------------------------------------------------------------------------
'Parámetros de entrada: frmFormulario(formulario a centrar)
'Centra el formulario pasado por parámetro en el centro del formulario padre
'---------------------------------------------------------------------------
Public Sub Posiciona(frmFormulario As Form) 'centra un formulario
  frmFormulario.Top = Int((mdiMenu.ScaleHeight - _
                      frmFormulario.Height) / 2)
  frmFormulario.Left = Int((mdiMenu.ScaleWidth - _
                       frmFormulario.Width) / 2)
End Sub

Donde mdiMenu es el nombre de tu Formulario padre

Salu2

80
Visual Basic 6.0 e inferiores / Disculpen por favor .....
« en: Martes 24 de Diciembre de 2002, 13:08 »
¿Tiene algo que ver este problema con el mensaje anterior sobre el trigger o es nuevo? Es que ya me he perdido :)

81
Visual Basic 6.0 e inferiores / Visual en Red
« en: Martes 24 de Diciembre de 2002, 08:04 »
Este programa usa una base de datos para realizar mantenimientos?

Si es así, Has pensado que va a pasar cuando dos usuarios de la red intenten modificar el mismo registro?

Si la primera respuesta es afirmativa y la segunda negativa, entonces debes cambiar el código del programa

82
Visual Basic 6.0 e inferiores / Bloqueo tecla ctrl ...MALDITA TECLA CONTROL !!!
« en: Lunes 23 de Diciembre de 2002, 09:22 »
Hola

Te remito al mensaje respuesta que le escribí en su día a otra consulta.

"Tratamiento de la tecla Supr" de MindEYE

Creo que puede serte útil

Salu2

83
Visual Basic 6.0 e inferiores / Re: Codigo
« en: Lunes 23 de Diciembre de 2002, 09:18 »
Creo que no vamos a conseguir nada de esta manera. Lo mejor sería que hicieras un ZIP con  todo el programa, para que podamos ver todo el código y definición de objetos.

Yo he probado el Do Until y funciona, por lo que creo que el problema debe ir por otro lado.

Cuélgalo en un mensaje o mándamelo.

Salu2

84
Visual Basic 6.0 e inferiores / Ayuda, por favor...
« en: Viernes 20 de Diciembre de 2002, 14:33 »
Eso deberías habértelo planteado antes de hacer la aplicación, porque ahora puede que partes del programa no te sirvan.

Por ejemplo, si se trata de un programa enlazado a una base de datos, ¿como harás los bloqueos de los registros?, ¿Como indicas la ruta de la base de datos? etc

Muchas cosas se han de tener en cuenta.
Otra cosa es que la aplicación no use ninguna base de datos y sea monousuaria, pero claro, entonces no tendría sentido ponerla en una red, No?

Comenta un poco esto y sabremos si te podemos echar un cable

Salu2

85
Visual Basic 6.0 e inferiores / Re: Codigo
« en: Viernes 20 de Diciembre de 2002, 14:27 »
El siguiente código debería funcionar puesto que lo he probado

(Fíjate en el orden de las instrucciones)

elimino = 0
bdgeo.UserName = st_login
bdgeo.Password = st_passw
bdgeo.ConnectionString = Conectar
bdgeo.RecordSource = "SELECT * FROM sondajes.t_identi WHERE yacimiento=1 AND codlabor='" & clabor_del & "'"
bdgeo.Refresh
If bdgeo.Recordset.RecordCount > 0 Then
Do Until bdgeo.Recordset.EOF  
bdgeo.Recordset.Delete
bdgeo.Recordset.MoveNext
elimino = 1
Loop


Saludos

86
Visual Basic 6.0 e inferiores / Re: Problema con formulario
« en: Viernes 20 de Diciembre de 2002, 14:11 »
Supongo que el proceso se lanza automáticamente al abrir el formulario. En tal caso te recomiendo que todas las operaciones las realices en el evento del formulario LOAD. Este se ejecuta cuando el formulario aun no es visible, de manera que no se ve todo lo que estás haciendo.

No lo coloques en el evento ACTIVATE puesto que este se ejecuta después del LOAD, una vez el formulario ya es visible. Además, este evento se lanza siempre que se activa el formulario, mientras que el primero solo la primera vez que lo abres.

Espero te sea útil

Salu2

87
Visual Basic 6.0 e inferiores / Re: Alguien puede mirar este codigo
« en: Viernes 20 de Diciembre de 2002, 12:59 »
Para que quieres hacer un bucle?

Porqué no lanzas un DELETE en lugar de un SELECT?

88
Visual Basic 6.0 e inferiores / Re: Alguien puede mirar este codigo
« en: Viernes 20 de Diciembre de 2002, 09:39 »
No lo afirmo, pero creo que el MoveNext no es necesario, puesto que al eliminar el registro ya pasa al siguiente. Creo!!

89
Visual Basic 6.0 e inferiores / Re: Alguien puede mirar este codigo
« en: Viernes 20 de Diciembre de 2002, 08:54 »
Creo que la línea del MoveFirst sobra

90
Visual Basic 6.0 e inferiores / Re: tratamiento de l atecla suprimir
« en: Jueves 19 de Diciembre de 2002, 10:03 »
Solo debes indicar al formulario donde esté el TextBox en el que vas a escribir, la propiedad KeyPreview a true, de manera que capture la pulsación de una tecla antes que el TextBox.

Entonces, en el evento KeyDown del formulario pones un código similar a este

If KeyCode = vbKeyDelete Then
    MsgBox ("Ni hablar de eso")
    KeyCode = 0
End If

de manera que si pulsamos la tecla suprimir nos aparecerá el mensage y anulará la tecla al forzarlo con la instrucción KeyCode=0

Salu2

91
Visual Basic 6.0 e inferiores / COMO VER DATAREPORT HORIZONTALMENTE
« en: Miércoles 18 de Diciembre de 2002, 09:58 »
Tenía entendido que ese era un buck (error) de VisualBasic 6. En mi empresa nos encontramos con el mismo problema. Desgraciadamente no encontramos solución, por lo que decidimos pasarnos a Crystal Reports.

Si este tema se ha solucionado me interesaría saber como

Salu2

92
1º Puedes crear un campo en la sentencia SQL que utilizas para rellenar el grid, que te realice esa operacion, por lo que puedes mostrarlo en la grid como un campo más. Posteriormente haces otra sentencia SQL que te calcule el total de esa operacion y lo muestras en el TextBox.

2º Haces una columna más en el grid, de manera que cuando ya lo tengas lleno, lo recorres linea por linea realizando la multiplicación y el cómputo global, rellenando la columna extra que has creado. Cuando termines el bucle tendrás el total, por lo que podrás rellenar el textBox.

La primera opción es la más elegante y rápida. La segunda más lenta pero mas sencilla

Salu2

93
Visual Basic 6.0 e inferiores / archivo *.exe
« en: Miércoles 18 de Diciembre de 2002, 09:40 »
Si no estoy equivocado, al system32 van todos los ficheros necesarios para ejecutarse las aplicaciones de 32 bits, mientras que en el system van el resto.

Si tienes problemas copialas en los dos directorios. Ya se que no es muy elegante, pero a mi me ha sacado de más de un aprieto.

En cuanto a que si un usuario necesita una de las dll, o se la pasas o la bajas de internet. como mejor te vaya

Salu2

94
Visual Basic 6.0 e inferiores / Re: archivo *.exe
« en: Martes 17 de Diciembre de 2002, 08:51 »
Si, siempre y cuando no utilices ninguna DLL u OCX que no se encuentre en el system 32.

Haz el empaquetado y te mostrará la lista de archivos que precisa incorporar a la máquina de destino. Si no necesita ninguno, entonces podrás hacerlo.

Salu2

95
Hola

Te paso una dirección donde te explica con un ejemplo como puedes conectarte a Access sin usar el objeto Data. También encontrarás un enlace para bajarte el código del ejemplo para probarlo

http://guille.costasol.net/ejemplos/ADO ... ontrol.htm

96
Visual Basic 6.0 e inferiores / Help me!!!
« en: Lunes 9 de Diciembre de 2002, 09:12 »
En ningun momento le dices al programa que se recorra los registros del recordset.

Antes del next deberías mover el cursor del recordset al siguiente registro mediante la instruccion MoveNext:

reg5.MoveNext

Saludos

97
Visual Basic 6.0 e inferiores / Re: Urgente
« en: Miércoles 4 de Diciembre de 2002, 15:12 »
Te mando un ejemplo de como hacerlo

Espero te sea útil

Salu2

98
Visual Basic 6.0 e inferiores / Re: Saludos
« en: Viernes 29 de Noviembre de 2002, 13:18 »
Hola compañeros

Vuelvo a estar en activo. Unos problemillas con mi ordenador me han tenido fuera de circulación unos meses.

Pido disculpas a aquesllos que me habeis solicitado ayuda. He leido vuestros mensajes, pero no he podido responderlos. No penseis que he pasado de vosotros.

Espero seguir ayudando y que me sigais ayudando

99
Visual Basic 6.0 e inferiores / Re: Validación de Campos
« en: Viernes 29 de Noviembre de 2002, 13:15 »
El textbox tiene un evento llamado Validate, que evalua el contenido cuando intentas pasar a otro control. Si es incorrecto puedes forzarlo a quedarse en ese textbox

100
Visual Basic 6.0 e inferiores / 2 informes en uno (CR 4.5)
« en: Martes 15 de Octubre de 2002, 08:27 »
No se si la versión 4.5 de CR lo permite, pero me imagino que sí. Me refiero a crear un subinforme dentro de un informe.

Crystal te proporciona la posibilidad de insertar un informe dentro de otro informe, de manera que, enlazados por un campo determinado, te permite ver información diversa sin tener que anidar grupos.

Saludos

Páginas: 1 2 3 [4] 5 6 7