elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Entrar al Canal Oficial Telegram de elhacker.net


  Mostrar Mensajes
Páginas: 1 2 3 4 [5]
41  Programación / Programación Visual Basic / Re: Resolver ecuaciones Visual Basic 6.0 en: 8 Julio 2009, 21:29 pm
Sigue diciendo que el argumento no es opcional..
Y me subralla  Private Sub Igual_Click()

Osea lo primero que sale.. ya me dice que no.. u.u no lo entiendo..
42  Programación / Programación Visual Basic / Re: Resolver ecuaciones Visual Basic 6.0 en: 8 Julio 2009, 21:17 pm
Pero si yo le añado cifras a las ventanas de texto.

Vamos que le doy un valor a NumA , y a NumB , me deberia hacer una operacion matematica para darme el valor de NumC.. sin envargo no hace nada..

Nose pq. si puedes agregarme al msn y lo hablamos mas detenidamente.. :)
Jhn.tt@hotmail.com
43  Programación / Programación Visual Basic / Re: Resolver ecuaciones Visual Basic 6.0 en: 8 Julio 2009, 17:55 pm
Ya lo he remodelado , siguiendo vuestros consejos y queda algo asi

Private Sub Igual_Click()
If Signo.List = "+" Then
NumC = Val(NumA) + Val(NumB)  'Marcar + en lista , sumar

ElseIf Signo.List = "-" Then
NumC = Val(NumA) - Val(NumB)  'Marcar - en lista , restar

ElseIf Signo.List = "/" Then
NumC = Val(NumA) / Val(NumB)  'Marcar / en lista, dividir


ElseIf Signo.List = "*" Then
NumC = Val(NumA) * Val(NumB)  'Marcar * en lista , multiplicar
End If
End Sub


No da error ni nada , pero a la hor ade ejecutar el programa , no funciona.. al presionar el comandbuton IGUAL , no responde , no hace absolutamente nada..
44  Programación / Programación Visual Basic / Re: Resolver ecuaciones Visual Basic 6.0 en: 8 Julio 2009, 16:55 pm
Gracias ,lo mirare :P

Una cosa.. he empezado a desarroyar algo , poco a poco..

y me da error al compilar

Miren el codigo es el siguiente:


Private Sub Igual_Click()
If Signo.List = "+" Then
NumC = Val(NumA) + Val(NumB)  'Marcar + en lista , sumar
End Sub

Private Sub Igual_Click()
If Signo.List = "-" Then
NumC = Val(NumA) - Val(NumB)  'Marcar - en lista , restar
End Sub

Private Sub Igual_Click()
If Signo.List = "/" Then
NumC = Val(NumA) / Val(NumB)  'Marcar / en lista, dividir
End Sub

Private Sub Igual_Click()
If Signo.List = "*" Then
NumC = Val(NumA) * Val(NumB)  'Marcar * en lista , multiplicar
End Sub

End Sub


Me da error  " Se ha detectado un nombe ambiguo Igual_Click() , y marca el que he marcado en color.

Nose si deveo explicar como esta hecho.. ueno hay 2 cajas de texto para introducir cifras ,una lista donde se pueden escoger los signos de suma , resta , dividir i multiplicar , un comand box para clicar y una caja de texto final donde sale el resultado.

Saludos ,y aver si me pueden ayudar :)
45  Programación / Programación Visual Basic / Resolver ecuaciones Visual Basic 6.0 en: 7 Julio 2009, 20:22 pm
Hola , bueno gente , pues tengo que presentar un proyecto y se trata de un programa que resuelva ecuaciones de primer , segundo , tercer , cuarto y asta quinto grado.

Alguien sabria decirme donde puedo buscar codigos.. ayuda.. o alguien ha hecho algo semejante?

Esque soy principiante en visual basic.. y pues.. estoy atrancado , nose ni por donde empezar..

Entiendo los codigos y como funciona el lenguaje.

Saludos y gracias
46  Media / Juegos y Consolas / Re: Ayuda con Call of duty 4 en: 29 Junio 2008, 23:20 pm
Pero seguramente si te an baneado una vez volveran a hacerlo .

Vigila e informate de como evitar que te baneen.

saludos
Páginas: 1 2 3 4 [5]
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines