antonio altuna

Dante Amor respondió: Pon lo siguiente en tu formulario Private Sub CommandButton1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) 'Por.Dante Amor QuitaColor CommandButton1.BackColor = &HFF00& End Sub Private Sub...

Julián González Cabarcos respondió: En el evento Después de actualizar del cuadro de texto donde escribes el Id, que para el ejemplo también lo llamaremos Id, crea un procedimiento de evento y Entre Private Sub y End sub escribe TextA=dlookup("Telefono","nombre de la tabla","id=" &...