Visual Basic.NET - Consulta de caja

   
Vista:

Consulta de caja

Publicado por Pinky (104 intervenciones) el 02/02/2010 19:16:21
Hola amigos del foro, mi consulta es la siguiente ingreso en dos cajas distintas los nombres y apellidos, y al terminar de ingresar este último (apellidos) los junto en una sola caja de texto que esta invisible, con el siguiente código.
Protected Sub TXTAPELLIDOS_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TXTAPELLIDOS.TextChanged
Dim LARGOPOT, VARPOT As String
If TXTAPELLIDOS.Text.Length < 1 Then
MsgBox("Error, debe ingresar los Apellidos del Trabajador.", MsgBoxStyle.Information, "Sistema")
TXTAPELLIDOS.Focus()
Else
If TXTRUT.Enabled = False Then
TXTNACIMIENTO.Focus()
VARPOT = Trim(TXTPERSONAL.Text)
TXTPERSONAL = Trim(TXTNOMBRES.Text) + Space(1) + Trim(TXTAPELLIDOS.Text)
LARGOPOT = Len(LTrim$(VARPOT))
Else
VARPOT = Trim(TXTPERSONAL.Text)
TXTPERSONAL = Trim(TXTNOMBRES.Text) + Space(1) + Trim(TXTAPELLIDOS.Text)
LARGOPOT = Len(LTrim$(VARPOT))
TXTRUT.Focus()
End If
End If
End Sub
la linea en donde esta el error es TXTPERSONAL = Trim(TXTNOMBRES.Text) + Space(1) + Trim(TXTAPELLIDOS.Text)
LARGOPOT = Len(LTrim$(VARPOT))
me lo marca con error, no se en donde esta el problema, favor de ayudarme, desde ya muchas gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Consulta de caja

Publicado por P. J. (706 intervenciones) el 03/02/2010 18:00:24
Indica el error exacto que arroja, y de preferencia declara tus variables fuera del evento
Dim LARGOPOT, VARPOT As String

Ya que se estan declarando por cada texto cambiado, algo innecesario; en todo caso declaralas como static, no con dim.

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar