• Jueves 2 de Mayo de 2024, 03:39

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 - abelsql3000

Páginas: 1 2 [3] 4
51
Visual Basic 6.0 e inferiores / Solo Numeros En Textbox
« en: Sábado 3 de Febrero de 2007, 19:16 »
Ya estoy algo oxidado en vb. He programado antes, pero como lo he dejado ud comprenderan.
Estoy haciendo esta linea de codigo donde intendto restringir el cuadro de texto a solo numeros.
Como veran uso el evento keypress
y la funcion INSTR
Este es el  codigo
Private Sub Text1_KeyPress(KeyAscii As Integer)
numeros = Chr(KeyAscii)
Print n
If InStr(n, "1234567890") <> 0 Then
KeyAscii = 0
End If
End Sub

En que me estoy equivocando amigos programadores
De ante mano les agradesco su aporte. atte Abel.

52
Visual Basic 6.0 e inferiores / Curiosidad En El Combobox
« en: Martes 30 de Enero de 2007, 06:54 »
He colocado un combobox y le he agregado elementos con la propiedad LIST, le he colocado ademas la propiedad STYLE a 2 (Dropdown List)
Ahora lo que deseo es que al cargar el formulario este activo el primer elemento del cuadro combinado sin que yo tenga que codificar en algun procedimiento evento ya sea Load,Initialize,Activate.
Habra alguna propiedad que logre esto, o sera que necesariamente use uno de estos eventos y manipule el metodo ListIndex para lograr mi objetivo.
Expertos en la materia como logran esto?
El porque de esta consulta es debido a que se ve realmente torpe usar un procedimiento evento para colocar una sola linea de codigo, al menos yo lo veo como una verdadera perdida de espacio.
Bueno... espero sus comentarios y respuesta.
Atte Abelsql3000

53
Visual FoxPro / Select Case Vs Do Case
« en: Domingo 28 de Enero de 2007, 06:09 »
Hola amigos, este es el codigo en VB usando la sentencia multicondicional, lo que deseo es usar es el DO CASE de VFP, evaluando una variable con intervalos como lo usa VB

x=val(txtnumero)
Select Case x
Case is <5
proceso1
Case 5 to 10
proceso2
Case 11 to 20
proceso3
Case Else
proceso4
End Select

¿Como se logra el intervalo de valores en VFP?
Plz mandenme un ejemplo. Me han dicho que se usa una funcion, pero no se si es la unica propuesta, espero la mejor propuesta, de ante mano muchas gracias, ABEL

54
Visual Basic 6.0 e inferiores / Ocultar Iconos Del Systray
« en: Viernes 12 de Enero de 2007, 22:10 »
Necesito codigo que me permita ocultar, pero no eliminar algunos iconos que se encuentran alojados en el systray o tambien llamado bandeja de sistema.



Deseo crear un programita sencillo
Actualmente uso un programa llamado
Systrayx 3.70
El que desee lo puede probar, pero deseo algo mas a mi medida
Espero su plena colaboracion en la construccion de este programita

55
Dudas informáticas / Re: Privacidad En El Messenger
« en: Domingo 7 de Enero de 2007, 22:58 »
Hola amigo angel-k-ido
dime donde encuentro esto de

desmarca las casillas:

-Recordar mi cuenta
-Recordar mi contraseña
-Iniciar sesión automáticamente


Te pido que me indique en forma mas detallada, te lo agradecere
Atte Abel

56
Dudas informáticas / Privacidad En El Messenger
« en: Sábado 6 de Enero de 2007, 23:56 »
Hola amigos tengo la version 4.7 de Windows messenger y lo que deseo es que no aparesca mi cuenta de usuario en las sesiones, como se muestran en las siguientes graficas.
Observe bien los recuadros rojos, que he colocado, plz no deseo que aparesca ahi ya que sino mi mama me pega, jeje, no en verdad es para evitar que se metan los demas usuarios donde no deben, es decir, a mi cuenta de usuario.


57
Dudas informáticas / Re: Excel, El Tercer Mayor
« en: Domingo 31 de Diciembre de 2006, 21:44 »
un nada, esta dificil la pregunta?, bueno... espero pronta respuesta, atte abel

