numeros pares e impares

kota
20 de Marzo del 2006
necesito un programa que me muestre numeros pares o impares...
en un butto---> cuando aplaste el button me pregunte que ¿introduce un numero? y despues de que introdusca el numero me pregunte ¿que tipo de numero?
ejemplo
aplasto el button me aparece un cuadro que me pregunta ¿introduce un numero? poner 20
despues de poner 20 y dar acptar que me aparesca otra que me pregunte ¿tipo de numero? poner pares o impares cualquiera de ellas....ejemplo pares
entonces que me muestre en un textbox los numeros pares hasta el numero 20
2-4-6-8-10-12-14-16-18-20
y si deseo los numeros impares
1-3-5-7-9-11-13-15-17-19

LLE
20 de Marzo del 2006
te pongo un ejemplo, adaptalo:
Private Sub Form_Load()
n = InputBox("infrse un numero")
j = InputBox("Si quiere pares escriba 0, si no 1")



For i = j To n Step 2
MsgBox i
Next
End Sub

Saludos

www.recursosvisualbasic.com.ar