Visual Basic - Urgente mirar este codigo

Life is soft - evento anual de software empresarial
 
Vista:

Urgente mirar este codigo

Publicado por Mortade-lo (29 intervenciones) el 22/10/2001 18:22:04
If Me.Combo1.Text = "IDNombre_Apellidos" Or "ID_DNI" Then
Me.Data1.RecordSource = "Alta de Clientes"
Me.Text1.DataSource = Me.Data1
Me.Text2.DataFormat = "ID_DNI" Or "IDNombre_Apellidos"

como lo puedo asociar en tiempo de diseño
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:Urgente mirar este codigo

Publicado por afogutu (321 intervenciones) el 22/10/2001 21:38:11
Por empezar está mal el if

aca te lo corrijo.

SELECT CASE Me.Combo1.Text
CASE "IDNombre_Apellidos"
SET Me.Data1.RecordSource = "Alta de Clientes"
SET Me.Text1.DataSource = Me.Data1
SET Me.Text2.DataFormat = "IDNombre_Apellidos"
CASE "ID_DNI"
SET Me.Data1.RecordSource = "Alta de Clientes"
SET Me.Text1.DataSource = Me.Data1
SET Me.Text2.DataFormat = "ID_DNI"
CASE ELSE
'ACA LO DEJÁS VACÍO
END SELECT
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