Ma che pensi di fare con
Dim DCount As Object
TextBox1.Text = DCount("*", ("PrimaTabella"))
TextBox2.Text = DCount("*", ("SecondaTabella"))
???
Non sei in Access VBA dove puoi utilizzare la FUNZIONE DCount. In questo caso quello che hai chiamato DCount è un oggetto (indefinito) che usi in maniera tutta tua ... Non puoi programmare inventando codice ...
Usa una frase SQL del tipo "SELECT COUNT ..." ed eseguila tramite la connessione che utilizzi.