• Sábado 4 de Mayo de 2024, 23:16

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

Páginas: [1]
1
Visual Basic para principiantes / Re: Calculadora Cientifica
« en: Domingo 27 de Septiembre de 2009, 20:07 »
wow a eso le llamo ayuda man muchas gracias por la guia voy a intentar hacerla aunque como te dije soy demasiado principiante y mi unico profe a sido el youtube que dicho sea de paso no enseña nada sino solo a hacer proyectos pero no lo explican como lo has explicado tu voy a intentar traducir todo lo que has hecho a mi idioma y cuando termine el proyecto te lo voy a pasar para que me termines de dar una ayuda .... si es que puedes.

salu2

2
Visual Basic para principiantes / Calculadora Cientifica
« en: Jueves 24 de Septiembre de 2009, 01:38 »
hola.

Tengo 3 dias en la programacion y estoy en mi 2do proyecto pero noc como terminarlo tengo algunos codigos pero me hacen falta algunos lo que estoy haciendo es una calculadora cientifica pero noc como hacer para que la respuesta me salga en el Textbox ya que lo unico que e podido hacer es que me salga en un Msgbox ahi e hecho que me salga la Raiz y el Porcentaje si me pueden decir como hacer para que me salga en un textbox solamente en 1 textbox asi como la calculadora de windows y tambien ayudenme a hacer la tangente,sen y coseno es que como recien estoy empezando no se como se hace y por mas que busco en internet no encuentro alguna solucion para mi problema.

Aca les dejo los codigos con los que estoy trabajando ahorita mi Calculadora esta un poco fea xq los numeros me salen en el Textbox1 mas no en el 2 ni en el 3 luego la raiz y el porcentaje me salen en un msgbox y para sumar restar y dividir solo se hacerlo en 3 text box mas no en 1 porfavor ayudenme.

para raiz estoy haciendo asi:

Dim x, r, incr, tol, s As Double
x = TextBox1.Text
r=1
incr=1
tol=0.0001
Do While incr > tol
if r*r = x then
incr = tol
end if
s=r + incr
if s*s > x then
incr = incr/2
else
r=s
end if
loop
MsgBox("esta es tu raiz" & " " & r)

para el porcentaje lo he hecho asi

dim x,y,a As Double
x = textbox1.text
y = textbox2.text
a = x/100*y
if x/100*y = a then
MsgBox("este es tu porcentaje" & " " & a)

la potencia:

Dim x, a As integer
x = textbox1.text
a = x*x
if x*x = a then
MsgBox(x & " " & "al cuadrado es" & " " & a)

la suma resta division multiplicacion y division la estoy haciendo asi
textbox3.text = val(textbox1.text) + val(textbox2.text)
textbox3.text = textbox1.text - textbox2.text
textbox3.text = textbox1.text * textbox2.text
textbox3.text = textbox1.text / textbox2.text

y los numeros los estoy poniendo asi

textbox1.text = textbox1.text & "1"  
'entre las comillas va lo que quiero que funcione.

Alguien que me ayude a ordenar todo esto para que todo pueda ponerlo con un solo textbox porfavor
y si tambien me puede ayudar con la tangente seno y coseno.

Páginas: [1]