Foros del Web » Programación para mayores de 30 ;) » .NET »

Tablas de multiplicar

Estas en el tema de Tablas de multiplicar en el foro de .NET en Foros del Web. Saludos Estoy tratando de construir un programa para las tablas de multiplicar en visual Basic Net tengo un textbox1.text en donde lee el numero de ...
  #1 (permalink)  
Antiguo 31/03/2006, 15:47
 
Fecha de Ingreso: diciembre-2004
Mensajes: 475
Antigüedad: 19 años, 4 meses
Puntos: 4
Tablas de multiplicar

Saludos

Estoy tratando de construir un programa para las tablas de multiplicar
en visual Basic Net
tengo un textbox1.text en donde lee el numero de la tabla correpondiente
y deseo que en otro textbox2.text me muestre el proceso es decir:

2x1=2
2x2=4
.
.
.
2x10=20
este es mi codigo:
If TextBox1.Text = "" Then
MsgBox("DATO")
Else
A = TextBox1.Text
For B = 1 To 10
C = A * B
TextBox2.Text = A & " x " & B & " = " & C
Next
End If
End Sub
Pero solo me muestra el ultimo proceso
es decir solo visualizo 2x10=20
Espero correcciones
Gracias
  #2 (permalink)  
Antiguo 31/03/2006, 21:14
Avatar de GeoAvila
Colaborador
 
Fecha de Ingreso: diciembre-2003
Ubicación: Antigua Guatemala
Mensajes: 4.032
Antigüedad: 20 años, 4 meses
Puntos: 53
TextBox2.Text = TextBox2.Text & A & " x " & B & " = " & C

probá de esa manera...

nos vemos..
__________________
* Antes de preguntar lee las FAQ, y por favor no hagas preguntas en las FAQ
Sitio http://www.geoavila.com twitter: @GeoAvila
  #3 (permalink)  
Antiguo 01/04/2006, 13:56
 
Fecha de Ingreso: diciembre-2004
Mensajes: 475
Antigüedad: 19 años, 4 meses
Puntos: 4
Y como le coloco un salto de linea
  #4 (permalink)  
Antiguo 01/04/2006, 17:55
Avatar de RootK
Moderador
 
Fecha de Ingreso: febrero-2002
Ubicación: México D.F
Mensajes: 8.004
Antigüedad: 22 años, 2 meses
Puntos: 50
te puede quedar así tu code...

Cita:
Dim A As Integer
Dim C As Integer

If TextBox1.Text = "" Then
MsgBox("DATO")
Else
A = CType(TextBox1.Text, Integer)
For B As Integer = 1 To 10
TextBox2.Text &= A & " x " & B & " = " & (A * B).ToString & Chr(13) & Chr(10)
Next
End If
Por cierto.. de una vez te mando al subforo de windows forms

movido desde subforo de visual basic

Salu2 y cualquier cosa por aqui andamos..
__________________
Nadie roba nada ya que en la vida todo se paga . . .

Exentrit - Soluciones SharePoint & Net
  #5 (permalink)  
Antiguo 02/04/2006, 20:10
 
Fecha de Ingreso: diciembre-2004
Mensajes: 475
Antigüedad: 19 años, 4 meses
Puntos: 4
Gracias funciona de maravilla...
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta

SíEste tema le ha gustado a 1 personas (incluyéndote)




La zona horaria es GMT -6. Ahora son las 17:30.