Doni,

Bom dia!

Altere as propriedades TabStop das suas caixas de texto para True. Nas 3 primeiras que examinei, todas estão como False.

Wagner mudei o tabstop como vc disse e funcionou, agora tenho outro problema, a textbox prnt deveria devolver o resultado do seguinte calculo:

prnt.Value = Format(((CDbl(peneira20 * "0.20") + CDbl(peneira50 * "0.6") + CDbl(passante50)) * CDbl(pn)) / 100, "##,##0.0")

Onde:
resultadosCaO = 31,3
resultadoMgO = 17,8

RESULTADO NA TEXTBOX pn = 100,0

peneira20 = 1,3
peneira50 = 16,2
passante50 = 82,5
pn = 100,0

RESULTADO NA TEXTBOX prnt = 92,5

e o resultado que estou recebendo é 204,0, que está errado.

Doni