Tomar el valor de una caja de texto

Resuelto/Cerrado
JAVIER 023 - 20 ago 2009 a las 04:43
 ANDRES DE ZARATE ARGENTINA - 16 jun 2012 a las 17:37
espero se encentren bien, estoi en pañales en el mundo del vb, y estoi tratando de entrar por cmpleto el mundo de la programacion, la pregunta es la siguiente:

Despues de un evento click, se refleja un valor en la caja de text1, como se puede utlizar el valor de text1 para hacer otro calculo, y reflejarlo en una caja de texto2, solo utilizando un evento click
gracias

3 respuestas

Gracias a mi tambien me servio...
solo tengo una duda como en es de hacer operaciones matematicas
hacer k se agregue el valor de texto
ejemplo:
caja1= a
caja2= b

caja_resultado=ab

agradeceria su ayuda.... grasias
4
Hola Juan:

Aquí tenes cuatro metodos distintos.

Agrega seis textbox consecutivos y un commandcom

Aquí tenes el código del commandcom

Private Sub Command1_Click()
Text3.Text = Text1 + Text2
Text4.Text = Text1 & Text2
Text5.Text = Text1 & " - " & Text2
Text6.Text = Text1 + " - " + Text2
End Sub

Probalo.

Un abrazo.

Luis
0
ps.. no soy juan.. pero si me puedes ayudar.. te lo agradecería..
estoy empesando a programar en vb 6.0 y ps no se como hacer que un label de un form me muestre un texto de una caja de texto que se encuentra en otro form..
te dejo mi correo ... yecid-0507@hotmail.com gracias....
0
Muchasz gracias Elinv...
si me sirvio

ii gracias por por contestar tan rapido...
1
Una alegría Juan que te haya servido.

Un abrazo y a disposición.

Atentamente.


Elinv
0
hola, como puedo hacer para que una vez que el usuario itroduzca un valor en una caje de texto, se muestre en otras cajas de texto después de una operación, los resultados. Quiero de un valor dado, se muestre automaticamente en caja de texto el IVA de ese valor y el Importe Total. Me pueden ayudar, por favor.
0
ANDRES DE ZARATE ARGENTINA
16 jun 2012 a las 17:37
Hola Tan sigue los siguientes pasos tomando este ejemplo adaptando a tus necesidades es cuestion de modificar y probar con tus datos:

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
With RG_DatosPersonales
If .RecordCount > 0 Then .MoveFirst
.Find "DNI='" & Text1 & "'"
If .EOF = False Then
Label1 = !NOMBRE rem aca te muestra los datos con la tabla que vos quieras NOMBRE es una tabla en mi caso y me lo muestra en label1 vos pones el que quieras
rem Form2.Show

CmdMenu1.Enabled = True
CmdMenu2.Enabled = True
CmdMenu3.Enabled = True

Else
MsgBox "EL DNI NO EXISTE"
CmdMenu1.Enabled = False
CmdMenu2.Enabled = False
CmdMenu3.Enabled = False
Text1 = ""
Label1 = ""
Text1.SetFocus
End If
End With
End If
End Sub

Saludos
Andres
0