Programación General > Visual Basic 6.0 e inferiores

 numeros positivos y negativos

(1/1)

fraj:
hi amios, tengo un peño problema  espero q me ayuden  
quiero q en un lbl me vote un nº negativo y positivo ejm -1,+2,-3,+4....

En este programa me vota : 1,3,5,.... Yo quiero q me vote -1,+3,-5,+7......
 :(  :(
espero q me ayuden de antemano  muchas graciassssssssss
salu22222

Private Sub Command1_Click()
Dim nu As Integer, i As Integer
nu = Val(Txtnu.Text)
For i = 1 To nu Step 2

Print i
Next
End Sub

m0skit0:
Primer y última vez que te respondo sin que uses las etiquetas de código  :angry:


--- Código: Visual Basic ---Private Sub Command1_Click()    Dim nu As Integer, i As Integer    Dim signo as Boolean     nu = Val(Txtnu.Text)    signo = True     For i = 1 To nu Step 2        If signo Then            Print "-" & CStr(i)        Else            Print "+" & CStr(i)        End If        signo = Not signo    Next i End Sub Por ejemplo.

fraj:
muchas gracias , x tu ayuda
no se volvera a repetir  
para la otra usare code  :D  :D  :D

Nebire:

--- Cita de: "fraj" ---hi amios, tengo un peño problema  espero q me ayuden  
quiero q en un lbl me vote un nº negativo y positivo ejm -1,+2,-3,+4....

En este programa me vota : 1,3,5,.... Yo quiero q me vote -1,+3,-5,+7......
 
--- Fin de la cita ---

Esto es la serie de Euler... parece que ahora le ha tocado el turno a las series matemáticas para los problemas  que os plantean  los profesores ... que mejor que distraer al personal no usando el nombre de la serie, verdad ????.

Aunque mosquito te da un algoritmo que resuelve tu problema, cuando se trabaja con números lo mejor es usar strings lo menos posible...  es decir sólo en la entrega al control si es posible...

El siguiente código lo resuelve de dicha manera...


--- Código: Visual Basic ---  Private Sub Command3_Click()    Dim i As Integer, n As Integer    Dim paso As Integer           s = 1: paso = 1    For i = 1 To HScroll1.Value Step paso        n = i * s        MsgBox CStr(n)        s = -s     NextEnd Sub  
Lo ideal es montar el código en una función de modo que se le pasen 3 parámetros valor inicial, cantidad de elementos a calcular y distancia entre cada número, que en el bucle se identifican con el  punto de inicio del bucle, punto alto del bucle (en el ejemplo se ha supuesto que un control scroll señala la cantidad a calcular) y el paso (step)... los valores se alamcenarían en una matriz que al término del bucle entrega....

m0skit0:

--- Cita de: "Nebire" ---cuando se trabaja con números lo mejor es usar strings lo menos posible
--- Fin de la cita ---
Totalmente de acuerdo. Creo que mi código sólo usa cadenas con Print y en ningún otro lado. De hecho, no hay definida ninguna cadena... De todas formas fue una respuesta rápida. Todo sea dicho, me gusta más tu algoritmo  ^_^

Navegación

[0] Índice de Mensajes