remove variable from the field just use
= DCount([SolicitaçãoID_P ],"Protoloco_O ","SolicitaçãoID=" & SolicitaçãoID.Text)
you may or may not have to put quote on the initial field
= DCount("[SolicitaçãoID_P ]","Protoloco_O ","SolicitaçãoID=" & SolicitaçãoID.Text)