Imprimir Página - Duda con For, Next.

Título: Duda con For, Next.
Publicado por: TiT@n en 8 Diciembre 2006, 22:10 pm

Wenas.
Soy novatillo en visual basic, estoy aprendiendo y tengo una pekeña duda.
Me gustaria hacer una tabla de multiplicar con un bucle como la k nos hacian cuando eramos pekeñitos y la verdad es k no me sale, si k me sale con select case, de lo mas sencillo, pero con el bucle na de na, lo he intentado de mil maneras pero no...
Un saludo, y espero k me hecheis un pekeña mano,

P.D: No me deis el programa hecho.
Alguna pistilla...

Título: Re: Duda con For, Next.
Publicado por: Jareth en 8 Diciembre 2006, 22:33 pm

No te he entendido,explicate mejor.

Título: Re: Duda con For, Next.
Publicado por: Red Mx en 8 Diciembre 2006, 22:36 pm

como no entendi

quieres solo hacer una multiplicacion

c

Código:

#include<stdio.h>
void main()
{

	int i,r;

	for(i=0;i<11;i++)

	{

		r=i*5;
	printf("5 por %d es igual a: %d",i,r);


	}
getch();
}

Código:

Dim i,r as integer
for i=0 to 10
r=i*5;
next i

creo era asi tu pregunta bueno el ciclo for es asi pero tambien puedes usar arreglos...

Título: Re: Duda con For, Next.
Publicado por: TiT@n en 8 Diciembre 2006, 22:48 pm

Tu pones el numero en un textbox y te muestra en un label el numero multiplicado por los demas.

Imaginaros.

Por favor, introduce un numero: 12

12*1 = 12
12*2 = 24
12*3= 36

Asi hasta el 10. por eso pensaba en un bucle for next, asi se hace antes no? 1 to 10...

Me entendeis ahora?

Título: Re: Duda con For, Next.
Publicado por: CeLaYa en 8 Diciembre 2006, 22:54 pm

puedes hacerlo con 2 for anidados:

Código:

dim i as integer
dim j as integer
text1.text = ""
for i =1 to 10
     for j = 1 to 10
           text1.text = text1.text & " " & i & " x " & j & " = " & (i*j) & vbcrlf
    next j
next i

Título: Re: Duda con For, Next.
Publicado por: TiT@n en 8 Diciembre 2006, 23:04 pm

Parece k me has entendido algo... pero yo no quiero k lo haga todo a la vez, sino poner un numero y me ponga toda su tablita en un label, poner otro y k me aparezca la de ese numero.

Título: Re: Duda con For, Next.
Publicado por: ReViJa en 8 Diciembre 2006, 23:19 pm

Código:

For x = 1 To 10
   Label1.Caption = Label1.Caption & (Text1.Text & " x " & x & " = " & Val(Text1.Text) * x) & vbCr
Next

Título: Re: Duda con For, Next.
Publicado por: TiT@n en 8 Diciembre 2006, 23:40 pm

y para hacer que cada vez salga una distinto? una tabla distinta? pongo el 1 y me sale la tabla, luego pongo el 2 y kisiera k se borrara la del 1 y me saliera la del 2, no es igual k en turbopascal...

Título: Re: Duda con For, Next.
Publicado por: ReViJa en 8 Diciembre 2006, 23:44 pm

Código:

Label1.Caption = ""
For x = 1 To 10
   Label1.Caption = Label1.Caption & (Text1.Text & " x " & x & " = " & Val(Text1.Text) * x) & vbCr
Next

Título: Re: Duda con For, Next.
Publicado por: TiT@n en 9 Diciembre 2006, 00:01 am

Muchas gracias Tesis, mi problema era que ponia el Label despues del next y me daba 11, todo solucionado, gracias.

Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: TiT@n en 8 Diciembre 2006, 22:10 pm