25/02/2010, 01:18
|
| | Fecha de Ingreso: febrero-2010
Mensajes: 5
Antigüedad: 14 años, 9 meses Puntos: 0 | |
Ayuda con programita de Visual Basic 2005 Muy buenas a todos hace poco me dejaron una tarea en mi clase de programacion, la cual es esta:
Desarrollar una aplicación en Visual Basic 2005 que muestre la siguiente serie
*2, *4,*6,*8,*10…..*100
El código q use es este :
Public Class Form1
Dim numerotope As Long
Dim Nro As Long
Dim pares As String
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Nro = 0
numerotope = 100
pares = ""
For Nro = "*1" To numerotope
If Nro Mod "*2" = "*0" Then
pares = pares & CStr(Nro) & vbCrLf
End If
Next
MsgBox("Serie de numeros" & vbCrLf & pares)
End Sub
End Class
Por logica el ejercicio pide a Gritos mostrar numeros pares, asi q con ese codigo muestra exactamente los numeros pares, pero no se como hacer para q muestre el asterisco en cada uno, tiene q llevar los asteriscos a fuerza porq a un amigo le dejaron uno parecido solo q la serie de el tiene q ir -2, -4, -6, -8, … -100, entonces por fuerza tiene q llevar los asteriscos, mi pregunta era si deberia modificar el codigo para mejor darle un valor a un variable “i” digamos para despues poner un print "(“*”, i) o algo asi."
Creo q el codigo podria ir mucho mas sencillo y talvez yo me estoy complicando mucho, pero es q esto de la progra no es mi campo y ps como esta es tarea me reurge hacerla si me pueden ayudar con el codigo se los agradeeria mucho, como les decia creo q talvez no es el gran codigo el q hay q hacer, de antemano muchas gracias |