主题：[求助]文本框显示百分比，代码出错。（已解决）

text,　改成：value

Dim zc As Integer = CInt(Forms("劳动报酬").Controls("TextBox1").value)  '在册
Dim a As Integer =  CInt(Forms("劳动报酬").Controls("TextBox2").value)  'A
Dim b As Integer =  CInt(Forms("劳动报酬").Controls("TextBox3").value)  'B
Dim c As Integer =  CInt(Forms("劳动报酬").Controls("TextBox4").value)  'C
Dim d As Integer =  CInt(Forms("劳动报酬").Controls("TextBox5").value)  'D