58
Windows / Systray, Bandeja De Sistema
« en: Viernes 29 de Diciembre de 2006, 23:11 »
He visto que algunos expertos saben manipular muy bien el REGEDIT, por consiguiente quisiera saber que como puedo ocultar los iconos que se ubican en la bandeja de sistema, No deseo dejarlo de ejecutar, solo ocultar, necesito su ayuda amigos expertos, indiquenme por favor en forma detallada la forma de logralo, tengo win98 y winxp
atte Abel

59
Visual FoxPro / Una Linea De Codigo En If
« en: Viernes 29 de Diciembre de 2006, 23:05 »
hola amigos
Se puede tener una misma linea de codigo para el uso del IF en VFP como ocurre en VB
Ejemplo:

Private Sub Check5_Click(Index As Integer)
Static suma
Static cuenta
suma = 0
cuenta=0
If Check5(0).Value Then suma = suma + 10:cuenta=cuenta+1
If Check5(1).Value Then suma = suma + 20:cuenta=cuenta+1
If Check5(2).Value Then suma = suma + 30:cuenta=cuenta+1
If Check5(3).Value Then suma = suma + 40:cuenta=cuenta+1
Print Str(suma)
Print str(cuenta)
End Sub

60
Dudas informáticas / Re: Excel, El Tercer Mayor
« en: Viernes 29 de Diciembre de 2006, 19:37 »
disculpa si no me he hecho entender pero ahora mando una grafica que muestra las notas de los alumnos que tengo, como podras apreciar la mayor nota es 20 en cambio la 5ta nota mayor es 16 ¿como hago para extraer este valor ? ¿Uso una funcion? ¿cual es?

Gracias por la ayuda amigos F_Tanori
Atte Abel

61
Visual Basic 6.0 e inferiores / Re: Select Case Dudas De Uso
« en: Viernes 29 de Diciembre de 2006, 07:20 »
En fin, no sucede con el switch de Borland C, es por eso la unica solucion mas practica es esta.

Private Sub Check1_Click(Index As Integer)
Static suma
suma = 0
If Check1(0).Value Then suma = suma + 10
If Check1(1).Value Then suma = suma + 20
If Check1(2).Value Then suma = suma + 30
If Check1(3).Value Then suma = suma + 40

Print Str(suma)
End Sub

Es lo que deseaba, a menos codigo mas facil la existencia.

62
Novedades en SoloCodigo / Re: INOCENTADA: Cierre De Solocodigo
« en: Viernes 29 de Diciembre de 2006, 06:41 »
JAJAJA si que me hicieron reir, se pasaron, ehhh.
Ohe en verdad me apene saber que eso sucederia, pero en fin. Sin duda el fin de las cosas no las determina el hombre sino Dios todopoderoso JEHOVA, a traves de su hijo Jesucristo, que por medio de él fue hecho todas las cosas visibles en invisibles, y por medio de él subsistente las cosas.
Por ello no depende de que yo o tú deseas que se haga algo mañana o pasado mañana, o hacer planes futuros, sino que mi palabra sea "SI DIOS ME LO PERMITE". O "DIOS MEDIANTE".
Sabiendo que no depende de nosotros que sucedan las cosas encomien mi espiritu, alma y cuerpo  al que tiene cuidado de todas las cosas, en quien no hay sombra de variacion, a quien hace todas las cosas posibles por el poder de su palabra, al que permanece por siempre, al Padre de JESUCRISTO. amén.

63
Visual Basic 6.0 e inferiores / Re: Visual Basic Y Power Point
« en: Viernes 29 de Diciembre de 2006, 05:51 »
Gracias por la critica ArKaNtOs. Intentare expresarme mejor la proxima vez
Aqui esta lo que estab buscando no se si es lo que me sugeriael compañero Zirrosisn (api ShellExecute), en fin.
Otra cosa amigo Angel_K_ido te suguiero dar las respuesta a las consultas en el mismo foro y no derivarlos a otros foros sin responderles aqui, de manera que la gente prefiera este interesante foro llamado "SOLOCODIGO". Debemos hacer respetar la casa

Este es es el codigo segun la instalacion hecha en mi PC, ahora ud lo cambian segun la ubicacion del archivo ejecutable y el archivo documento deseado

Private Sub Command1_Click()
Shell "C:\Archivos de programa\Microsoft Office\Office\Powerpnt.exe d]", 1
End Sub

Gracias a Todos, atte Abel

