Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: kidxabi en 12 Febrero 2010, 18:40 pm



Título: Ayuda... Algo está mal.
Publicado por: kidxabi en 12 Febrero 2010, 18:40 pm
Hola, estoy haciendo una calculadora sólo de sumas pero con decimal, con las variables double, y tengo este código de fuente
Private Sub cmd3_Click()
'declaracion de variables
Dim decimal1 As Double
Dim decimal2 As Double
'coger datos para variables
decimal1 = Txt7.Text
decimal2 = txt8.Text
'acción
Text9.Text = decimal1 + decimal2
End Sub
Pero cuando lo pruebo, me sale "Error '13' en tiempo de ejecución:
No coinciden los tipos".
Miro a ver si he asignado bien las variables, y sí, todo está bien, pero sigue sin funcionar...
Por qué puede ser?


Título: Re: Ayuda... Algo está mal.
Publicado por: Shell Root en 12 Febrero 2010, 19:03 pm
El error sale al momento de ejectar la Application o al darle click en el Boton3?
Ami me funka bien así!


Título: Re: Ayuda... Algo está mal.
Publicado por: kidxabi en 12 Febrero 2010, 19:05 pm
El error sale al momento de ejectar la Application o al darle click en el Boton3?
Ami me funka bien así!
sale en el momento de ejecutar...


Título: Re: Ayuda... Algo está mal.
Publicado por: Shell Root en 12 Febrero 2010, 19:06 pm
Entonces muestranos lo que tenes en el Load


Título: Re: Ayuda... Algo está mal.
Publicado por: kidxabi en 12 Febrero 2010, 19:08 pm
Entonces muestranos lo que tenes en el Load
donde?


Título: Re: Ayuda... Algo está mal.
Publicado por: kidxabi en 12 Febrero 2010, 19:09 pm
perdón por mi ignorancia, empecé ayer...
ah, tengo el vb6 en español


Título: Re: Ayuda... Algo está mal.
Publicado por: Shell Root en 12 Febrero 2010, 19:12 pm
jajaja por eso, muestranos lo que tenes en el Load, osea,

Código
  1. Private Sub Form_Load()
  2.    ' Load
  3. End Sub


Título: Re: Ayuda... Algo está mal.
Publicado por: kidxabi en 12 Febrero 2010, 19:17 pm
jajaja por eso, muestranos lo que tenes en el Load, osea,

Código
  1. Private Sub Form_Load()
  2.    ' Load
  3. End Sub
tio, no te entiendo :S:S
tienes msn??
para poder pasarte screenshoots y seo


Título: Re: Ayuda... Algo está mal.
Publicado por: Shell Root en 12 Febrero 2010, 19:19 pm
Solo Usuarios V.I.P, deberias de leerte un manual de Visual Basic 6, si no sabes que es Load, no sabes hacer nada!


Título: Re: Ayuda... Algo está mal.
Publicado por: kidxabi en 12 Febrero 2010, 19:22 pm
Solo Usuarios V.I.P, deberias de leerte un manual de Visual Basic 6, si no sabes que es Load, no sabes hacer nada!
ok...
ahora me lo leo


Título: Re: Ayuda... Algo está mal.
Publicado por: Dessa en 12 Febrero 2010, 19:25 pm
Solo Usuarios V.I.P, deberias de leerte un manual de Visual Basic 6, si no sabes que es Load, no sabes hacer nada!

+1

una duda,  prueba asi, solo para ver si desaparece el error 13

Código:

Private Sub cmd3_Click()

 'declaracion de variables
Dim decimal1 As Double
Dim decimal2 As Double
 'coger datos para variables
 decimal1 = Val(Txt7.Text)
 decimal2 = Val(Txt8.Text)
 'acción
 Text9.Text = decimal1 + decimal2

End Sub



Título: Re: Ayuda... Algo está mal.
Publicado por: kidxabi en 12 Febrero 2010, 19:30 pm
Solo Usuarios V.I.P, deberias de leerte un manual de Visual Basic 6, si no sabes que es Load, no sabes hacer nada!

+1

una duda,  prueba asi, solo para ver si desaparece el error 13

Código:

Private Sub cmd3_Click()

 'declaracion de variables
Dim decimal1 As Double
Dim decimal2 As Double
 'coger datos para variables
 decimal1 = Val(Txt7.Text)
 decimal2 = Val(Txt8.Text)
 'acción
 Text9.Text = decimal1 + decimal2

End Sub


Tio, eres un crack.
Se me había olvidado que para hacer sumas, restas... había que poner "Val (String as string)"
Mil gracias :)
Y otra cosa, me puedes mandar el link de lo del "load"?
Gracias:
kidxabi


Título: Re: Ayuda... Algo está mal.
Publicado por: Shell Root en 12 Febrero 2010, 19:31 pm
una duda,  prueba asi, solo para ver si desaparece el error 13
Aunque igual sin la función VAL(), funciona correctamente!.
Preferiblemente es recomendable usar la funcion para recoger el valor Integer de un campo String



Se me había olvidado que para hacer sumas, restas... había que poner "Val (String as string)"
Mil gracias :)
WTF! Se te soluciono el problema, con eso?



Y otra cosa, me puedes mandar el link de lo del "load"?
Leete un Manual desde 0 xD


Título: Re: Ayuda... Algo está mal.
Publicado por: Dessa en 12 Febrero 2010, 19:35 pm

una duda,  prueba asi, solo para ver si desaparece el error 13




@ kidxabi, lamentablemente estoy lejos de ser crack


Título: Re: Ayuda... Algo está mal.
Publicado por: kidxabi en 12 Febrero 2010, 19:53 pm

una duda,  prueba asi, solo para ver si desaparece el error 13




@ kidxabi, lamentablemente estoy lejos de ser crack
con el problema que he tenido, eres un crack, ya que me lo has solucionao