Te falta poner las comillas prueba con esto:
  
Código:
 
Private Sub Comando16_Click()
Rs.Open "SELECT * FROM alumno WHERE matricula = '" & matricula.Value & "'"
nombre.Value = Rs.Fields("nombre")
edad.Value = Rs.Fields("edad")
domicilio.Value = Rs.Fields("domicilio")
End Sub
  Acertaremos ahora...