64
Visual Basic 6.0 e inferiores / Re: Select Case Dudas De Uso
« en: Jueves 28 de Diciembre de 2006, 01:35 »
TIENES RAZON AMIGO, DISCULPA EL MAL ENTENDIDO, ES QUE ESTABA APURADO.

La consulta es los sgte: Tengo 5 checkbox y deseo que se incremente el acumulador que he definido en funcion al caso que haya sucedido al activar cierto checkbox, por ejemplo check1, check3,check5. El acumulador debe ser 900, segun el ejemplo.

Private Sub Command1_Click()
Static Sum
Sum = 0
Select Case True
Case Check1.Value
        Sum = Sum + 100
Case Check2.Value
        Sum = Sum + 200
Case Check3.Value
        Sum = Sum + 300
Case Check4.Value
        Sum = Sum + 400
Case Else
        Sum = Sum + 500
End Select
Print Str(Sum)
End Sub

No me funciona aqui el select case para evaluar varios casos

65
Visual Basic 6.0 e inferiores / Select Case Dudas De Uso
« en: Miércoles 27 de Diciembre de 2006, 23:41 »
Miren amigos he leido materiales que me an confundido en ves de ayudar, dicen que la sentencia select case puede hacer varios caso de verdad, otros dicen que solo hace uno y sale del select case, que de cierto es esto ya que necesito usar el select case si es que este puede hacer varios caso a la ves, ejemplo tengo varios checkbox y si se activan dos o tres de ellos que hagan los procesos definidos en el cada Case del select case, pasen ejemplo de esta ocurrencia de SELECT case y Chekbox

66
Dudas informáticas / Excel, El Tercer Mayor
« en: Miércoles 27 de Diciembre de 2006, 23:32 »
Tengo en EXcel unas celdas que almacenna el registro de las notas de mis alumnos los cuales son unos 50 y son 3 que tiene 20, 7 que tiene 19, 5 que tiene 18, y en fin. Lo que deseo es una funcion que me identifique o extraiga la tercera nota mayor que es 18, no el tercer repetido,mayor que es el 19, sino el tercer mayor que es 18, espero me entienda y mandarme ayuda de la funcion que hace esto, gracias

67
Visual Basic 6.0 e inferiores / Visual Basic Y Power Point
« en: Miércoles 27 de Diciembre de 2006, 23:22 »
Tengo un boton comando en un formulario y deseo que al hacerle click me abra una diapositiva (*.ppt) o (*.pps) en particular.
Por favor mandeme el codigo que es urgente

68
Visual Basic 6.0 e inferiores / Re: Select Case Y Optionbutton
« en: Jueves 21 de Diciembre de 2006, 05:55 »
Gracias por todos sus comentarios me agrada su interes en las inquietudes que tengo, les cuento que habia colgado los guantes de la programacion en vb, ya que me habia dedicado a dictar clases de matematicas, es ahora que se me apresentado mi nuevo empleo como profesor de informatica,  lo cual me agrado ya que he inertidos 3 años de mi vida en el mundo de la informatica, por lo tanto que era razonable que me este ejerciendo una labor correspondiente a mi capacitacion. No pensabe ver mas la programacion, pero ahora que lo estoy enseñando me entretiene mucho, ya que es todo una experiencia, realmente es algo complicado enseñar programacion si un previo conocimiento de lenguaje estructura , concimientos en seudocodigo y algoritmos. Esta pequeño grupo de informatica ha colocado a vb y vfp dentro de su curricula para una carrera de solo 6 meses, de los cuales 2 son para estos cursos. Me ha costado verdad lograr resultados satisfactorios, hay interesados en saber la programacion, pero con el corto tiempo no se logra el objetivo de ser un programador eso es indiscutible.
Gracias amigos por q es con su ayuda que puedo yo capacitar personas de diferentes edades.
Entenderan que estoy algo oxidado en programacion, estoy desempolvado, pero a pesar de ello me doy en todo para que mis estudiantes aprendan como les digo a los alumnos. Si es posible escribiria en la pared si no hubiera pizarra.

Este es el codigo que deseaba
Private Sub Command1_clic()
Select Case True
Case Option1.Value
Print "1"
Case Option2.Value
Print "2"
Case Option3.Value
Print "3"
Case Else
Print "4"
End Select
End Sub
Ya que seaba evaluar el boton desde un boton de comando y no interactuando directamente con ellos, mucho menso usando arreglos de control, no quiero complicarle la existencia a mis alumnos, ya que no tienen la experiencia que nosotros tenemos.
Gracias por todos mi nombre es ABEL de lima, PERU
FELIZ NAVIDAD
El de Jesucristo es el mejor, a el sea la gloria el imperio, la majestad.
El de Jesucristo es el mejor

69
Visual Basic 6.0 e inferiores / Inhabilitar Textbox
« en: Domingo 17 de Diciembre de 2006, 06:17 »
Deseo inhabilitar un textbox, he usado el enabled a FALSE pero la el color de fuente se pone opaca. He usado tambien el LOCKED, es interesante pero no me gusta porque aun se puede llevar el cursor sobre el cursor y eso da entender al usuario que se puede escribir, por lo tanto deseo que este bien inhabiliatdo pero que el color de la fuente no se opaque, ESPERO SUS SUGERENCIAS EXPERTO.

70
Visual Basic 6.0 e inferiores / Re: Select Case Y Optionbutton
« en: Domingo 17 de Diciembre de 2006, 06:05 »
Quisiera compartir un interezante codigo que me andaron y es lo que andaba buscando:

SELECT CASE True
CASE opt(0).Value
call mirutina(params...)
CASE opt(1).Value
call mirutina(params...)
CASE opt(2).Value
call mirutina(params...)
CASE opt(3).Value
call mirutina(params...)
CASE opt(4).Value
call mirutina(params...)
CASE Else
call mirutina(params...)
END CASE

Este de aqui es muy eficiente, (Y)

71
Visual Basic 6.0 e inferiores / Re: Select Case Y Optionbutton
« en: Sábado 16 de Diciembre de 2006, 06:16 »
Muchas gracia por la respuesta, disculpa si no he sido cortes con mi solicitud. Te quiero  complicar un poco las cosas. Tu sugerencia en le codigo es buena solo que la evaluacion se dara cada vez que haces click en los botones, pero yo deseo evaluar a los botones desde un COMMAND, mas no a la hora de hacer click sobre los botones, espero me comprendas. El objetivo es evaluar el boton que se activo desde un boton de comando, esto lo he realizado en VFP sin problemas mas en VB ya las cosas se complicaron
Aqui esta el codigo en VFP
Cmdevaluar      Click
Do case
case thisform.optgrupo.value=1
        proceso1
case thisform.optgrupo.value=2
       proceso2
       .
       .
       .
       .
otherwise
      proceso n
endcase
Ahora como lo logro con VB, Gracias, Abel

72
Visual FoxPro / Imagen De Fondo Para Un Formulario
« en: Viernes 15 de Diciembre de 2006, 07:17 »
he deseado poner una imagen como fondo en el formulario, pero no cubre todo el formulario, cual es el problema, mi imagen es muy pequeña o hay una propiedad para estirar la imagen, por favor indiqueme que debo hacer con exactitud con ejemplo. atte Abel

73
Visual Basic 6.0 e inferiores / Select Case Y Optionbutton
« en: Viernes 15 de Diciembre de 2006, 07:14 »
Como puedo usar el select case para evaluar que boton se encuentra activado de una serie de botones, por favor mandeme un codigo ejemplo que lo necesito.
Deseo tambien usar un Select case que me evalue que elemento de la lista he seleccionado.
Plz deseo ejemplos , atte, Abel

74
Visual FoxPro / Validar El Textbox
« en: Viernes 15 de Diciembre de 2006, 07:05 »
Hola quiero usar el evento keypress para validar la entrada de solo numeros en vfp, pero no me funciona
El parametro keycode es lo que se muestra, no se como evaluar
deseo que solo se digite numeros caso comtrario que no se imprima el caracter en el texbox.
Plz paseme el codigo

75
Visual FoxPro / Mascara A Textbox
« en: Viernes 1 de Diciembre de 2006, 19:08 »
Deseo el codigo que me permita crear una mascara a un textbox, el objetivo es que se paresca a los que encontramos o vemos en el ingreso de contraseñas o password, donde al digitar nuestra clave, solo vemos asteriscos, o puntos negros. No se si es en TIEMPO DE DISEÑO O TIEMPO DE CODIGO, por favor indiquenme como se realiza tal hazaña.

Páginas: 1 2 [3] 4